[VB Access] - Problème de Recordset

skanel, le mercredi 29 septembre 2004 à 17:24:58

Bonjour,

J'ai un GROS problème! Je cherche à travailler sur une série de table en lecture et en écriture, mais une erreur apparaît invariablement lors de l'initialisation d'un Recorset (Erreur d'exécution 3001 : Argument non valide).

Voilà mes déclarations :

Private Sub C_Lancement_Click()

Dim MaDB As DAO.Database
Dim TRefer As Recordset
Dim Temp1 As Recordset
Dim Temp2 As Recordset
Dim Result As Recordset

Dim URR As String, FullName As String, TypeCarte As String
Dim PartNumber As String, Lot As String, Quantite As String
Dim Total As String

'***** INITIALISATION DES VARIABLES *****
Set MaDB = CurrentDb()
Set TRefer = MaDB.OpenRecordset("T_URR_Lots", OpenRecordset)        'Première ligne d'apparition de l'erreur
Set Temp1 = MaDB.OpenRecordset("T_Temp1", OpenRecordset)
Set Temp2 = MaDB.OpenRecordset("T_Temp2", OpenRecordset)
Set Result = MaDB.OpenRecordset("T_Resultat", dbOpenRecordset)

J'ai déjà regardé partout où je pouvais, j'ai rajouté toutes les bibliothèques qui allaient bien (Microsoft DAO 3.6 Object Library et Microsoft ActiveX Data Objects 2.5 Library), mais il n'y a toujours pas moyen de résoudre mon problème.

QUE DOIS-JE FAIRE??? AIDEZ-MOI, SVP!!

Répondre à skanel Signaler ce message aux modérateurs Aller au dernier message

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

mouste2, le mercredi 29 septembre 2004 à 19:56:10

Salut ,

Tu étais sur la bonne piste lorsque tu as été dans les bibliothèques...
En fait il existe un "conflit" entre "recordset" de la référence DAO (celui que tu utilises) et celui de la référence ADO.
Donc tu vas dans les refs et tu décoches "Microsoft ActiveX Data Object library" et normalement c'est ok.

Répondre à mouste2

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

skanel, le jeudi 30 septembre 2004 à 10:04:26

Hello

En effet, ça marche maintenant... Sauf que je ne sais pas coment on récupère des valeurs...

Je voudrais ranger des valeurs de la table, que je lis grâce à

Do While TRefer.EOF = False

, récupérer les valeur des champs de TRefer. J'ai 4 champs (URR, Lot, Département et FullName) que j'aimerai ranger dans des variables locales (portant le même nom).

J'ai bêtement fait URR = TRefer.URR mais c'est sans succès.

Je dois avouer que je suis une débutante et que ça fait que 2 semaines que je bosse là dessus, alors je m'excuse si la question est un peu bêbête.

Merci pour la premuère réponse et d'avance aussi !

Répondre à skanel

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

mouste2, le jeudi 30 septembre 2004 à 10:18:59

Salut,

A mon avis tu devrais te trouver un tutorial sur le vba ;).
Pour récupérer les valeurs d'un objet de type recordset:

Trefer.Fields("nomDuChamp").Value

Répondre à mouste2

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

JAROD, le jeudi 30 septembre 2004 à 18:37:37

merci les gars vous m'avez permis de resoudre un probleme d'acces aux données qui me fatiguais depuis.
1000 fois merci pour l'info sur les librairies

Répondre à JAROD

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

skanel, le vendredi 1 octobre 2004 à 10:31:52

Justement, je cherche un bon tutoriel VBA qui a tout dedans, peut-être que tu saurais me dire lequel est le mieux?... :D

Et merci pour ta patiente, ô sage maître du VB

Répondre à skanel

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

Max, le vendredi 1 octobre 2004 à 10:39:27

Bonjour il y a des exemple et explication sur ce site en anglais parcontre

http://www.fontstuff.com/vba/index.htm

Répondre à Max

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

JAROD, le vendredi 1 octobre 2004 à 11:06:46

