M
MichaelJohnson168
I keep getting an error message at the indicated at the line below:
The error message says: "Object Required"
and is located at the line of code below.
-----
clientName = rstLoans.[BorrowerFirstName]
-----
Dim dbs1 As Database
Dim rstLoans As DAO.Recordset
Dim strSQL As String
Dim strLoanNumber As String
strSQL = "SELECT Loans.[BorrowerFirstName] " & _
"FROM Loans " & _
"WHERE Loans.[BorrowerFirstName]='Gordon';"
Set dbs1 = CurrentDb
Set rstLoans = dbsMachineProblem1.OpenRecordset(strSQL, dbOpenDynaset)
clientName = rstLoans.[BorrowerFirstName] <-- Error Occurs Here
Could someone let me know what is going on and how to rectify it?
Thanks in advance.
The error message says: "Object Required"
and is located at the line of code below.
-----
clientName = rstLoans.[BorrowerFirstName]
-----
Dim dbs1 As Database
Dim rstLoans As DAO.Recordset
Dim strSQL As String
Dim strLoanNumber As String
strSQL = "SELECT Loans.[BorrowerFirstName] " & _
"FROM Loans " & _
"WHERE Loans.[BorrowerFirstName]='Gordon';"
Set dbs1 = CurrentDb
Set rstLoans = dbsMachineProblem1.OpenRecordset(strSQL, dbOpenDynaset)
clientName = rstLoans.[BorrowerFirstName] <-- Error Occurs Here
Could someone let me know what is going on and how to rectify it?
Thanks in advance.