Falcon
27th August 2004, 09:09
Non trovando una sezione solo per la programmazione, penso che questo sia il miglior posto per chiedere l'haiuto di tutti i programmatori di VB :awk:
il mio scopo è visualizzare il contenuto di un database (Access 2000) in un serie di text box e non posso utilizzare il controllo Data associato ad una DataGrid per una serie di motivi che non vi sto ad elencare, quindi devo aprire il database "manualmente" ed anche l'oggetto Recordset ed il mio problema è prorprio qui:
Dim dbsDatabase As Database
Dim wksWorkspace As Workspace
Dim rsRecordset as recordset
Set wksWorkspace = DBEngine.Workspaces(0)
Set dbsDatabase = wksWorkspace.OpenDatabase(App.Path & "Clienti.mdb", True, False)
Set rsRecordeset = dbsDatabase.OpenRecordset("Tabella", dbOpenTable)
...
Il programma si blocca all'istruzione
Set rsRecordeset = dbsDatabase.OpenRecordset("Tabella", dbOpenTable)
con un errore: Errore di run-time '13': Tipo non corrispondente.
Non riesco proprio a capire cosa c'è che non va.
Aiutoooooooooooooo :cry:
il mio scopo è visualizzare il contenuto di un database (Access 2000) in un serie di text box e non posso utilizzare il controllo Data associato ad una DataGrid per una serie di motivi che non vi sto ad elencare, quindi devo aprire il database "manualmente" ed anche l'oggetto Recordset ed il mio problema è prorprio qui:
Dim dbsDatabase As Database
Dim wksWorkspace As Workspace
Dim rsRecordset as recordset
Set wksWorkspace = DBEngine.Workspaces(0)
Set dbsDatabase = wksWorkspace.OpenDatabase(App.Path & "Clienti.mdb", True, False)
Set rsRecordeset = dbsDatabase.OpenRecordset("Tabella", dbOpenTable)
...
Il programma si blocca all'istruzione
Set rsRecordeset = dbsDatabase.OpenRecordset("Tabella", dbOpenTable)
con un errore: Errore di run-time '13': Tipo non corrispondente.
Non riesco proprio a capire cosa c'è che non va.
Aiutoooooooooooooo :cry:
