AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

  • Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2009 07 07 00:15:03
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

Sujet : Requete SQL "SELECT * " [ Archives Visual Basic / J'AI BESOIN D'AIDE !!!! :) ] (tapas64)

jeudi 29 juillet 2004 à 16:09:31 | Requete SQL "SELECT * "

tapas64
Bonjour.
J'ai deux tables access, Medecin et Identification construites comme suit:
Medecin(CodeM, NomM, ServiceM...)
Identification(CodeM, MotDePasseI)

Voici ce que j'ai fait pour réaliser l'étape de connexion de l'appli que je programme:

'Recupérer le mot de passe pour établir la connexion
Set rs = db.OpenRecordset("SELECT * FROM [MEDECIN], [IDENTIFICATION] WHERE [MEDECIN].[NomM] = '" + LeNomDuMedecin + "' AND [IDENTIFICATION].[MotDePasseI] = '" + LePasseSaisi + "';", , dbForwardOnly)
Do While Not rs.EOF
rs.MoveNext
Loop
Nb = rs.RecordCount
'Récupérer le nom du service correspondant à ce médecin
???????????????????????????????????
Service.Text = rs!ServiceM
codeMedecin = rs!CodeM
????????????????????????????????????

'Traiter les cas d'erreur
If Nb = 0 Then
MsgBox ("L'utilisateur n'est pas déclaré!")
Exit Sub
Else

Fenetre2.Show
Unload Me
End If


La requete select * permet de prendre en compte tous les champs. Seulement une fois l'utilisateur identifié, je voudrais récupérer le nom du service ServiceM et le codeMedecin CodeM, ce que j'ai essayé de faire avec les lignes entre les points d'interrogation. Mais rien à faire, je n'arrive pas à les récupérer.
Quelqu'un peut-il m'aider?
Merci d'avance

tapas64
jeudi 29 juillet 2004 à 16:31:53 | Re : Requete SQL "SELECT * "

stabe
Réponse acceptée !
bonjour,

D'abord, il ne faut pas oublier la jointure entre tes 2 tables.
Ensuite, si tu parcours ton recordset (avec ta boucle While), tu te retrouves à la fin et donc il n'y a plus de valeur à lire.

Set rs = db.OpenRecordset("SELECT [IDENTIFICATION].ServiceM, [IDENTIFICATION].CodeM FROM [MEDECIN], [IDENTIFICATION] WHERE [MEDECIN].[CodeM] = [IDENTIFICATION].[CodeM] AND [MEDECIN].[NomM] = '" & LeNomDuMedecin & "' AND [IDENTIFICATION].[MotDePasseI] = '" & LePasseSaisi & "';", , dbForwardOnly)

if not rs.EOF then
Service.Text = rs!ServiceM
codeMedecin = rs!CodeM
else
MsgBox ("L'utilisateur n'est pas déclaré!")
end if

-- stabe --
jeudi 29 juillet 2004 à 16:54:51 | Re : Requete SQL "SELECT * "

tapas64
Réponse acceptée !
Merci.
J'ai mis ce que tu m'as donné mais ca ne marche toujours pas. Service.text et codeMedecin sont vide et nul.
Est-ce que ca peut etre a cause de la jointure? Je ne sais pas comment utiliser ca.
tapas64
jeudi 29 juillet 2004 à 17:08:54 | Re : Requete SQL "SELECT * "

tapas64
Réponse acceptée !
Autant pour moi c'est moi qui a fait une betise. Ca marche impec, merci bcp.
tapas64


Cette discussion est classé dans : rs, select, identification, medecin, codem

Répondre à ce message

Sujets en rapport avec ce message

Resultat requete SQl [ par tapas64 ] Bonjour,Je programme un logiciel médical qui fonctionne avec une base de données AccessJ'ai réalisé l'étape de connexion à l'aide d'une requete sql, q Probleme de syntaxe de requete SELECT SQL [ par Stass ] Salut à tous,J'arrive pas a faire mon select comme je le voudraisCa ca marche :Set rs = cn.Execute("SELECT [X], [Y] FROM Coordonnees WHERE NomDroite = datagrid et textbox.... [ par Arkarch ] Bonjour, j'ai une question qui va ptetre vos paraitre bete mais voilà : J'ai un datagrid qui pompe un fichier .mdb j'ai fait :Set rs = New ADODB.Con adaptation des modules en ADO.NET [ par chebmo90 ] salut j'ai un petit problème, je veux transformer un morceau de code en ADO.NET" Dim rs As New ADODB.Recordset Dim rsbase As New ADODB.Record du mal a recuperrer ma somme [ par vb_shootinsplif ] Bonjour ,j'ai un SELECT tout ce qu'il y a de plus normal sql = "SELECT sum(montant) FROM depenses ;"            et apres je fais : Lab_tota Requete avec un select [ par Sinople94 ] Bonjour tout le monde,Je travail sur un projet en vb6 et une base de donnee access en ADO et je voudrai recuperer les resultat d une de mes requetes, Problème avec un Select sum [ par scoubidou79 ] Encore moi désolé,je désire faire une somme de l'un de mes champs et l'attribuer a une variable. J'obtiens le message d'erreur " "Dim MaBase As String Dialog box VBA [ par rouvebp ] Mon problème: Je voudrais, aprés lancement de la macro, que s' ouvre une boite de dialoque dans laquelle je pourrais choisir le fichier à ouvrir. Dans Prob SQL/Access Utilisation non autorisee de Null [ par krafi ] Bonjour,je rencontre un problème, que je n'arrive pas à resoudre. Lorsque que je parcours les champs de ma bd access, si l'un d'eux est null, ca va m erreur '3061' openRecordset [ par el_teedee ] Slt, je suis en stage en allemagne, j'utilise donc access en allemand (soyez indulgents, si je trouve pas tout tout seul ^^)j'ai repris le post concer


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :

Comparez les prix Nouvelle version


Samsung CLX-3175FW Multifunction Laser Colour Printer Laser
Entre 389€ et 469€


Visiter le guide achat

Photothèque Nouveau !

Photo sitges beachPhoto Cockpit Airbus A320
Photo femme, plage, bien être, soleil, vacances, été, détente, reposPhoto young pretty girl

Visiter la photothèque


Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,484 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.