[ logme @ 02.12.2009. 19:24 ] @
Pozdrav svima.

Pokusavam da uvezem excel i access (2003). S obzirom da sam rijetko zalazio u ove vode pokusao sam modifikovati kod sa interneta, medjutim javlja mi gresku kao u naslovu teme.

Kod izgleda ovako:


Private Sub CommandButton1_Click()

Dim conn As New ADODB.Connection
Dim connectionString As String
Dim sql As String

connectionString = "dbq=C:\Inetpub\wwwroot\svt\SVT11.mdb; Driver = {Microsoft Access Driver (*.mdb)};"

con.Open connectionString

sql = "insert into tblAvioni (MB1, GOD1, KVARTAL1)values ’" & TextBox1.Text & "’, ’" & TextBox2.Text & "’, ’" & TextBox3.Text & "’)"

con.Execute sql

MsgBox "Unos je potvrdjen", vbInformation

con.Close
Set con = Nothing

End Sub


Javlja gresku u redu
con.Open connectionString

Ako neko ima vremena da pogleda, znanja na ovom forumu sigurno ne nedostaje.

Pozdrav