Visual Basic 6.0

my code for sql: Public Function ExecuteSQL(SQL) CLEAN_UP Set RST0 = New ADODB.Recordset With RST0 .CursorLocation = adUseServer DoEvents .Open SQL, CONN3, adOpenForwardOnly, adLockReadOnly, adCmdText '.Source = SQL '.CursorLocation = adUseServer '.ActiveConnection = CONN3 '.CursorType = adOpenForwardOnly '.LockType = adLockReadOnly 'DoEvents '.Open Options:=adCmdText End With End Function my conn: Public Sub APRI_CONNESSIONE3() On Error GoTo Err_SomeName If Not CONN3 Is Nothing Then

im just want to do is i want to import the database on the running program but i dont know how to do can any one teach me

How can i connect the database of mysql to vb.60? please answer me...tNX!

Hi to all expert, Patulong naman.. Shared ko po ang msaccess database gamit ang mapdrive, para makaconnect ang ibang pc gamit ang exe ko.

Dear admin, At first my u take my nonsmoker My problem is, i made a tree node in vb6. When the form is loaded then all Child Node are expended But i want only tree node are Expended and Child node are Collapse. Please Please Help Me this to solve problem. Partho Kumar Boruya

Wath is the best method to open access table with jet 4.0 to use Add.new ? Actually i use: Set RST = New ADODB.Recordset RST.Open "table1", CONN, adOpenDynamic, adLockOptimistic my conn: Code: Public Sub APRI_CONNESSIONE() On Error GoTo Err_SomeName Dim PC_OPERANTE As String PC_OPERANTE = Environ$("COMPUTERNAME") Set CONN = New ADODB.Connection

iam use microsoft sql server 2000 how to restore and back-up the database of Microsoft sql server 2000 I use VB 6.0 and i need a code for backup and restore database to my system ? I wish you can help please . Thank you ..

hii guys I am new be. I am have make application using sms gateway in visual basic 6.0. please help me....

The problem is that, at about 1 minute per 1000 records, this takes wayyyy too long to load 500,000 - 600,000 records! I can load these same records from the text file manually by opening the table in MS Access and going though a wizard to import the data from the text file and it doesn't take very long, (can't remember for sure, but well under 15 minutes).

Dim dateprev, datelast As Date dateprev = Format(txttrandateprev.Text, "mm/dd/yy") datelast = Format(txttransdatelast.Text, "mm/dd/yy") txtmonths.Text = DateDiff("m", dateprev, datelast) exam txttrandateprev.Text = "09/11/11" txtransdatelast.text = "10/10/11" wrong answer txtmonths.Text = "1" correct answer