Access 2003 - Extracting a string value through SQL

Hi,

I'm trying to use VBA to extract a string value from a table in a database.

My effort is below:

Private Sub Command0_Click()

Dim SQLString As String
Dim db As Database
Dim MachineName As String
Dim Category As String
Dim FileName As String

Stop

Set db = CurrentDb

MachineName = "jkl"

SQLString = "SELECT UserClassification FROM ContactDetails WHERE MachineName = " & MachineName
Set Category = db.OpenRecordset(SQLString, String)

'FileName = "UT" & Category

'DoCmd.OpenReport FileName
End Sub

Can anyone tell me what I need to do?

For something like this, I would use ExecuteScalar, rather than returning an entire recordset.

you should use a recordset object to access data:

Dim CategoryRecordset As Recordset


Set CategoryRecordset = db.OpenRecordset(SQLString)

Category=CategoryRecordset![UserClassification]

...