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.
dim cn as ADODB.connection dim fldrst as ADODB.recordset Set cn = CurrentProject.Connection Set fldrst = New ADODB.Recordset If strcolnm = "wordList" Then With fldrst .Open .ActiveConnection = cn .Source = "SELECT " & strcolnm & " FROM wordDef WHERE wordDefID=108" .CursorLocation = adUseClient .Open .AddNew .Fields(Field & (strcolnm)) = striv .Update varbook = .AbsolutePosition .Requery End With Else With fldrst .ActiveConnection = cn .CursorLocation = adUseClient .AbsolutePosition = varbook .Update .Fields(Field & (strcolnm)) = striv .Requery End With If pf = p Then fldrst.Close Set fldrst = Nothing End If End If
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.