Un logiciel mature est essentiel pour l'assistance par e-mail.
Tout d'abord, Add utilise Shellapi à la partie d'interface du programme, car cette unité résume les fonctions API que nous voulons utiliser. Ensuite, nous pouvons écrire le programme. Voici le code du programme:
Procédure Sendmail
var
S String
Commencer
s ='mailto[email protected]'
Shellexecute0 'Open' Pchars nil nil sw_shownormal
fin
De cette façon, effectuant ce processus, vous pouvez ouvrir automatiquement le programme d'envoi d'e-mail et envoyer un e-mail à [email protected].
Dans une utilisation réelle, vous devez parfois envoyer des e-mails à plusieurs boîtes aux lettres en même temps, il suffit de modifier la valeur de S.
s = 'mailto[email protected]? à = ABC1 @ def.com et à = ABC2 @ def.com'
De cette façon, vous pouvez envoyer des e-mails à plusieurs boîtes aux lettres en même temps.
Si vous souhaitez déterminer le titre et le texte de l'e-mail, vous pouvez attribuer une valeur à S:
s = 'mailto[email protected]? Sujet = Bonjour et corps = Hello'
Faites attention à:
1. Il n'est pas nécessaire d'ajouter des guillemets lors de l'attribution de valeurs au titre et au texte.
2. Bien que de nombreux matériaux disent: si le titre et le texte contiennent des espaces, il doit être converti en% 20. Cependant, pendant le processus de débogage, le programme peut s'exécuter normalement même s'il ne se convertit pas.
Ce programme est exécuté et passé dans Windows 2000 Professional, Delphi 5 et MS Outlook Express. Pour plus d'informations, veuillez consulter l'e-mail de sécurité par e-mail Utiliser les sujets du serveur de messagerie