<% 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室
北京宏信数源咨询有限公司 版权负责人收
邮编:100025
电子邮件:service@51momo.com