Classic ASP
Classic ASP
SMTP Send Raw Command
Demonstrates how to send a raw command to the SMTP server after the connecting and authenticating.Chilkat Classic ASP Downloads
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0
' This example requires the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.
set mailman = Server.CreateObject("Chilkat.MailMan")
mailman.SmtpHost = "smtp.mail.us-west-2.awsapps.com"
mailman.SmtpSsl = 1
mailman.SmtpPort = 465
success = mailman.SmtpConnect()
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( mailman.LastErrorText) & "</pre>"
Response.End
End If
mailman.SmtpUsername = "john@example.com"
mailman.SmtpPassword = "the_password"
success = mailman.SmtpAuthenticate()
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( mailman.LastErrorText) & "</pre>"
Response.End
End If
Response.Write "<pre>" & Server.HTMLEncode( "Authenticated!") & "</pre>"
' Send the "EHLO" command again to get the multi-line response that includes the SMTP capabilities.
' The capabilities are the lines in the response that begin with "250-".
responseStr = mailman.SmtpSendRawCommand("EHLO client.example.com","utf-8",0)
If (mailman.LastMethodSuccess = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( mailman.LastErrorText) & "</pre>"
Response.End
End If
Response.Write "<pre>" & Server.HTMLEncode( responseStr) & "</pre>"
' A sample response:
' 250-smtp.us-west-2.mail.awsapps.com
' 250-8BITMIME
' 250-AUTH PLAIN LOGIN
' 250 Ok
%>
</body>
</html>