-
Can one tell me how i could print what an sql statement
is returning in a picture box. If i use frmDriverQuery.picDriverQuery.Print SQL I just get the
actual query printed into the picture box not what i want
extracted from the database. I really have no clue how to
do this! {{{laughing}}}
Private Sub cmdDriverQuery_Click()
'When a Drivers ID Number is entered into the textbox and the Driver Query button
'is clicked a list of accounts that the driver is assigned to will popup
Dim strSQL As String
strSQL = "SELECT * FROM [Driver Information]WHERE [Driver ID] = '" & Trim(txtDriverQuery.Text) & "'"
Set rs = db.OpenRecordset(strSQL)
frmDriverQuery.Show
frmDriverQuery.picDriverQuery.Print rs!SQL ?????
End Sub
-
You'll need to loop thru the recordset.
Do While Not rs.EOF
frmDriverQuery.picDriverQuery.Print rs.Fields(0)
'concatinate the remaining fields in the recordset to the end of the above statement (with & " " & rs.Fields(1), for example)
rs.movenext
loop
