Gunakan Adodb Mas..!
Dim cnn as New ADODB.Connection
Set cnn = New ADODB.Connection
cnn.CommandTimeout = 0
cnn.CursorLocation = adUseClient
cnn.ConnectionTimeout = 0
'MySQL ODBC 3.51 Driver
cnn.Open "Provider=MSDASQL; DRIVER={MySQL ODBC 3.51 Driver}" & _
"; SERVER=localhost" & _
"; DATABASE=namadatabase" & _
"; UID=root" & _
"; PASSWORD=password mysql" & _
"; OPTION=3"
'Update Table 1
cnn.execute "Update table1 set field1='nilainya' where
fieldprimary='nilaikriterianya'"
'Update Table 2
cnn.execute "Update table2 set field1='nilainya' where
fieldprimary='nilaikriterianya'"
semoga membantu!
Cotman.
--- Pada Kam, 2/9/10, nurwansyah <[email protected]> menulis:
Dari: nurwansyah <[email protected]>
Judul: [programmer-vb] Bertanya tentang VB dengan database Mysql
Kepada: [email protected]
Tanggal: Kamis, 2 September, 2010, 1:16 AM
Bagaimana cara mengupdate 2 buah tabel pada database Mysql dengan satu
buah command button pada form VB6.
Mohon bantuan rekan2 semua...
:: Thanks::
