Private Sub Form_Load()
Call dbConnect
Call DBRS
strstudinfo = "SELECT Members.StudentID, Members.LastName, Members.FirstName, Members.MI, Members.Sex, Members.Address, Members.Age, Members.Birthday, Members.[Time Returned], Members.[Date Returned] FROM Members"

[B]rsstudinfo.Open strstudinfo, dbcon, 3, 3[/B]
Call datafill
Call disabling
'strstudinfo = "INSERT INTO Members(StudentID,LastName, FirstName, MI,Age,Address,Birthday,Time Returned,Date Returned) VALUES (" & txtmemstudid.Text & ", '" & txtmemlname.Text & "', '" & txtmemfname.Text & "', " & txtmemmi.Text & ", " & txtmemage.Text & ", '" & txtmemadd.Text & "', " & txtmembday.Text & ", #" & txtmemtreg.Text & "#, #" & txtmemdreg.Text & "#)"


txtmemstudid.BackColor = &HE0E0E0
txtmemlname.BackColor = &HE0E0E0
txtmemfname.BackColor = &HE0E0E0
txtmemmi.BackColor = &HE0E0E0
txtmemadd.BackColor = &HE0E0E0
txtmemage.BackColor = &HE0E0E0
txtmembday.BackColor = &HE0E0E0
cmd_sex.BackColor = &HE0E0E0
txtmemtreg.BackColor = &HE0E0E0
txtmemdreg.BackColor = &HE0E0E0

End Sub

I am using a connection object from code and a DataEnvironment in a VB application
ttis is a code for my form load ..

"rsstudinfo.Open strstudinfo, dbcon, 3, 3" this is the highlighted error please help

You need not open a recordset object to execute an insert statement.

try this

dbcon.begintrans
dbcon.execute strstudinfo
dbcon.committrans
Be a part of the DaniWeb community

We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts meeting, networking, learning, and sharing knowledge.