natürlich hab ich zugriff auf meinen quellcode ;-)
ich post mal nur des wichtigste:
Public Sub vDatenLaden()
Dim sql As String
Dim condb As New ADODB.Connection
Dim rs As New ADODB.Recordset
dim i as long
sql = "SELECT * FROM blabla"
Set condb = New ADODB.Connection
Call condb.Open("myOdbcConnection")
Set rs = New ADODB.Recordset
Call rs.Open(sql, condb, adOpenForwardOnly, adLockReadOnly)
TDBGrid1.Array = xarray
i = 1
While Not rs.EOF
xarray.ReDim 1, i, 0, 7
xarray.Value(i, MeGridspalten.Spalte1) = CLng(rs("Spalte1"))
xarray.Value(i, MeGridspalten.Spalte2) = CStr(rs("Spalte2"))
xarray.Value(i, MeGridspalten.Spalte3) = CDbl(rs("Spalte3"))
i = i + 1
rs.MoveNext
Wend
condb.Close
Set rs = Nothing
TDBGrid1.ReBind
TDBGrid1.Refresh
TDBGrid1.MoveLast
TDBGrid1.MoveFirst
hoffe, das ist so verständlich.
ich arbeite über die Windows ODBC-Verwaltung, da kann ma ja dann die Treiber für die mysql-DB installiern und dann die verbindung eingeben.
WIe mit regsvr32 nachregistriert?
Und woran erkenn ich, das MDAC korrekt installiert wurde?
Danke nochmals für deine Hilfe bisher