Enhance your security with threat intelligence from the web. Get trending threat insights on hackers, exploits, and suspicious IP addresses delivered to your inbox with our free Cyber Daily.
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
|ms/acceee link a subform to a control||9||23|
|MS Access 2010 Form Building||3||21|
|How to manage encyps queries mssql when sending conditioning values||10||21|
|Trying to display the sum of values on a subform on the main form||6||20|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
7 Experts available now in Live!