Ms JET 3.51+DataGrid=OK, Ms JET 4.0+DataGRid=Problem

• 0Niko još nije pohvalio poruku.
  Registruj se da bi pohvalio/la poruku!

Nadam se da ovo dovoljno govori:

Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset
Set conn = New Connection
Set rs = New Recordset
conn.Open "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=c:\fotodokADO\fotodok97.mdb"
rs.Open "SELECT * FROM tabela1", conn, adOpenStatic, adLockOptimistic
Set Form1.DataGrid1.DataSource = rs
Sa ovakvim kodom u dataGrid kontroli se pojavljuju podaci.

Medjutim sa ovakvim kodom se ne pojavljuju podaci u DataGrid-u.
Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset
Set conn = New Connection
Set rs = New Recordset
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\fotodokADO\fotodok97.mdb"
rs.Open "SELECT * FROM tabela1", conn, adOpenStatic, adLockOptimistic
Set Form1.DataGrid1.DataSource = rs

Razlika je jedino u Microsoft JET-u.

Ako ovo radim preko kontrole ADODC na formi, pa ADODC Properities prozoru za ConnectionString navedem "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\fotodokADO\fotodok97.mdb", onda takodje radi bez problema, tj. podaci se vide u DataGrid-u.

Resenje problema???