FORUM Syndrome-OC - Jacky-PC


  Programmation


  Langage haut niveau(C, Pascal...)


  Forms.nomformulaire!nomchamp sa veut pas marcher sous VB !

 
 




flavius424, nicodache Achat/vente : meuhsammy Le salon de discussion : Endeavour WaterCooling & TEC (Peltiers) : spittt, 1 utilisateur anonyme et 26 utilisateurs inconnus

S'identifier | S'inscrire | Aide
 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Forms.nomformulaire!nomchamp sa veut pas marcher sous VB !

n°5295
BUZZ-
Posté le 25-03-2005 à 14:50:43  profilanswer
 

Function Mailtracking()
 
Dim db As Database
Dim rs As DAO.Recordset
Dim Nom As String
Dim Prenom As String
Dim Mail As String
Dim Tracking As String
Dim X
 
Set db = CurrentDb
Set rs = db.OpenRecordset("SELECT Code_Client, Nom_client, Prenom_Client, Mail_Client, Num_Tracking_Cmd FROM CLIENTS, COMMANDES_CLIENTS WHERE (((CLIENTS.Code_Client)=([COMMANDES_CLIENTS].[#Code_Client]) AND (CLIENTS.Code_Client)=Forms.[COMMANDES_CLIENTS]![Client]));" )
 
Nom = rs.Fields("Nom_Client" )
Prenom = rs.Fields("Prenom_Client" )
Mail = rs.Fields("Mail_Client" )
Tracking = rs.Fields("Num_Tracking" )
 
MsgBox ("Test:" & Nom & Prenom & Mail & Tracking & "Fin" )
 
 
 
'X = Shell("msimn.exe " & "/mailurl:mailto:" & Mail, vbNormalFocus)'
 
End Function
 
Voila mon Code doit marcher, le seul Bug c'est que dans la Requette SQL, il ne comprend pa le Forms.[COMMANDES_CLIENTS]![Client]
quelqun sait comment faire comprendre a VB que c'est dans le formulaire ouvert qu'il faut chercher ?
J'ai tester ma Requette ss Access elle marche nickel...

mood
Google
Posté le 25-03-2005 à 14:50:43  profilanswer
 

n°5296
nicodache
marmotte en chocolat concept ©
Posté le 25-03-2005 à 15:07:04  profilanswer
 

Code :
  1. Function Mailtracking()
  3.     Dim db As Database
  4.     Dim rs As DAO.Recordset
  5.     Dim Nom As String
  6.     Dim Prenom As String
  7.     Dim Mail As String
  8.     Dim Tracking As String
  9.     Dim X
  11.     Set db = CurrentDb
  13.     String tagada_plop = "SELECT code_client, nom_client, prenom_client, mail_client, num_tracking_Cmd "
  14.     tagada_plop .= "FROM clients, commandes_clients "
  15.     tagada_plop .= "WHERE (CLIENTS.Code_Client = [COMMANDES_CLIENTS].[#Code_Client]) AND (CLIENTS.Code_Client = Forms.[COMMANDES_CLIENTS]![Client]);"
  17.     Set rs = db.OpenRecordset(tagada_plop)
  19.     Nom = rs.Fields("nom_client" )
  20.     Prenom = rs.Fields("prenom_client" )
  21.     Mail = rs.Fields("mail_client" )
  22.     Tracking = rs.Fields("num_tracking" )
  24.     MsgBox ("Test:" & Nom & Prenom & Mail & Tracking & "Fin" )
  26.     'X = Shell("msimn.exe " & "/mailurl:mailto:" & Mail, vbNormalFocus)'
  28. End Function


 
et je trouve le VB toujours aussi hideux :o
c'est une manie de foutre des majuscules partout, même dans les reqûetes SQL, et de rendre son code pas lisible ?
 
[edit]notez que je connais rien au VB, mais je vais essayer de répondre quand même :D
 
 
bon, c'est pas plutot un "." qu'il te faut entre ton identifiant de form, et le champ qu'il contient ?
ou un _ ?
ca dépend des langages, mais je savais pas que microsoft avait trouvé le moyen de rentabiliser le ! en programmation, autremenent que par les tests d'inégalité (!=)...


Message édité par nicodache le 25-03-2005 à 15:10:05

---------------
modérateur inside [:nicodache] plankaivoo [:nicodache] - ici powered - Je roule en micra 1l 55cv et je t'emmerde :o
n°5297
Deadog
Dain Bramaged
Posté le 25-03-2005 à 15:45:04  profilanswer
 

nico > dans le SQL "la norme" est d'écrire les commandes en maj et la variable/champ en min


Message édité par Deadog le 25-03-2005 à 15:45:32

---------------
* On sais qu'on est un ingénieur si on n'a pas de vie social et qu'on peux le prouver mathématiquement
* "pluralitas non est ponenda sine necessitate" (Les choses essentielles ne doivent pas être multipliées sans nécessité) Guillaume d'Ockham
n°5298
nicodache
marmotte en chocolat concept ©
Posté le 25-03-2005 à 16:51:07  profilanswer
 

ddg : c'est bien ce que je me dis aussi...
c'est d'ailleurs ce que je fais dans le code php/mysql que je crée pour mon stage de fin d'étude ;)


---------------
modérateur inside [:nicodache] plankaivoo [:nicodache] - ici powered - Je roule en micra 1l 55cv et je t'emmerde :o
n°5299
BUZZ-
Posté le 25-03-2005 à 21:32:11  profilanswer
 

Pour le coup des Maj/Min, moi je m'y retrouve mieu comme sa et comme l'as dit deadog c'est comme une norme...
Et pour le "!" en theorie sa marche, vu que ma requette ss Access fonctionne... par contre mon doute c sous VB quoi...
Help ...

n°5318
BUZZ-
Posté le 29-03-2005 à 23:09:25  profilanswer
 

Personne ?  :pt1cable:  
Erf... me mank ke sa pr terminer mon action pro a 100%...

n°5719
BUZZ-
Posté le 23-05-2005 à 15:05:11  profilanswer
 

Remonte petit Topic, Remonte !
En fait je sait pas si d'autres se sont penchés sur le pb depuis, mais en relisant vite fait, il me semble avoir omis de dire que dan sma requette, je fait appel au sousformulaire contenu dans le formulaire ouvert... ce qui me pose tjrs des probleme, et qui n'est pa slogique c'est que sous Access, ma requette fonctionne a merveille...
HELP
(dans l'aprem jvai devoir faire un autre topic lol en parallelle avec VBFrance.fr, car dans le cadre de mon stage j'ai un prog a dev et je sent que je vais avoir besoin d'aide....)
Merci a tous  :hello:


---------------
uuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuuhhhhhhhhhhhhhhhhhhhhhh
mood
Google
Posté le 23-05-2005 à 15:05:11  profilanswer
 


Aller à :
Ajouter une réponse

  FORUM Syndrome-OC - Jacky-PC


  Programmation


  Langage haut niveau(C, Pascal...)


  Forms.nomformulaire!nomchamp sa veut pas marcher sous VB !

 

Plan du forum
Forum MesDiscussions.Net, Version 2007.3
(c) 2000-2008 Doctissimo Software
Page générée en 0.052 secondes
Hit Parade