> Tous les forums > Forum Autres langages
 Probleme avec un Recordset sous VBA pour Access2k
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
AT
  Posté le 30/04/2004 @ 14:54 
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:26 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

bonjour, essaie ça, en tenant compte de ce que j'ai mis en rouge : [code] Dim test as Recordset Set test = CurrentDb.OpenRecordset("SELECT [EmployeeTable].EmployeeNumber, [EmployeeTable].FamilyName FROM EmployeeTable WHERE [EmployeeTable].FamilyName= """ & Me![Name] &""") EmployeeNumber.Text = test("EmployeeNumber") [/code]
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
199,99 €Ecran 23,8 pouces Acer Nitro XV240Y (FullHD, IPS, 1 ms, 165 Hz, FreeSync; pied réglable) à 199,99 €
Valable jusqu'au 28 Juin

La Fnac fait une promotion sur l'écran 23,8 pouces Nitro XV240YPbmiiprx qui passe à 199,99 € alors qu'on le trouve ailleurs à partir de 259 €. Cet écran dédié aux joueurs dispose d'une dalle IPS Full HD de 1920x1080 pixels. Grâce à sa compatibilité Freesync et Gsync (165Hz) et son temps de réponse rapide de 1 ms, ce moniteur Acer offre une excellente fluidité d'affichage. Interfaces : 2 x HDMI, DP (1.2), Sortie de ligne audio. Pied ergonomique avec réglage de l'inclinaison, de la hauteur, du panoramique et de la rotation.


> Voir l'offre
16 €Clé USB 3.0 Sandisk Ultra 128 Go à 16 €
Valable jusqu'au 28 Juin

Amazon propose la clé USB Sandisk Ultra d'une capacité de 128 Go à 16 €. On la trouve ailleurs à partir de 20 €. Cette clé USB 3.0 est compatible USB 2.0 et offre de bons débits d'environ 100 Mo/s en lecture et en écriture. Le connecteur est rétractable pour éviter qu'il prenne la poussière.


> Voir l'offre
249,99 €Ecran PC incurvé 27 pouces Gigabyte G27QC (QHD, 165 Hz) à 249,99 €
Valable jusqu'au 28 Juin

TopAchat fait une promotion sur l'écran PC incurvé 27 pouces Gigabyte G27QC qui passe à 249,99 €. On le trouve ailleurs à partir de 349,99 €. Cet écran possède une dalle incurvée 27 pouces VA QHD (2560x1440) à 1 ms et à 165 Hz (FreeSync Premium et Adaptive Sync). Elle offre le HDR400 et intègre 2 haut-parleurs 2W et 2 ports USB 3.0. Son pied est réglable en hauteur et en inclinaison.


> Voir l'offre

Sujets relatifs
problème avec tomcat eclipse sous linux
Problème avec WinPython - Spyder
macro excell pour ouverture fichier avec password
Problème avec les espaces C++
Problème pour un batch urgent, veuillez lire svp
problème avec un parametre de requete preparée MVC
Problème Access avec 2 inner join
////// Probléme avec Idman 6.50 \\\
Problème sous vb
problème avec JTextField
Plus de sujets relatifs à Probleme avec un Recordset sous VBA pour Access2k
 > Tous les forums > Forum Autres langages