> Tous les forums > Forum Bureautique
 Utilisation d'un Recordset sous Access 2000
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
AT
  Posté le 30/04/2004 @ 14:44 
Aller en bas de la page 
Nouvel astucien
Bonjour, Je travaille sur Access 2000 sous Windows 2000 et j'essaie d'ecrire un petit morceau de code pour mettre a jour le contenu d'un controle "Textbox" a partir du resultat d'une requete. Voici le code que j'essaie de faire tourner: Dim test as Recordset Set test = CurrentDb.OpenRecordset("SELECT [EmployeeTable].EmployeeNumber, [EmployeeTable].FamilyName FROM EmployeeTable WHERE [EmployeeTable].FamilyName= " & Me![Name], 2) EmployeeNumber.Text = test("EmployeeNumber") Au moment de l'execution, j'ai un message d'erreur "Too few parameters. Expected 2" et l'execution s'arrete sur la deuxieme ligne de code. Je ne vois pas d'ou vient l'erreur. Pouvez-vous m'aider? J'ai essayer de voir ce qu'il se passait si je faisais pointer l'objet test vers une table plutot que sur une requete SQL. J'ai teste le code suivant: Dim test as Recordset DoCmd.SetWarnings False SQL_Select = "SELECT EmployeeTable.EmployeeNumber INTO T_Extract_EmployeeNum FROM EmployeeTable WHERE EmployeeTable.FamilyName='" & Me![Name] & "'" DoCmd.RunSQL (SQL_Select) Set test = CurrentDb.OpenRecordset("T_Extract_EmployeeNum", DB_OPEN_TABLE) EmployeeNumber.Text = test("EmployeeNumber") L'execution s'arrete sur la ligne 4 et j'ai le message "Type mismatch". La table "T_Extract_EmployeeNum" est pourtant correctement creee. La encore, je ne vois pas d'ou vient le probleme. Pouvez-vous m'aider? Merci d'avance!
Publicité
baptiste
 Posté le 30/04/2004 à 16:25 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
244,99 €Ecran 28 pouces Acer Nitro XV280Kbmiiprx (4K, IPS) à 244,99 €
379,99 € -36%

Cdiscount fait une belle promotion sur l'écran 28 pouces Acer Nitro XV280Kbmiiprx (4K 3840x2160, IPS) à 244,99 € au lieu de 379,99 €. 2 ports HDMI et 1 port DP.


Voir l'offre
1,70 €Rallonge USB 2.0 3 mètres à 1,70 €
4 € -58%

Amazon fait une promotion sur la rallonge USB 2.0 d'une longueur 3 mètres qui passe à 1,70 € au lieu de 4 €. D'autres longueurs sont également en promotion : 1 mètre à 1,20 €, 2 mètres à 0,98 € et 5 mètres à 2,70 €


Voir l'offre
22,99 €Pack Amazon Echo Dot + une prise connectée Meross à 22,99 €
41,99 € -45%

Amazon fait une promotion sur le pack comprenant une enceinte connectée Amazon Echo Dot (3ème génération) + une prise connectée Meross Smart Plug à 22,99 € au lieu de 41,99 € seulement. Avec ce pack, vous pourrez contrôler l'appareil branché sur la prise à la voix, faire des routines, planifier des démarrages/extinctions avec une appli sur votre smartphone, ...


Voir l'offre
292,99 €Imprimante 3D Artillery X2 Sidewinder (300x300x400 mm) à 292,99 €
370 € -21%

Geekbuying fait une belle vente flash sur l'imprimante 3D Artillery X2 Sidewinder qui passe à 292,99 € avec le code promo NNNFRBEMIN alors qu'on la trouve ailleurs autour de 370 €. Notez qu'en payant par Paypal, vous bénéficierez de 10 € de remise supplémentaire.

Il s'agit de l'une des machines les plus populaires actuellement sur le marché. Elle est très bien équipée avec un large volume d'impression (300x300x400 mm), une carte contrôleur 32 bits, le nivellement automatique, un extrudeur direct drive, double moteurs en Z, un plateau ultrabase, la détection fin de filament, un plateau chauffant rapide, ….L'imprimante 3D est facile à assembler et le calibrage est aisé. 

L'envoi se fait depuis un entrepôt européen (Pologne). La livraison sera donc rapide et sans risque de douane.


Voir l'offre

Sujets relatifs
calendrier à jour sous Access 2000
Access 2000 - impression sous-état
requête avec regroupement sous ACCESS 2000
formulaire sous access 2000[Resolu]
ACCESS 97 sous Windows 7 ou 8 ?
mettre outlook 2000 pro par défaut sous vista
transferer exel sous access
formulaire sous access 2007
access 2000 inaccessible
Erreur mise en forme conditionnelle sous Access
Plus de sujets relatifs à Utilisation d''un Recordset sous Access 2000
 > Tous les forums > Forum Bureautique