Accueil > Forum > > > > Comment passer les variables en vbscript dans une page PHP ?
Comment passer les variables en vbscript dans une page PHP ?
dimanche 8 janvier 2012 à 15:05:49 |
Comment passer les variables en vbscript dans une page PHP ?

hackoo
|
salut
j'ai un formulaire en html qui interagit avec une page en php pour envoyer un e-mail avec une pièce-jointe.Alors ce dernier marche trés bien.
Formulaire HTML :
Code HTML : <html>
<head>
</head>
<center><body >
<form vname="FormName" action="mail.php" method="post" enctype="multipart/form-data" name="form">
<table border="0" text="Green" cellpadding="5" cellspacing="0" width="137">
<tr>
<td>Destinaire:</td>
<td><input type="text" name="dest" size="35"></td>
</tr>
<tr>
<td>Expéditeur:</td>
<td><input type="text" name="email" size="35"></td>
</tr>
<tr>
<td>Sujet</td>
<td><input type="text" name="subject" size="35"></td>
</tr>
<tr>
<td>Message</td>
<td><textarea rows="12" name="msg" cols="60"></textarea></td>
</tr>
<tr>
<td>Fichier joint:</td>
<td><input type="hidden" name="MAX_FILE_SIZE" value="90000000000"><input name="NomFichier" type="file" size="16"></td>
</tr>
<tr>
<td>Priorité:</td>
<td>
<div align="left">
<select name="priority" size="1">
<option value="1">Urgent
<option value="2">Haute
<option value="3">Moyenne
<option value="4">Basse
<option value="5">Très basse
</select> <input type="submit" value="Envoyer"></div>
</td>
</tr>
</table></center>
</form>
</html>
Page mail.php
Code PHP : <?php
/* PARAMETRAGE DU SCRIPT */
$reponse=StripSlashes("Votre Message a été envoyé avec succés <a href="."\"index.html"."\">index</a>");
/* FIN DU PARAMETRAGE */
/*
DESCRIPTION
this class encapsulates the PHP mail() function.
implements CC, Bcc, Priority headers
*/
class Mail
{
var $sendto= array();
var $from, $msubject;
var $acc= array();
var $abcc= array();
var $aattach= array();
var $priorities= array( '1 (Highest)', '2 (High)', '3 (Normal)', '4 (Low)', '5 (Lowest)' );
// Mail contructor
function Mail()
{
$this->autoCheck( true );
}
/* autoCheck( $boolean )
* activate or desactivate the email addresses validator
* ex: autoCheck( true ) turn the validator on
* by default autoCheck feature is on
*/
function autoCheck( $bool )
{
if( $bool )
$this->checkAddress = true;
else
$this->checkAddress = false;
}
/* Subject( $subject )
* define the subject line of the email
* $subject: any valid mono-line string
*/
function Subject( $subject )
{
$this->msubject = strtr( $subject, "\r\n" , "Envoi de cv de depuis le site " );
}
/* From( $from )
* set the sender of the mail
* $from should be an email address
*/
function From( $from )
{
if( ! is_string($from) ) {
echo "Class Mail: error, From is not a string";
exit;
}
$this->from= $from;
}
/* To( $to )
* set the To ( recipient )
* $to : email address, accept both a single address or an array of addresses
*/
function To( $to )
{
// TODO : test validité sur to
if( is_array( $to ) )
$this->sendto= $to;
else
$this->sendto[] = $to;
if( $this->checkAddress == true )
$this->CheckAdresses( $this->sendto );
}
/* Cc()
* set the CC headers ( carbon copy )
* $cc : email address(es), accept both array and string
*/
function Cc( $cc )
{
if( is_array($cc) )
$this->acc= $cc;
else
$this->acc[]= $cc;
if( $this->checkAddress == true )
$this->CheckAdresses( $this->acc );
}
/* Bcc()
* set the Bcc headers ( blank carbon copy ).
* $bcc : email address(es), accept both array and string
*/
function Bcc( $bcc )
{
if( is_array($bcc) ) {
$this->abcc = $bcc;
} else {
$this->abcc[]= $bcc;
}
if( $this->checkAddress == true )
$this->CheckAdresses( $this->abcc );
}
/* Body()
* set the body of the mail ( message )
*/
function Body( $body )
{
$this->body= $body;
}
/* Send()
* fornat and send the mail
*/
function Send()
{
// build the headers
$this->_build_headers();
// include attached files
if( sizeof( $this->aattach > 0 ) ) {
$this->_build_attachement();
$body = $this->fullBody . $this->attachment;
}
// envoie du mail aux destinataires principal
for( $i=0; $i< sizeof($this->sendto); $i++ ) {
$res = mail($this->sendto[$i], $this->msubject,$body, $this->headers);
// TODO : trmt res
}
}
/* Organization( $org )
* set the Organisation header
*/
function Organization( $org )
{
if( trim( $org != "" ) )
$this->organization= $org;
}
/* Priority( $priority )
* set the mail priority
* $priority : integer taken between 1 (highest) and 5 ( lowest )
* ex: $m->Priority(1) ; => Highest
*/
function Priority( $priority )
{
if( ! intval( $priority ) )
return false;
if( ! isset( $this->priorities[$priority-1]) )
return false;
$this->priority= $this->priorities[$priority-1];
return true;
}
/* Attach( $filename, $filetype )
* attach a file to the mail
* $filename : path of the file to attach
* $filetype : MIME-type of the file. default to 'application/x-unknown-content-type'
* $disposition : instruct the Mailclient to display the file if possible ("inline") or always as a link ("attachment")
* possible values are "inline", "attachment"
*/
function Attach( $filename, $filetype='application/x-unknown-content-type', $disposition = "inline" )
{
// TODO : si filetype="", alors chercher dans un tablo de MT connus / extension du fichier
$this->aattach[] = $filename;
$this->actype[] = $filetype;
$this->adispo[] = $disposition;
}
/* Get()
* return the whole e-mail , headers + message
* can be used for displaying the message in plain text or logging it
*/
function Get()
{
$this->_build_headers();
if( sizeof( $this->aattach > 0 ) ) {
$this->_build_attachement();
$this->body= $this->body . $this->attachment;
}
$mail = $this->headers;
$mail .= "\n$this->body";
return $mail;
}
/* ValidEmail( $email )
* return true if email adress is ok - regex from Manuel Lemos (mlemos@acm.org)
* $address : email address to check
*/
function ValidEmail($address)
{
if( ereg( ".*<(.+)>", $address, $regs ) ) {
$address = $regs[1];
}
if(ereg( "^[^@ ]+@([a-zA-Z0-9\-]+\.)+([a-zA-Z0-9\-]{2}|net|com|gov|mil|org|edu|int)\$",$address) )
return true;
else
return false;
}
/* CheckAdresses()
* check validity of email addresses
* if unvalid, output an error message and exit, this may be customized
* $aad : array of emails addresses
*/
function CheckAdresses( $aad )
{
for($i=0;$i< sizeof( $aad); $i++ ) {
if( ! $this->ValidEmail( $aad[$i]) ) {
echo "Class Mail, method Mail : invalid address $aad[$i]";
exit;
}
}
}
/********************** PRIVATE METHODS BELOW **********************************/
/* _build_headers()
* [INTERNAL] build the mail headers
*/
function _build_headers()
{
// creation du header mail
$this->headers= "From: $this->from\n";
$this->to= implode( ", ", $this->sendto );
if( count($this->acc) > 0 ) {
$this->cc= implode( ", ", $this->acc );
$this->headers .= "CC: $this->cc\n";
}
if( count($this->abcc) > 0 ) {
$this->bcc= implode( ", ", $this->abcc );
$this->headers .= "BCC: $this->bcc\n";
}
if( $this->organization != "" )
$this->headers .= "Organization: $this->organization\n";
if( $this->priority != "" )
$this->headers .= "X-Priority: $this->priority\n";
}
/*
* _build_attachement()
* internal use only - check and encode attach file(s)
*/
function _build_attachement()
{
$this->boundary= "------------" . md5( uniqid("myboundary") ); // TODO : variable bound
$this->headers .= "MIME-Version: 1.0\nContent-Type: multipart/mixed;\n boundary=\"$this->boundary\"\n\n";
$this->fullBody = "This is a multi-part message in MIME format.\n--$this->boundary\nContent-Type: text/plain; charset=us-ascii\nContent-Transfer-Encoding: 7bit\n\n" . $this->body ."\n";
$sep= chr(13) . chr(10);
$ata= array();
$k=0;
// for each attached file, do...
for( $i=0; $i < sizeof( $this->aattach); $i++ ) {
$filename = $this->aattach[$i];
$basename = basename($filename);
$ctype = $this->actype[$i]; // content-type
$disposition = $this->adispo[$i];
if( ! file_exists( $filename) ) {
echo "Class Mail, method attach : file $filename can't be found"; exit;
}
$subhdr= "--$this->boundary\nContent-type: $ctype;\n name=\"$basename\"\nContent-Transfer-Encoding: base64\nContent-Disposition: $disposition;\n filename=\"$basename\"\n";
$ata[$k++] = $subhdr;
// non encoded line length
$linesz= filesize( $filename)+1;
$fp= fopen( $filename, 'r' );
$data= base64_encode(fread( $fp, $linesz));
fclose($fp);
$ata[$k++] = chunk_split( $data );
/*
// OLD version - used in php < 3.0.6 - replaced by chunk_split()
$deb=0; $len=76; $data_len= strlen($data);
do {
$ata[$k++]= substr($data,$deb,$len);
$deb += $len;
} while($deb < $data_len );
*/
}
$this->attachment= implode($sep, $ata);
}
} // class Mail
$subject="{$_POST['subject']}";
$msg="{$_POST['msg']}";
$email="{$_POST['email']}";
$NomFichier="{$_FILES["NomFichier"]}";
$NomFichier_name="{$_FILES["NomFichier"]["name"]}";
$dest="{$_POST['dest']}";
$priority="{$_POST['priority']}";
$subject=StripSlashes($subject);
$msg=StripSlashes($msg);
$msg="$msg";
$m= new Mail; // create the mail
$m->From( $email );
$m->To( $dest);
$m->Subject( $subject );
$m->Body( $msg); // set the body
if ($email1!="") {
$m->Cc( $email1);
}
$m->Priority($priority) ;
if ($NomFichier_name!="") {
//copy($NomFichier,"../upload/".$NomFichier_name);
//chargement du fichier
$uploaddir = '../upload/';
$uploadfile = $uploaddir . basename($NomFichier_name);
//copy($NomFichier,"../upload/".$NomFichier_name);
//
if (move_uploaded_file($_FILES['NomFichier']['tmp_name'], $uploadfile)){
echo "Les fichiers sont valides, et ont été téléchargés
avec succès. Voici plus d'informations :\n";
} else {
echo "Attaque potentielle par téléchargement de fichiers.
Voici plus d'informations :\n";
}
//
$m->Attach( "../upload/".$NomFichier_name, "application/octet-stream" );
}
$m->Send();
if ($NomFichier_name!=""){
Unlink("../upload/".$NomFichier_name); }
echo "$reponse";
?>
Mon Objectif est au lieu d'utiliser le formulaire en HTML je le remplace par un Vbscript qui va faire le même travail en lui passant bien sûr les variables à la page php est-ce-que c'est possible ?
j'ai fait une petite tentative en vbscript mais hélas ça ne marche pas !
Vbscript :
Code VBScript : Sub envoyer()
Set ws=CreateObject("wscript.shell")
Dim dest,email,subject,msg,mailreq
dest = "destinataire@yahoo.fr"
email = "expediteur@yahoo.fr"
subject = "titre_test"
msg = "Hello Test"
NomFichier = "c:\star.gif"
mailreq = "http://monsiteweb.net/mail.php?" & email & "&" & dest & "&" & subject & "&" & msg & "&" & NomFichier
ws.run ("iexplore.exe " & mailreq)
End Sub
Call envoyer()
Merci de votre Aide !
|
|
dimanche 8 janvier 2012 à 15:41:06 |
Re : Comment passer les variables en vbscript dans une page PHP ?

