Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
2579 connectés 

  FORUM HardWare.fr
  Programmation

  [VB6] Ti Probleme

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

[VB6] Ti Probleme

n°45423
neokill@h
Tss tss tss!!
Posté le 09-07-2001 à 16:50:02  profilanswer
 

Voila le probleme:
J'ai créé une fonction en VB qui permet d'envoyer automatiquement des emails.
Les adresses emails se trouvent dans une base Access.
J'utilise la fonction Shell qui me permet d'exécuter Outlook Express. Voici la syntaxe:
 
Shell("start mailto:" & email & "?Subject=" & subject & "&Body=" & body & "", vbHide)
 
subject est une variable de type string, de même que body
 
Le probleme vient que lorsque il y a un espace dans la variable tout part en sucette.
Par ex, lorsque la variable subject contient "Demande de partenariat", dans la fenêtre  
'Nouveau message' de Outlook, il y a juste "Demande" dans la zone 'Sujet'.
 
Pourquoi? Aidez moi svp

mood
Publicité
Posté le 09-07-2001 à 16:50:02  profilanswer
 

n°45426
youdontcar​e
Posté le 09-07-2001 à 16:55:35  profilanswer
 

essaye peut être de mettre entre guillements :
 
Shell("start mailto:" & "\"" & email ...
 
ou de remplacer les espaces par leur caractère ascii (%20 ou & #x20; )

n°45437
neokill@h
Tss tss tss!!
Posté le 09-07-2001 à 17:08:09  profilanswer
 

Merci youdontcare pour ton aide.
 
J'ai essayé tout ce que tu as suggéré mais ca ne marche pas :(
En remplacant avec les guillemets, il y a une erreur de syntaxe.
Et en utilisant le code ASCII, ca me fait toujours le même probleme avec l'espace.
 
Plz HELPPPPPP!

n°45455
youdontcar​e
Posté le 09-07-2001 à 17:47:21  profilanswer
 

tu as bien encadré la string avec les guillemets ? j'avais pas précisé, mais bon ... genre "\"" & email & "\""
 
sinon remplacer ces espaces avec un %20 fait que ta string ne contient justement plus d'espaces ... bizarre que ça ne marche pas.

n°45481
Bendes
Posté le 09-07-2001 à 20:57:13  profilanswer
 

Subject = Replace(Subject," ","%20",1,,vbTextCompare)
Body = Replace(Body," ","%20",1,,vbTextCompare)
 
Shell("start mailto:" & email & "?Subject=" & subject & "&Body=" & body & "", vbHide)
 
C'est ce que je fais pour n de mes programme et ça marche, le seul truc c'est que j'emploie une API pour faire le Shell...

n°45483
Kyle_Katar​n
Posté le 09-07-2001 à 21:42:20  profilanswer
 

Utilise Kmail (ocx gratuti que j'ai codé) : (sur mon site)

n°45534
neokill@h
Tss tss tss!!
Posté le 10-07-2001 à 09:40:50  profilanswer
 

Ca marche! Merci à tous pour votre aide.

n°45620
Kyle_Katar​n
Posté le 10-07-2001 à 12:29:32  profilanswer
 

l'avantage de mon kmail est que tu peux aussi attacher des pièces jointes (qu'il encode lui même en base64)


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation

  [VB6] Ti Probleme

 

Sujets relatifs
[HTML] Probleme case tete avec un formulaire.[DirectX] Problème avec la fonction DrawText
[javascript] ptit probleme avec un formulaire[VB6] NotePad et WordPad
Pbm de compatibilité entre VB6 et Access 2000, ça commence a m'enerverki peux m'aider avec delphi (2.0) ???, probleme aprés compression
ki peux m'aider avec delphi (2.0) ???, probleme aprés compressionProblème avec unJavaScript qui marche pas !.... Help please ....
Ping en VB6[HTML] Probleme de bouffage de frame par Netscape !
Plus de sujets relatifs à : [VB6] Ti Probleme


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR