bonjour a tous,
j'ai une appli vb qui lance des requetes sous oracles, pour cela, ca fonctionne bien mais j'ai une requete a lancer sur une base sqlserveur et malgré des sources trouvées sur le net pour la connection je n'y arrive pas, de + je reprend une applis vb créé par qqun et je connais tres peu le vb. Voici ce que jai mis (au sein d'une fonction ) :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Dim Action As Recordset
Set Action = New ADODB.Recordset
Dim Chemin_SqlServer, StrConnectionDocuments As String
Dim requete As String
Set db = New Connection
 
Chemin_SqlServer = "\\BASE"
StrConnectionDocuments = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Documents" & ";Data Source=" & Chemin_SqlServer
 
    'Ouverture de la connexion a la base
    db.CursorLocation = adUseServer
    db.Open StrConnectionDocuments
 
    'requete = "Select * From matable"
    'Action.Open requete, db, adOpenStatic, adLockReadOnly
   'Action.Close
en compilant ceci, il mindique que Recordset de la ligne Dim Action As Recordset n'est pas defini par l'utilisateur ...
pourriez vous m'aider svp
merci d'avance
pierre