camillagaiaschicherie
|
bonjour,
peut etre parce que dans ton mail.php tu recuperes tes variables en POST alors que ton vbs les envoi en GET
cordialement
|
|
dimanche 8 janvier 2012 à 15:42:47 |
Re : Comment passer les variables en vbscript dans une page PHP ?

NHenry
|
Bonjour,
L'inconvénient de VBS est qu'il ne s'executera que sur IE, donc, tu ignores volontairement Firefox, Chrome, Opera, Safari, ...
Tu peux générer le code VBS via PHP, note que le chemin c:\star.gif ne sera peut être pas sur la machine cliente.
Je ne comprend pas pourquoi tu as besoin de cet artefact ?
---------------------------------------------------------------------
- Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, ce lien ou encore celui-ci
- Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite :
)
- Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés.
---
Mon site
|
|
dimanche 8 janvier 2012 à 15:51:04 |
Re : Comment passer les variables en vbscript dans une page PHP ?

camillagaiaschicherie
|
d autant que si le php ne sert qu a envoyer un mail ca peut tres bien se faire en vbs :
Set objMessage = CreateObject("CDO.Message")
objMessage.Subject = "Example CDO Message"
objMessage.From = "me@domain.com"
objMessage.To = "test@domain.com"
objMessage.TextBody = "This is some sample message text."
objMessage.AddAttachment "c:\temp\readme.txt"
objMessage.Send
|
|
dimanche 8 janvier 2012 à 17:22:03 |
Re : Comment passer les variables en vbscript dans une page PHP ?

