Ik heb de volgende code:
Het gaat goed totdat ik kom bij de laatste regel, dan krijg ik namelijk de melding:
Wat doe ik verkeerd? Ik zat zelf te denken aan een fout CursofType en/of LockType, maar ik kan het ook hiermee niet oplossen? Heb al een tijd zitten zoeken op het Internet en GoT maar kan niets vinden. Wat doe ik nu fout? Ik probeer het op (ongeveer) dezelfde manier te doen als in gewoon (ouderwets) VB. Het doel is vanuit een VB applicatie één of meedere records opvragen uit een MySql-database.
===== Oeps topictitel; vergeten de rest toe te voegen
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
| Dim conString As String
Dim rsd As New ADODB.Recordset
Dim strSql As String
Dim mySqlConn As New ADODB.Connection
Dim fld As ADODB.Field
Dim i As Integer
conString = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=10.0.0.2;PORT=3306;" _
& "DATABASE=test; USER=*****;PASSWORD=*****;OPTION=3;"
mySqlConn.ConnectionString = conString
mySqlConn.Open()
rsd = New ADODB.Recordset
rsd.CursorType = ADODB.CursorTypeEnum.adOpenDynamic
rsd.ActiveConnection = mySqlConn
rsd.LockType = ADODB.LockTypeEnum.adLockOptimistic
rsd.Source = "SELECT * FROM files"
rsd.Open() |
Het gaat goed totdat ik kom bij de laatste regel, dan krijg ik namelijk de melding:
code:
1
2
3
4
5
| An unhandled exception of type 'System.Runtime.InteropServices.COMException' occurred in WindowsApplication1.exe Additional information: Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another. |
Wat doe ik verkeerd? Ik zat zelf te denken aan een fout CursofType en/of LockType, maar ik kan het ook hiermee niet oplossen? Heb al een tijd zitten zoeken op het Internet en GoT maar kan niets vinden. Wat doe ik nu fout? Ik probeer het op (ongeveer) dezelfde manier te doen als in gewoon (ouderwets) VB. Het doel is vanuit een VB applicatie één of meedere records opvragen uit een MySql-database.
===== Oeps topictitel; vergeten de rest toe te voegen
[ Voor 4% gewijzigd door Verwijderd op 15-12-2005 20:26 ]