Why Object Required Error

[RICHARD BROMBERG]

I am using Access 200.

I have a form which includes text boxes L1, L2 and L3

And a table tblGrades with number fields L1, L2 and L3

I am trying to use following code to add the content of the text fields (L1,
L2, L3) to a new record in the tblGrades table.

I am getting an "Object Required Error" on the Dbs.Execute strSQL
statement.

Any Suggestions would be gratly appreciated.

Private Sub cmdInsert_Click ()

Dim strSQL As String

strSQL = "INSERT INTO tblGrades" & "( L1,L2,L3 ) " & _

"SELECT '" & L1 & "', " & _

"SELECT '" & L2 & "', " & _

"SELECT '" & L3 & "', "

Dbs.Execute strSQL ' I GET OBJECT REQUIRED ERROR

Dbs.Close

End Sub

[David W. Fenton]

"RICHARD BROMBERG" <no*****@att.ne twrote in
news:Iz******** *************@b gtnsc05-news.ops.worldn et.att.net:

I am getting an "Object Required Error" on the Dbs.Execute
strSQL statement.

Any Suggestions would be gratly appreciated.

Private Sub cmdInsert_Click ()
Dim strSQL As String

strSQL = "INSERT INTO tblGrades" & "( L1,L2,L3 ) " & _
"SELECT '" & L1 & "', " & _
"SELECT '" & L2 & "', " & _
"SELECT '" & L3 & "', "

Dbs.Execute strSQL ' I GET OBJECT REQUIRED ERROR
Dbs.Close

End Sub

You have neither defined nor set the database variable. Somewhere
you need:

Dim Dbas As DAO.Database

and then in the code above before you use it:

Set Dbs = [some function that returns a database pointer]

If you use CurrentDB() or DBEngine(0)(0), then you shouldn't close
it.

--
David W. Fenton http://www.dfenton.com/
usenet at dfenton dot com http://www.dfenton.com/DFA/

[Bob Quintal]

"RICHARD BROMBERG" <no*****@att.ne twrote in
news:Iz******** *************@b gtnsc05-news.ops.worldn et.att.net:

I am using Access 200.

I have a form which includes text boxes L1, L2 and L3
And a table tblGrades with number fields L1, L2 and L3

I am getting an "Object Required Error" on the Dbs.Execute
strSQL statement.

Any Suggestions would be gratly appreciated.

strSQL = "INSERT INTO tblGrades" & "( L1,L2,L3 ) " & _
"SELECT '" & L1 & "', " & _
"SELECT '" & L2 & "', " & _
"SELECT '" & L3 & "', "

this evaluates to
INSERT INTO tblgrades (L1,L2,L3) SELECT '36',SELECT '24' .

You are mixing the syntax for inserting VALUES with the sybtax
for inserting a SELECTion from another table. Since you have not
defined another table, your SELECT generates the object required
error.

There are other issues as well, you have saingle quotes aroung
L1, L2, L3. You said they are number fields; no quotes allowed.
You want
strSQL = "INSERT INTO tblGrades (L1,L2,L3)" & _
" VALUES (" & me.L1 & "," & me.L2 & "," & me.L3 & ");"

--
Bob Quintal

PA is y I've altered my email address.

--
Posted via a free Usenet account from http://www.teranews.com