> 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
69,99 €SSD Crucial BX500 1 To à 69,99 €
85 € -18%

Amazon propose actuellement le SSD Crucial BX500 1 To à 69,99 €. Ce SSD offre des débits de 540 Mo/s en lecture et 500 Mo/s en écriture. Le SSD est accompagné du logiciel Acronis true image qui vous permettra de transférer tout le contenu de votre ancien disque dur sur le SSD. Il est garanti 3 ans.


Voir l'offre
77,18 €Alimentation PC modulaire EVGA SuperNOVA 650 GT 650W (80+ Gold) à 77,18 € livrée
90 € -14%

Amazon Allemagne fait une belle promotion sur l'alimentation PC modulaire EVGA SuperNOVA 650 GT 650W qui passe à 68,47 € (avec la TVA ajustée). Comptez 8,71 € pour la livraison en France soit un total de 77,18  € livrée au lieu de 90  € ailleurs €. Cette alimentation certifiée 80Plus Gold offre un rendement jusqu'à 92%. Disposant d'une conception 100% modulaire, connectez uniquement les câbles dont vous avez besoin pour économiser de la place au sein de votre tour et améliorer le flux d'air. Elle est garantie 7 ans.


Voir l'offre
69,99 €SSD Crucial P5 Plus 500 Go (3D NAND, NVMe, PCIe 4.0, M.2, 6600 Mo/s) à 69,99 €
94 € -26%

Amazon fait une promotion sur le SSD Crucial P5 Plus 500 Go (3D NAND, NVMe, PCIe 4.0, M.2) qui passe à 69,99 € livré gratuitement. On le trouve ailleurs à partir de 94 €. Ce SSD offre des vitesses de lecture/écriture séquentielle allant jusqu’à 6600/ 3 000 Mo/s. Il est garanti 5 ans.

Cette version Plus est compatible PCIe 4.0. Vous pouvez donc aussi l'utiliser avec la console de jeux PS5.


Voir l'offre
499,00 €Portable Dell Inspiron 15 3511 (15.6 pouces IPS, FullHD, Core i5, 8Go, SSD 256Go) à 499 €
679 € -27%

Amazon fait une belle promotion sur l'ordinateur portable Dell Inspiron 15 3511 qui passe à 499 € alors qu'on le trouve ailleurs à partir de 679 €. Cet ordinateur possède un écran 15,6 pouces Full HD IPS, un processeur Intel Core i5-1135G7 avec chip graphique Iris Xe intégré, 8 Go de RAM et un SSD de 256 Go. Le tout tourne sous Windows 11.

Un PC adapté à la bureautique et au multimédia.


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