[VB6] Acces Database aanpassen

[Verwijderd]

Ik heb een proggie gemaakt maar nu wil ik toevoegen aan een acces database, uitlezen van de database gaat al alleen hoe laat ik hem iets toevoegen. Dit is de tabel:

[ID] [VNaam] [ANaam]
1 - piet - vermeer
2 - jan - klaassen
3 - klaas - jansen
4 - peter - de vries
5 - pim - fortuyn

ID wordt automatisch aangemaakt (auto number). Nu wil ik vanuit mijn proggie bijv nog een 6e bijmaken bijvoorbeeld johhny flodder hoe kan ik dit dan doen?

[Gerco]

Wat gebruik je? DAO of ADO?

In het geval van DAO:

code:

Dim rs As Recordset
Set rs = Database.OpenRecordset("wat sql")

rs.Addnew
ra.Fields("veldje") = waarde
rs.Update

[Verwijderd]

je kan ook gewoon een INSERT statement gebruiken. wel zo makkelijk en duidelijk . Kijk ook eens naar de search, want deze vraag is al tig keer langsgekomen...

[Verwijderd]

oke bedankt het werkt perfect. En het was DOA.

[Toink]

Of gewoon docmd.runsql "insert into table blabla dit en dat values blablavalue ditvalue envalue datvalue"

[Verwijderd]

ja ik heb het al opgelost misschien niet de makkelijkste manier maar het werkt

code:

Option Explicit
Dim rslogin As Recordset

Private Sub add_Click()
   
   Dim rs As Recordset
   
   If Text1.Text = "" Or Text2.Text = "" Then
      MsgBox "Wachtwoord of naam niet ingevuld.", , "Waarschuwing!"
      Exit Sub
   End If
   
   rslogin.AddNew

   rslogin!Naam = Text1.Text
   rslogin!Wachtwoord = Text2.Text
   rslogin.Update

   Unload Me
   
End Sub

code:

Private Sub Form_Load()
   Set cnConnect1 = New Connection
   cnConnect1.Provider = "microsoft.jet.oledb.4.0"
   cnConnect1.ConnectionString = "user ID=admin; password=;" & _
   "data source=" & App.Path & "\login.mdb"
   cnConnect1.Open
  
   Set rslogin = New Recordset
  
   With rslogin
   .CursorLocation = adUseClient
   .CursorType = adOpenStatic
   .LockType = adLockOptimistic
   .Open "select * from login", cnConnect1
   End With
End Sub

code:

Private Sub Form_Unload(Cancel As Integer)
   rslogin.ActiveConnection = Nothing
   cnConnect1.Close
End Sub

dat werkt wel goed.

[Verwijderd]

programmeren is WIJSHEID . . geen GOKWERK !!!