ciao.. apro una form dove all'interno c'è una MSFlexGrid. Nella sezione dichiarazioni c'è questo:
e al FormLoad inserisco questo codice:codice:Dim DB As New ADODB.Connection Dim RS As New ADODB.Recordset
appena cerco di aprire questa form mi appare questo messaggio di errore:codice:Private Sub Form_Load() 'connessione al datbase Set DB = New ADODB.Connection DB.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;" & "Data Source=" & App.Path + "\ONN97.mdb" DB.Open Set RS = New ADODB.Recordset RS.Open "Select * from Clienti", DB, adOpenStatic, adLockOptimistic Set MSHFlexGrid1.DataSource = RS MSHFlexGrid1.ColWidth(0) = 3000 MSHFlexGrid1.ColWidth(1) = 3000 MSHFlexGrid1.ColWidth(2) = 1100 End Sub
"Variabile oggetto o variabile del blocco with non impostata"
e mi segna in giallo Set MSHFlexGrid1.DataSource = RS
perchè?![]()




Rispondi quotando
