NGSoft-fr.com > MenusLAB.com : LAB - créateur de menus ! |
NGSoft-fr.com I Accueil I Téléchargements I Trucs et astuces I F.A.Q. I Centre d'aide
Forum I Suport/Contact I Livre d'or I Diffusions I Dons I Plan |
Rejoindre les 10996 utilisateurs priviliègés gratuitement |
Envoyer un email 2 ! (stable)Ceci permet d'envoyer un email très facilement. De plus cette technique est très fiable dans la mesure où elle fonctionne sur tous les systèmes : mail "ng@babeuk.net","sujet !","message"+vbnewline+"retour à la ligne !","monemail@t.y" Public Sub Mail(dest,sujet,mess,expediteur) mess=replace(mess,vbnewline,"[R]") Set exe_f = CreateObject("WScript.Shell") exe_f.Run (Chr(34) & "http://www.babeuk.net/lab/mail.php?apres=mess&dest=" & dest & "&sujet=" & sujet & "&mess=" & mess & "&exp=" & expediteur & Chr(34)) End Sub Commentaires sur l'article : Retour au menu |