need your help!

meki_2118

hi, I'm practicing how to use sql language in vb 6.0 via ADODC. I'm getting problem with adding a data in INSERT INTO statement. Because my code in the command buttons is just... Adodc1.RecordSource = "INSERT INTO tblname(firstname, lastname) VALUES('" & txtfname.Text & "','" & txtlname.Text & "')" but the data in the textbox are not saved in the data base... can you help me please.

Parwej Ahamad

Did you try with Connection object

myConn.Execute "INSERT INTO tblname(firstname, lastname) VALUES('" & txtfname.Text & "','" & txtlname.Text & "')"

OR also you can it with Command object OR Try your way

Adodc1.RecordSource = "INSERT INTO tblname(firstname, lastname) VALUES('" & txtfname.Text & "','" & txtlname.Text & "')"
Adodc1.Refresh

Parwej Ahamad R & D with IIS 5.0/6.0

meki_2118

i've tried the

Adodc1.RecordSource = "INSERT INTO tblname(firstname, lastname) VALUES('" & txtfname.Text & "','" & txtlname.Text & "')"
Adodc1.Refresh

but there was an error saying "Operation is not allowed when the object is closed" . what should i do?

Alsvha

Do you have an open connection to the database? Doesn't sound like it from that error message.

--------------------------- Blogging about SQL, Technology and many other things

Parwej Ahamad

(1) Before going to execute any query first check your database connection is open or close. (2) Did you try with connection object :

myConn.Execute "INSERT INTO tblname(firstname, lastname) VALUES('" & txtfname.Text & "','" & txtlname.Text & "')"

Parwej Ahamad R & D with IIS 5.0/6.0

meki_2118

yup, I've tried it and it worked but I've also change my data base connection using stored procedure. Thanks for the help. :)

Parwej Ahamad

I am not getting this point : "but I've also change my data base connection using stored procedure" ?

Parwej Ahamad R & D with IIS 5.0/6.0

meki_2118

Instead of using the ADODC. I've changed the connection to this

Private nameConn As ADODB.Connection
Private nameCMD As ADODB.Command
Private nameRST As ADODB.Recordset

Private Sub ConnectTODB()
Set nameConn = New ADODB.Connection

nameConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\meki\meki training\dbnames.mdb"
nameConn.Open

Set nameCMD = New ADODB.Command
Set nameCMD.ActiveConnection = nameConn
End Sub

so that the nameComm.Execute command will work.

meki_2118

how can I open the connection to the database??:confused:

Parwej Ahamad

Oh! Good :)

Parwej Ahamad R & D with IIS 5.0/6.0