Drastically shorten your training time with WalkMe's advanced online training solution that Guides your trainees to action. Forget about retraining and skyrocket knowledge retention rates.
Sub WriteData2() Dim MyDatabase As String Dim MyID Set cn = New ADODB.Connection MyDatabase = "C:\psldata.mdb" cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & MyDatabase 'cn.Open "Provider=Microsoft.ACE.OLEDB.12.0;" & "Data Source=" & MyDatabase Set rs = New ADODB.Recordset 'open the recordset rs.Open "People", cn, adOpenKeyset, adLockPessimistic, adCmdTable rs.AddNew rs("peoSurname") = "Arney" rs("peoForenames") = "Richard Neil" rs.Update 'MyID = rs.peopleID ' MsgBox MyID If rs.State <> 0 Then rs.Close 'Closes record cn.Close 'Closes the connection End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Adding an equation to a Word form||4||24|
|Access 2003, find all instances of database ODBC||3||53|
|Create a list of Worksheets based on Cell Value||14||33|
|How to select all form fields inside text boxes in word||2||13|
Join the community of 500,000 technology professionals and ask your questions.