Learn about Hyper-V features that increase functionality and usability of Microsoft Windows Server 2016. Also, throughout this eBook, you’ll find some basic PowerShell examples that will help you leverage the scripts in your environments!
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.
Join the community of 500,000 technology professionals and ask your questions.