remifalcon
Messages postés62Date d'inscriptionmercredi 22 février 2006StatutMembreDernière intervention20 novembre 2008
-
5 août 2008 à 08:21
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 2021
-
21 janv. 2009 à 07:28
Bonjour à tous!
Je cherche à récupérer le résultat d'une requête SQL en vbs mais il doit me manquer quelque chose
error - "Fin d'instruction attendue"
Le insert fonctionne
Set mConnection = CreateObject("ADODB.Connection")
mConnection.Open "Provider=SQLOLEDB.1;Data Source=CINFPC22\SQLEXPRESS;Initial Catalog=BDCBTEST1;Integrated security=SSPI"
mConnection.Execute "INSERT...."
Set mRecordset = CreateObject("ADODB.Recordset")set mRecordset mConnection.Execute"Select * from Utilisateurs where ID_Connexion '12'"Comment puis je récupérer le résultat de la reque pour l'afficher?
Je tiens a préciser que j'ai déja chercher sur google avant de vous consulter.
Merci beaucoup!.
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 202174 5 août 2008 à 08:51
la méthode Execute de ta connection ne renvoie pas de donnée.
elle sert pour faire des INSERT INTO, des UPDATE, DELETE et autres requetes d'action.
Il te faut utiliser la méthode OpenRecordset
par la suite, il te suffit de manipuler ton recordset.
a noter que dans ta requete SQL, tu as mis ='12'
gaffe, si ce champ est déclaré en tant que numérique, il ne faut pas mettre de quotes (uniquement là pour baliser les chaines de caracteres).
tu fais, de plus un premier Set mRecordset = CreateObject(...)
puis, de suite un autre Set mRecordset =
ton recordset vide, que tu as créé en premier est détruit directement, cette etape est inutile.
en résumé:
Set mConnection = CreateObject("ADODB.Connection")
mConnection.Open "Provider=SQLOLEDB.1;Data Source=CINFPC22\SQLEXPRESS;Initial Catalog=BDCBTEST1;Integrated security=SSPI"
mConnection.Execute "INSERT...."
set mRecordset = mConnection.OpenRecordset("Select * from Utilisateurs where ID_Connexion=12")
remifalcon
Messages postés62Date d'inscriptionmercredi 22 février 2006StatutMembreDernière intervention20 novembre 2008 5 août 2008 à 09:06
Yes merci pour ton aide je sens que ça avance bien la
Juste lors de l'exécution de la ligne
set mRecordset = mConnection.OpenRecordset("Select * from Utilisateurs")
J'ai droit à une petite erreur "Argument de type incorrect.." source ->ADODB
J'ai testé ma requête sur le serveur sql directement ça tourne.
Et sinon mRecordset ça devient une sorte de tableau du coup si la requête renvoi plusieurs champ?
MsgBox mRecordset.Fields("Nom") -> "Nom" représente quoi?