|
Il est parfois nécessaire d'écrire
ses propres composants afin d'ajouter quelques fonctions a votre site.
C'est pourquoi nous aborderons aujourd'hui la création d'un composant
en Visual Basic. L'exemple
que nous avons choisit est un composant pour envoyer un mail depuis
une page asp.
Dans le
zip à télécharger vous trouverez
1- Le projet Visual Basic composé des fichiers suivants :
HostMail.vbp
frmHostMail.frm
Connexion.cls
2- la DLL compilée : Hostmail.dll
3- Un modèle de page asp permettant
l'envoie : mail.asp
Installation du
projet Visual Basic
C'est tout simple, il suffit de décompresser
le zip dans un dossier quelconque. Ensuite cliquez sur HostMail.vbp
et le projet s'ouvre.
Compilez la DLL et elle sera
automatiquement enregistrée sur votre machine. Côté
pages ASP Cela
se passe de commentaire <%
Dim objMail
Dim resultat
resultat = False
Set objMail = Server.CreateObject("HostMail.Connexion")
objMail.Auteur = "webmaster@host-web.com"
objMail.Destinataire = "jean@asp-fr.net"
objMail.AuteurNom = "Roland Spilthooren"
objMail.DestinataireNom = "Jean Lancon"
objMail.Sujet = "sujet du mail"
objMail.Corps = "C'est pour un test"
objMail.Serveur = "smtp.host-web.com"
resultat = objMail.Envoye
If resultat Then%>
<H2>Merci! votre mail a est envoyé.</H2>
<%else%>
<H3>Désolé! Le mail n'a pas été envoyé. Vérifiez vos paramètres.</H3>
<%end if%>
Attention : Ce composant (écrit par Spilthooren Roland)
est un exemple et n'est pas destiné a une utilisation commerciale. Il
n'a pas été testé en utilisation intensive et par exemple ne gère
pas vraiment les erreurs.
|
