Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Recordset
Message
General information
Forum:
Visual Basic
Category:
Database DAO/RDO/ODBC/ADO
Title:
Miscellaneous
Thread ID:
00898371
Message ID:
00898497
Views:
10
Hi Eric:
The controls are not bound.

Here is how I update my data


Private oDataConn As ADODB.Connection
Private oRecSet As ADODB.Recordset
Private Sub getdata()
Dim lMetting As String
Dim nRecCnt%

'Make connection to sql
Set oDataConn = New ADODB.Connection
oDataConn.ConnectionString = "DSN=Datawarehouse"

oDataConn.Open

Set oRecSet = New ADODB.Recordset
Set oRecSet.ActiveConnection = oDataConn
oRecSet.CursorLocation = adUseClient
oRecSet.CursorType = adOpenDynamic
oRecSet.LockType = adLockOptimistic

oRecSet.Open "SELECT * FROM Meetings Group by Meeting_name,Meeting_Location," & _
" Meeting_City_State,Start_Date,End_Date Order by Meeting_Name," & _
"Meeting_Location", oDataConn

'Update Records Here
oDataComm.Execute "UPDATE Meetings SET Meeting_Name = " & Trim(txtName.Text) & _
" Wherer Meeting_ID = " & Str(Trim(oRecSet.Fields("Meeting_ID")))

Thanks for the help
MA
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform