ddragas

Hi

I'm having problems with inserting new data into database.

Here comes code.

Please help me.

Dim MyConn As ADODB.Connection
Dim MyRecSet As ADODB.Recordset

Set MyConn = New ADODB.Connection
MyConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\vb\podaci\šifre.mdb;"
MyConn.Open
Dim sqlStr As String

sqlStr = "INSERT INTO Šifre (šifra, talijanski_opis, euro, hrvatski_opis, oznaka, dobavljač, napomena) Values (Text1.Text, text2.Text, text4, text3.Text, combo1, text6.Text, text5.Text)"

MsgBox sqlStr

Set MyRecSet = MyConn.Execute(sqlStr)
MyConn.Close



Also if somebode can help me with deleting records from database.

THNX

Shurik12

Hi,

You seem to have forgotten to use & to append the values of the
text boxes

...Values ( '" & Text1.Text & "' ..... ( in case of text value)
...Values ( " & Text1.Text & " ..... ( in case of numeric value)

Regards,
Shurik.