UPDATE og INSERT kommandoer til Access database

Hmm .. det gøres på nøjagtigt samme måde ...

Conn.Execute \"dit SQL kald\"

eller hvis du bruge data-controller:

  Data1.Database.Execute \"DELETE * FROM [Jim, Bill and others] WHERE Person=\'Jim\'\"

Jeg arbejder under Access med VB, jeg har derfor ikke åbnet databasen dom et objekt i VB.

Når jeg kalder SELECT bruger jeg .RowSource fra en listbox. Men den er ikke så glad for andet end SELECT!

Hvordan kan jeg åbne databasen som et objekt inde fra VB?

Det er muligt jeg er helt forkert på den, men her er hvad du skal gøre for at få VB til at opdatere og oprette en ny record:
Husk du skal bruge en dat control fra din værktøjskasse :-)
og følgende properties sat:
Connect = Access
Databasename = Dindatabase
recordsource = Dinrecord

Opdater :
data1.recordset.update
Ny:
data1.recordset.addnew
data1.recordset(\"field1\") = dinedata1$
data1.recordset(\"field2\") = dinedata2$
data1.recordset.update


Håber du kan bruge det :-)

- Mikker

Public Sub executeSQL(strDatabase As String, strSQL As String)
  Dim DB As Database
  Set DB = OpenDatabase(strDatabase)
  DB.Execute strSQL
  Set DB = Nothing
End Sub

Kan kaldes med:
  executeSQL \"C:\\Dokumenter\\DB1.MDB\", \"DELETE * FROM Tabel1\"

Hvis du arbejder med vba inden i acces kan du bruge DoCmd.RunSQL \"SQL String\" den burde kunne gøre det du efterspørger.

Kedde

Ja DoCmd virker fint, men når den kører kommer der masser af dialogbokse op, der spørger om man virkelig vil eks. slette den record... og det er ret irriterende, er der en måde hvorpå det kan undgås???

DoCmd.SetWarnings (True) sætter warnings til t blive vist, og DoCmd.SetWarnings (False) sætter tilsvarende warnings til ikke at blive vist.