Salut. Voici un autre site qui j'espere te satisfera.( en tout cas c'est ce site qui m'aide souvent)

http://www.info-3000.com/access/index.php

Répondre à JAROD

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

khaliltarek, le vendredi 1 octobre 2004 à 12:27:58

surement que tu dois avoir un recordset de trop . tu dois decocher une des references pour pouvoir enlever le mauvais recordset.

la methode que tu peus utiliser est
Set MaDB = CurrentDb()
Set TRefer = MaDB.OpenRecordset("T_URR_Lots")

Répondre à khaliltarek

Ce message vous semble utile, votez !
Signaler ce message aux modérateurs

mohammed, le lundi 4 octobre 2004 à 22:17:46

salut,
je crois que les recordset sont déclarer comme suit:
Dim TRefer As DAO.Recordset
Dim Temp1 As DAO.Recordset
Dim Temp2 As DAO.Recordset
Dim Result As DAO.Recordset
a+.
Merci

Répondre à mohammed

Posez votre question Répondre

Résultats pour [VB Access] Problème de Recordset

Zone de liste VBA/Access (Résolu) Salut à tous je cherche de l'aide pour VBA/Access en faite je veux à partir d'une zone de liste choisir des elements en cliquant sur l'element choisi , les afficher dans une autre zone de liste et les récuperer. merci à tous www.commentcamarche.net/forum/affich-7555434-zone-de-liste-vba-access

Dépassement de capacité vba access (Résolu) salut à tous, je dévelloppe avec vba access et lorsque j'essaie d'effectuer l'opération suivante j'obtiens un dépassement de capacité: dim h as integer h= 12*3600 j 'ai essayer de mette h en long mais ca ne change rien si je... www.commentcamarche.net/forum/affich-2897775-depassement-de-capacite-vba-access

Vba access pb de connection bdd et pb requète (Résolu) Bonjour, J'ai un problème avec ce code il ne fonctionnent pas. je travail sur access 2007 pour un projet qui sera sur access 2003 et j'utilise un livre sur le vba access 2002. Voilà le code: Private Sub cmdEnreg_Click() Dim db As Connection... www.commentcamarche.net/forum/affich-6596950-vba-access-pb-de-connection-bdd-et-pb-requete

1 2 3 Suivant

Résultats pour [VB Access] Problème de Recordset

VBA Un timer une seconde tout simpleEn VBA, il n'y a pas (du moins à ma connaissance) de composant Timer. On peut en créer un très facilement. Dans un module de feuille Private Sub Worksheet_SelectionChange(ByVal Target As Range) 'Pour exemple d'application : Démarre/Arrête le... www.commentcamarche.net/faq/sujet-10315-vba-un-timer-une-seconde-tout-simple

1 2 3 Suivant

Résultats pour [VB Access] Problème de Recordset

[ACCESS-VBA]-Vérifier la présence d'une table (Résolu)Bonjour, Je souhaiterai savoir comment on peut vérifier la présence d'une table sous VB ACCESS ? Car j'aimerai effectuer un test au début Si la table existe alors on fait sinon on la créée Pour le moment je supprime la table manuellement... www.commentcamarche.net/forum/affich-3277743-access-vba-verifier-la-presence-d-une-table

Macro vba [ouvrir un fichier] (Résolu)Bonjour. Je travaille ac VBA ACCESS et je souhaite ouvrir un fichier .doc par exemple par l'intermédiaire d'une macro. J'ai trouvé une fonction de macro qui se nomme 'Executer Apllication', cette fonction posséde un seul... www.commentcamarche.net/forum/affich-1294896-macro-vba-ouvrir-un-fichier

Récupérer des données dans une requete (Résolu)Bonjour, Je souhaiterai savoir comment récupérer et/ou afficher le résultat d'une requête SQL avec VB Access Voila ma requete SELECT * FROM Tb_NIP_Exclus Je voudrais voir si elle prend correctement mes valeurs Merci d'avance www.commentcamarche.net/forum/affich-3269732-recuperer-des-donnees-dans-une-requete

1 2 3 Suivant