URGENT : Recuperation d'une valeur en SQL sous VBA

Résolu
Signaler
Messages postés
48
Date d'inscription
samedi 16 octobre 2004
Statut
Membre
Dernière intervention
22 juin 2009
-
Messages postés
2
Date d'inscription
jeudi 4 décembre 2008
Statut
Membre
Dernière intervention
4 décembre 2008
-
Je travaille sur une base de données Access, j'aurais besoin de recuperer la valeur d'une requete SELECT.

Voici ma requete : "SELECT Efficience FROM STEELPLATES Where epaisseur=" & epaiss & ";"
comment executer celle ci et recuperer le resultat ? Il n'y en aura que un.

Merci d'avance je bloque.

4 réponses

Messages postés
265
Date d'inscription
dimanche 3 août 2003
Statut
Membre
Dernière intervention
29 mars 2010

salut !



Public db As Database

Public rs As Recordset

Public sql As String

Dim resultat$



sql = "select Efficience from STEELPLATES where epaisseur='" & epaiss & "' "

Set rs = db.OpenRecordset(sql, dbOpenSnapshot)

resultat = rs.Fields("epaisseur")
rs.Close



N'oublie pas de faire Projet --> Références --> Microsoft DAO 3.6 Object Library



Bonne chance
Clad
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 109 internautes nous ont dit merci ce mois-ci

Messages postés
48
Date d'inscription
samedi 16 octobre 2004
Statut
Membre
Dernière intervention
22 juin 2009

Il y a une erreur : "Type mismatch" à cette ligne :
Set rs = db.OpenRecordset(sql, dbOpenSnapshot)
Messages postés
48
Date d'inscription
samedi 16 octobre 2004
Statut
Membre
Dernière intervention
22 juin 2009

c'est bon j'ai trouvé un autre moyen merci
Messages postés
2
Date d'inscription
jeudi 4 décembre 2008
Statut
Membre
Dernière intervention
4 décembre 2008

Salut,
ta question m'interresse...c quoi l'autre moyen que tu as trouvé ??
tu as le code ?

Marco