Bonjour
Il faut deja savoir a quel moment tu vas regarder les dates d'anniversaire. Sur ouverture d'un formulaire, de la base etc.
Ensuite si tu ouvres 20 fois, il ne faut pas que tu envoies 20 fois le mail...
Ensuite, pour envoyer un mail "simplement" si tu as un compte free tu peux utiliser une ligne php dans ie
Mais il va falloir coder un peu me semble t il
Tu te créés un fichier courriersmail.php sur un site à toi :
Citation :
<html>
<?php
$headers ='From: <'.$mailfrom.'>'."\n";
$headers .='Reply-To: toto@toto.fr'."\n";
$headers .='Content-Type: text/html; charset="iso-8859-1"'."\n";
$headers .='Content-Transfer-Encoding: 8bit';
$formMail = str_replace(array("\r", "\n" ), '', $str);
$message_html='<html>
<head>
<title>Titre</title>
</head>
<body>STYLE type="text/css">
P{
text-align:justify;
}
</STYLE>'.$mailcorps.'</body>
</html>';
echo $message_html;
if( mail($formMail,$mailtitre,$message_html,$headers) ){
echo 'les informations on bien été envoyées';
}
else{
echo 'une erreur est survenue';
}
?>
</html>
|
Ensuite tu créés ta fonction qui envoi le mail :
Citation :
Function envoyer()
Dim mailto As String
Dim mailfrom As String
Dim mailtitre As String
Dim mailcorps As String
Dim mailreq As String
mailto = 'Mail Destinataire
mailtitre = 'Titre du mail
mailcorps = 'Corps du texte
mailreq = "http://AdresseVersTonSite/courriersmail.php?str=" & mailto & _
"&mailfrom=" & mailfrom & "&mailtitre=" & mailtitre & "&mailcorps=" & mailcorps
ExVal = Shell("C:\Program Files\Internet Explorer\iexplore.exe " & mailreq) ', vbHide)
End Function
|
N'hesites pas si tu as des questions.
Cordialement
Message édité par SuppotDeSaTante le 30-07-2008 à 16:10:34
---------------
Soyez malin, louez entre voisins !
Bon matin
