G
Guest
I'm wondering if there isn't an easier/better way to get a value from a table
in code. Right now I do this kind of thing:
Dim db As Database
Dim RS As DAO.Recordset
Dim mySQL As String
Dim strResult As String
Set db = CurrentDb
mySQL = "Select user_info.*, user_info.Logon_ID " & _
"From user_info " & _
" Where (((user_info.Logon_ID)=CurrentUser()))"
Set RS = db.OpenRecordset(mySQL, dbOpenDynaset)
'....Code in here...
RS.Close
in code. Right now I do this kind of thing:
Dim db As Database
Dim RS As DAO.Recordset
Dim mySQL As String
Dim strResult As String
Set db = CurrentDb
mySQL = "Select user_info.*, user_info.Logon_ID " & _
"From user_info " & _
" Where (((user_info.Logon_ID)=CurrentUser()))"
Set RS = db.OpenRecordset(mySQL, dbOpenDynaset)
'....Code in here...
RS.Close