通过VBSCRIPT发送电子邮件

我必须发送一封简单的邮件给申请人，才能成功提交表单。什么是vb中的代码来做到这一点？我一直想这个..通过VBSCRIPT发送电子邮件

function email() 
    Set mailObj=CreateObject("CDO.Message") 
     mailObj.Subject="Hello" 
     mailObj.From="[email protected]" 
     mailObj.To="[email protected]" 
     mailObj.TextBody="text" 
     mailObj.Send 
    set mailObj=nothing 
end function

有没有在代码中的一些问题吗？请纠正..

来源

2012-10-16 Coder1010

在运行时遇到任何问题吗？如果这样的话。如果您在帖子中没有清楚地提到所有问题，我们如何理解您是否面临任何问题或错误？ –

不，但我没有收到任何邮件在收件人列中指定的电子邮件ID ...运行此操作时没有错误，只是我无法发送电子邮件 – Coder1010

使用类似于下面的东西。

Set objEmail = CreateObject("CDO.Message") 
objEmail.From = "[email protected]" 
objEmail.To = "[email protected]" 

objEmail.Configuration.Fields.Item _ 
("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 
objEmail.Configuration.Fields.Item _ 
("http://schemas.microsoft.com/cdo/configuration/smtpserver") = _ 
    "your.smtpserver.here" 
objEmail.Configuration.Fields.Item _ 
("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 
objEmail.Configuration.Fields.Update 

objEmail.TextBody = "The body of the email" 
objEmail.Subject = "The subject" 

objEmail.Send

来源

2012-10-16 08:22:33 jagsler

这是什么your.smtpserver.here？意味着要写什么来代替这个？ – Coder1010

在这里，您将放置要用来发送电子邮件的SMTP服务器的IP或DNS名称。 – jagsler

通过VBSCRIPT发送电子邮件

回答

相关问题