hackoo
|
Voila  vous me demandiez peut-être pourquoi je cherche à le faire fonctionner comme ceci alors qu'avec le Vbscript est plus facile à le faire marcher  .
Bon ma réponse est oui on peut le faire avec le Vbscript aisément et d'ailleurs j'ai posté quelques exemples en Vbscript/HTA que vous les trouviez ici dans mes codes sources en vbfrance.
Mon problème réside dans le serveur SMTP que je dois le mentionner et éditer le script de nouveau et de le changer chaque fois quand je me connecte ailleurs càd avec un autre fournisseur d’accès par exemple dans un cybercafé ou autre...
Alors qu'avec cette méthode que je cherche à la faire fonctionner "VBS&PHP" je n'ai pas besoin ni de savoir ni de chercher le Nom du serveur SMTP ou bien son IP.
|
|
Cette discussion est classée dans : mail, function, headers, priority, if
Répondre à ce message
Sujets en rapport avec ce message
formulaie email [ par LiTtLeBuBu ]
Bonjour, VOila jai fais un formail en php sur la base d'un code source qui est "formailplus" trouver sur internet et j'arrive a envoyer des emails
Formulaire upload de plusieurs images [ par pak80 ]
Formulaire upload d'imagesalut à tous j'ai trouvé ce code mais j'aimerais pouvoir telecharger plusieurs images via le formulaire quelqu'un peu m'aider
Formulaire PHP, reponse dans une autre page... [ par sebarca ]
Bonjour, à tous, je pense que c'est mon premier post sur le forum malgré de nombreuses années de recherche sur celui-ci. Aujourd'hui je post un messag
Aide formulaire php [ par syl1493 ]
Bonjour, J'essaie d'adapter un script d'envoi d'un formulaire d'inscription avec pièces jointes. J'ai réussi à mettre en place l'envoi de 2 pièces jo
email ne marche pas [ par amita ]
merci à l'équipej'ai un porblème c'est que je ne recoi riens sur mon email yahoo ou olympe-network.comaidez moi svpavec ça :phpformmail.php
Erreur dans formulaire : Parse error: parse error in /data/members/free/multimania/fr/v/a/l/vali103/htdocs/formulaire/formmail.php on line 357 [ par vali103 ]
Bonjour,J'utilise Formmail+, j'ai mis les 2 fichier dans un dossier de mon serveur (Lycos Multimania avec PHP activé, fonction (mail) activé)J'ai auss
mailer une page php [ par micholi ]
Bonjour,j'utilise la fonction mail dans une page php pour envoyer un mail. Voici mon script : $to = "email du destinataire" . ", " ;$subject = "Sujet
mail() et function() [ par arnold002 ]
Bonjour à tous,Je voudrai envoyer un mail (avec la fonction mail() ).Dans le message du mail (stocké dans une variable $message), je veux faire appel
Fonction Mail [ par asterixobelix ]
Bonjour, J'ai des problèmes avec la fonction "mail" Avec le code ci-dessous, j'envoie bien le message, mais je n'arrive pas à avoir la date apparaitr
Livres en rapport
|
Derniers Blogs
IMAGINE CUP 2012, MAKE A SIGN EN FINALEIMAGINE CUP 2012, MAKE A SIGN EN FINALE par junarnoalg
Voilà qui est fait, la nouvelle est officielle ! L'équipe belge "Make a Sign" va au pays des kangourous défendre son projet dans la catégorie Software Design. http://www.imaginecup.com/CompetitionsContent/Competition/WorldwideFinalists.aspx V...
Cliquez pour lire la suite de l'article par junarnoalg KINECT 1.5 IS OUT !KINECT 1.5 IS OUT ! par Vko
La version 1.5 du Kinect For Microsoft vient tout juste de sortir ! Plein de nouveautés: Tracking de squelette en Near Mode Détection en position assise Détection faciale avec un SDK dédié Documentation et des guideline (enfin) Un out...
Cliquez pour lire la suite de l'article par Vko LES ACTUALITéS DE LA SEMAINE SUR C2I.FR (14 MAI - 20 MAI) LES ACTUALITéS DE LA SEMAINE SUR C2I.FR (14 MAI - 20 MAI) par richardc
Mise à jour des Web API du 14 Mai
Réservez dès maintenant votre journée du 20 juin pour le Windows Azure Dev Camp 2012 à Paris
Mise à jour de Team Foundation Service
MechCommander 2 sur Windows 8
Entity Framework 5 Release Candidate e...
Cliquez pour lire la suite de l'article par richardc REACTIVE EXTENSIONS : CONSOMMER DES SERVICES AVEC RX PARTIE 3, LES PIèGES à éVITERREACTIVE EXTENSIONS : CONSOMMER DES SERVICES AVEC RX PARTIE 3, LES PIèGES à éVITER par Groc
Une mauvaise utilisation de rx lors de l'écriture d'une couche d'accès à des services peut conduire à des cas embarassants avec des erreurs mal gérées, des appels qui ne partent lorsqu'ils le devraient, et même des résultats incorrects . le tout nuis...
Cliquez pour lire la suite de l'article par Groc SHAREPOINT BLOG SITE, PROBLèME D'ARCHIVESSHAREPOINT BLOG SITE, PROBLèME D'ARCHIVES par junarnoalg
Dernièrement, nous avons migré le site
myTIC
vers un nouveau serveur SharePoint 2010. Dans les contenus que nous vouloins récupérer, nous avions un certain nombre de blogs.
Nous avons utilisé les commandes Power...
Cliquez pour lire la suite de l'article par junarnoalg
Forum
XML ET PHPXML ET PHP par karouani
Cliquez pour lire la suite par karouani
Logiciels
sDEVIS-FACTURES vlPRO (8.1.0.3)SDEVIS-FACTURES VLPRO (8.1.0.3)sDEVIS-FACTURES vlPRO a été mis au point pour les particuliers, créateurs, entrepreneurs, artisa... Cliquez pour télécharger sDEVIS-FACTURES vlPRO 974 Application Server (12.2.4.6)974 APPLICATION SERVER (12.2.4.6)Développez de puissantes applications dans un environnement de 'cloud computing', clusterisé, séc... Cliquez pour télécharger 974 Application Server vPicture (1.4.2.1)VPICTURE (1.4.2.1)Avec vPicture, hébergez vos images facilement et rapidement.
vPicture est un utilitaire simple, ... Cliquez pour télécharger vPicture Easy-Planning (2.2.1.6)EASY-PLANNING (2.2.1.6)Easy-Planning permet de créer des plannings sous la représentation de diagrammes et est adapté au... Cliquez pour télécharger Easy-Planning COM-BACKUP (2.0)COM-BACKUP (2.0)
COM-BACKUP est un logiciel de sauvegarde qui permet de planifier les sauvegardes de vos dossiers ...
Cliquez pour télécharger COM-BACKUP
|