Run Time Error'91'Object variable or With block variable not set
sabrinesol
Messages postés
4
Statut
Membre
-
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention -
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour,
je veux faire la connexion vba à access
Merci d'avance
je veux faire la connexion vba à access
Option Explicit
Dim conn As ADODB.Connection, rec As ADODB.Recordset
Dim eq As String
Public Sub Form1_Load()
Set conn = New ADODB.Connection
Set rec = New ADODB.Recordset
'conn.Open ("Provider=Microsoft.Jet.OLEDB 4.0;Data Source=C:\Program Files\Microsoft Office\Office\Samples\Northwind.mdb;Persist Security Info=False")
conn.ConnectionString = "Provider= Microsoft.ace.oledb.12.0;" + "Data source= C:\Users\Client MS\Desktop\pr\c1.accdb;persist security info = false"
conn.Open
esql = "select * from t1"
rec.Open (eq), conn, adOpenDynamic, adLockOptimistic
GetText
End Sub
Public Sub Command1_Click()
rec.Fields(0) = Text1.Text
rec.Fields(1) = Text2.Text
rec.Update
End Sub
Merci d'avance
A voir également:
- Run Time Error'91'Object variable or With block variable not set
- Popcorn time - Télécharger - TV & Vidéo
- Block breaker - Accueil - Services en ligne
- Finish time lite - Télécharger - Utilitaires
- Quick time - Télécharger - Lecture
- Shockwave flash object - Télécharger - Divers Web & Internet