首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > .NET > VB Dotnet >

关于在VB中登记后发送邮件的代码

2012-10-29 
关于在VB中注册后发送邮件的代码代码如下Dim NewMailObjrecipName Trim(Session(FamilyName)) & ,

关于在VB中注册后发送邮件的代码
代码如下
Dim NewMailObj
  'recipName = Trim(Session("FamilyName")) & "," & Trim(Session("GivenName"))
  NewMailObj = CreateObject("CDO.Message")
  NewMailObj.Subject = "Active Your Account for ekitchens"
  NewMailObj.From = "service@infoserveusa.com"
  NewMailObj.To = "sharppaw@163.com"
  NewMailObj.HtmlBody = "This is a verification email for your ekitchens account.<br>If you haven't applied for this account, please disregard this email.<br><a href='http://ActionUser.asp?' target=_blank>Active my account now.</a>"
  NewMailObj.Send()
  NewMailObj = Nothing
这段代码我在控制台中通过测试了,为什么在网站中通过不了呢?在线等解答啊

[解决办法]
我是初学者,不过我有发邮件的例子不知道能不能帮上你。。。

热点排行