PeopleSoft Adoption Made Smooth & Simple!
On-The-Job Training Is made Intuitive & Easy With WalkMe's On-Screen Guidance Tool. Claim Your Free WalkMe Account Now
' Client Data: Dim cnnClient As ADODB.Connection Dim sClientConnect As String Dim strClientSQL As String Dim rstClient As ADODB.Recordset ' SQL Data to be updated: Dim strSql As String Dim cmdUpdate As ADODB.Command Dim sSqlConnect As String ' Client side setup Set cnnClient = New ADODB.Connection sClientConnect = "(Some successful yet proprietary ODBC connection string here)" cnnClient.ConnectionString = sClientConnect strClientSQL = "Select * from ClientView" rstClient.Open strClientSQL, cnnClient, adOpenDynamic, adLockReadOnly ' SQL Data to be updated: Set cmdUpdate = New ADODB.Command sSqlConnect = "(Successful ODBC connection string here)" cmdUpdate.ActiveConnection = sSqlConnect ' Scroll through client data & update the SQL data: rstClient.MoveFirst Do strSql = "Update SqlTable Set Address = '" & rstClient.Fields("Address") & "' WHERE ClientID = '" & rstClient.Fields("CustNo") & "'" cmdUpdate.CommandText = strSql Loop While Not rstClient.EOF
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.