Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1251 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Requette Select dans VB et ACCESS

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Requette Select dans VB et ACCESS

n°1835867
vincent_fr​et
Posté le 09-01-2009 à 11:01:51  profilanswer
 

Salut à tous,  
Il y a bien plusieurs sujets qui traitent du sujet mais je n'arrive pas a m'en sortir. Il faut dire que je débute et que j'ai un peu de mal  :cry:  
 
Voila donc ce que j'ai fait :
 

Code :
  1. Dim SQL_ligne As String
  2.     Dim rst As Recordset
  3.    
  4.     SQL_ligne = "SELECT [pinces].numero FROM [pinces] WHERE ((([pinces].NNO) = modifiable0.Value) And (([pinces].sn) = Modifiable2.value));"
  5.    
  6.     Set db = CurrentDb()
  7.     Set rst = db.OpenRecordset(SQL_ligne)
  8.    
  9.     num.Value = rst!numero
  10.     rst.Close


 
but de ma requette : récupérer le numéro d'une pince (chaque pince a un numéro unique : [pinces].numero ) en fonction du type de pince ( [pinces].NNO ) et du numéro de série de la pince ( [pinces].sn )
 
je veux mettre ce résultat dans num.value (zone texte).
 
j'ai le message d'erreur suivant :
 
http://fret.yhoo.free.fr/divers/erreur01.jpg
 
 
Qu'est-ce qui cloche dans mon programme ?
 
Ps : j'utilise access 2000 et ce doit être VB 6
 
 
 
Merci d'avance

mood
Publicité
Posté le 09-01-2009 à 11:01:51  profilanswer
 

n°1835868
FlorentG
Unité de Masse
Posté le 09-01-2009 à 11:04:23  profilanswer
 

Quand tu cliques sur Debug, il t'amène à quelle ligne ?

n°1835872
vincent_fr​et
Posté le 09-01-2009 à 11:15:28  profilanswer
 

celle-là :

Code :
  1. Set rst = db.OpenRecordset(SQL_ligne)

n°1835878
FlorentG
Unité de Masse
Posté le 09-01-2009 à 11:22:37  profilanswer
 

Faut préciser le type de recordset, nan [:petrus dei] Là il manque clairement le deuxième paramètres, comme indiqué dans le message d'erreur.  
 
Si ça n'a pas changé avec Access 2003 (apparemment ça fait partie de l'API DAO), ça peut être : dbOpenTable, dbOpenDynamic, dbOpenDynaset, dbOpenDynaset ou dbOpenForwardOnly.
 
Si tu veux juste lire une simple valeur, dbOpenForwardOnly suffit, il offrira les meilleures perfs :

Code :
  1. Set rst = db.OpenRecordset(SQL_ligne, dbOpenForwardOnly)


 
Quand t'as un message d'erreur comme ça, n'hésite pas à regarder la documentation de la fonction :)

n°1835882
vincent_fr​et
Posté le 09-01-2009 à 11:31:14  profilanswer
 

Ce coup-ci ça me met run-time error 3001 : argument non valide.
 
 
Le problème pour l'aide c'est que ca a l'air de bugguer et comme je ne suis pas chez moi, je ne peux pas réparer l'installation.

n°1835884
vincent_fr​et
Posté le 09-01-2009 à 11:31:47  profilanswer
 

est-ce que je peux trouver un site ou il y a l'aide en ligne ?

n°1835885
FlorentG
Unité de Masse
Posté le 09-01-2009 à 11:32:50  profilanswer
 

Sans l'aide pour voir la syntaxe de OpenRecordset, point de salut [:sadnoir] Mais c'est bizarre, je me souvient d'avoir utilisé ça exactement pareil sous Access '97. Ou alors il râle sur la requête... Enlève le point-virgule à la fin ?

n°1835893
vincent_fr​et
Posté le 09-01-2009 à 11:44:50  profilanswer
 

Ben je pense que la requête fonctionne parce que j'ai fait une bidouille en plaçant le résultat dans une liste déroulante (dans le rowsource) et ça marche bien.
 
j'ai trouvé ça mais le lien vers le site cité ne fonctionne pas :
http://groupes.codes-sources.com/a [...] 22677.aspx
 
En tout cas merci pour ton aide.

n°1835896
vincent_fr​et
Posté le 09-01-2009 à 11:48:17  profilanswer
 

Ca ne marche pas mieux sans le ;


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Requette Select dans VB et ACCESS

 

Sujets relatifs
Case à cocher dans Access 2003[ACCESS] Problème requête et valeur par défaut
Gestion de saut de page ACCESS/VBA[Access/MCD]
base access verouiller avec macros[VB] utilisation d'une liste pour traiter des donnés
access 2000 et pages d'accès à la base de données[C# - VB.NET - SQL] arrondir un prix (sans virgule)!
[Résolu] [VB.NET] Récupérer le code de sortie d'un service WindowsAccess - requete pour regrouper plusieurs champs en 1 seul
Plus de sujets relatifs à : Requette Select dans VB et ACCESS


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR