<% email=Trim(Request.Form("email")) ''''''''''''''''''''''''''''''''''''''''''' '1判断用户email是否正确 set rs=createobject("adodb.recordset") sql="select top 1 * from cpb_user where f_email='"&email&"'" rs.open sql,conn,1,3 if not rs.eof then '找到注册用户信息 zhuce="chenggong" user_mima=rs("mima") user_name=rs("f_username") content_e="摩梦网提示您：您在www.51momo.com的用户名为("&user_name&"),密码为（"&user_mima&").请记住您的帐号信息，摩梦网感谢您的支持。" else zhuce="shibai" end if rs.close ''''''''''''''''''''''''''''''''''''''''''' '多个email的算法 '参数说明 'Subject : 邮件标题 'MailAddress : 发件服务器的地址,如smtp.163.com 'Email : 收件人邮件地址 'Sender : 发件人姓名 'Content : 邮件内容 'Fromer : 发件人的邮件地址 Sub SendAction(subject,mailaddress,email,sender,content,fromer) Set jmail=Server.CreateObject("JMAIL.Message") '建立发送邮件的对象 jmail.silent =true '屏蔽例外错误，返回FALSE跟TRUE两值j jmail.logging =true '启用邮件日志 jmail.Charset ="GB2312" '邮件的文字编码为国标 jmail.ContentType ="text/html" '邮件的格式为HTML格式 jmail.AddRecipient email '邮件收件人的地址 jmail.From =fromer '发件人的E-MAIL地址 jmail.MailServerUserName = "51momo" '登录邮件服务器所需的用户名 jmail.MailServerPassword = "51momo123456" '登录邮件服务器所需的密码 jmail.Subject =subject '邮件的标题 jmail.Body =content '邮件的内容 'jmail.Prority = 1 '邮件的紧急程序，1 为最快，5 为最慢， 3 为默认值 jmail.Priority = 1 '邮件的紧急程序，1 为最快，5 为最慢， 3 为默认 jmail.Send("mail.51momo.com:25") '执行邮件发送（通过邮件服务器地址） jmail.Close() '关闭对象 End Sub '调用此Sub的例子 Dim strSubject,strEmail,strMailAdress,strSender,strContent,strFromer strSubject=user_name+"您好，摩梦网给您发送的用户帐号信息，请您接收" strContent=vd_content+"圣诞视频节目名:"+vd_name+ "在线观看地址：http://www.51momo.com/happy/index.asp" ' strEmail="qiss@51momo.com" strFromer="51momo@51momo.com" strMailaddress="mail.51momo.com:25" strSender="摩梦网" '''''''''''''''''''''''''''''''''''''''''''''' '内容html strContent="摩梦网提示您：您在www.51momo.com的用户名为("+user_name+")密码为("+user_mima+").请记住您的帐号信息，摩梦网感谢您的支持。" '''''''''''''''''''''''''''''''''''''''''''''' 'response.write vd_email_split(k) %> 摩梦网帮助中心
 
 
 

   

   

   

   

   

   

   

   
帮助目录  
摩梦网使用协议如何上传视频如何分享视频如何压缩视频如何用网站短信发送视频免责条款关于摩梦网联系我们








 


联系我们

 

公司名称：北京宏信数源咨询有限公司
公司地址：北京市朝阳区石佛营西里12号B座丰苑大厦515号
公司电话：+86-010-85844934
客服电话：+86-010-51393009
传    真：+86-010-89750556
电子邮件：service@51momo.com