20. november 2001 - 15:10Der er
15 kommentarer og 2 løsninger
ADO og slette række i access tabel
Jeg er ved at ændre en databasetilgang fra DAO til ADO, men har et problem med at slette rækker i en tabel. Det er ved at drive mig til vanvid!
Koden er som følger:
Private dB As ADODB.Connection Private Rs As ADODB.Recordset
Public Function deleteFixtures(pallet_ID) Set dB = New ADODB.Connection dB.Open \"Provider=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & App.Path & \"DataBase.MDB\"
Set Rs = dB.Execute(\"SELECT * FROM PM_Fixtures WHERE pallet_ID=\" & CStr(pallet_ID) & \";\")
Do Until Rs.EOF Rs.Delete Rs.MoveNext Loop
End Function
Ved rs. delete får jeg en runtime error \'3251\' - Objektet eller provideren kan ikke udføre denne kommando
Så skal du dog åbne recordsettet med lidt andre parametre:
Set dB = New ADODB.Connection dB.Open \"Provider=MSDASQL;DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & App.Path & \"DataBase.MDB\"
With Rs Set .ActiveConnection=db .CursorType=adUseKeyset .LockType=adLockPessimistic .Source=\"SELECT * FROM PM_Fixtures WHERE pallet_ID=\" & CStr(pallet_ID) & \";\" .Open End With
jep, med mindre du bruger Batch hvor du så skal eksekvere en rd.UpdateBatch for ændringerne skrives
/Jennemaan
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
