SSLで電子メールを送信する
日付 | 2010/12/28 |
---|---|
ID | 76218 (英語原文参照) |
バージョン | v12 |
プラットフォーム | Mac/Win |
この記事は、最新ではないバージョンに関連した方法について解説しています。
最新のバージョンでは推奨されていないか、または他の方法で簡単に実現できる可能性があります。
4D Internet Commands v12.1ではSMTPコマンドでSSLが使用できるようになりました。
C_INTEGER($error;$sslSMTPPort) C_LONGINT($smtp_id) C_TEXT($smtpHost) C_TEXT($gmailUser;$gmailPass;$replyTo;$sendEmailTo) C_TEXT($msg;$subject) $sslSMTPPort:=465 // port used for SSL SMTP - gmail wants 465 $smtpHost:="smtp.gmail.com" // smtp host for gmail $gmailUser:="me@gmail.com" // gmail user $gmailPass:="mySuperSecretPassword" // gmail password $replyTo:="me@gmail.com" // have replies sent here $sendEmailTo:="someoneelse@somewhere.com" // send email here $subject:="put subject here" // subject for email $msg:="This is the message body." // email body $error:=IT_SetPort (12;$sslSMTPPort) //12 is for 'SMTP with SSL' $error:=SMTP_New ($smtp_id) $error:=SMTP_Host ($smtp_id;$smtpHost;0) $error:=SMTP_Auth ($smtp_id;$gmailUser;$gmailPass;0) SMTP_AddHeader ($smtp_id;"Importance";"Normal";0) $error:=SMTP_From ($smtp_id;$gmailUser;1) $error:=SMTP_ReplyTo ($smtp_id;$replyTo;0) $error:=SMTP_To ($smtp_id;$sendEmailTo;0) $error:=SMTP_Subject ($smtp_id;$subject;0) $error:=SMTP_Body ($smtp_id;$msg;0) $error:=SMTP_Send ($smtp_id;1) //1 to use ssl