推荐:一个简单好用的UBB编辑器(含代码)现在的在线编辑器有很多,且功能强大,比如 eWebEditor,但也占用空间大,一些简单的 论坛、留言板并不还需要太强大的功能, HtmlEditor就是这样一个编辑器,简单漂亮,调用也方便,推荐大家使用。 调用时代码, 提交页: form method=POST action=Post.a
| <% a=request(姓名) aa=request(电话) aaa=request(mail) aaaa=request(yb) aaaaa=request(dz) b=request(bt) bb=request(内容) '上面是请求的数据,由普通表单提交过来即可。 DimJMail,contentId SetJMail=Server.CreateObject(JMail.Message) JMail.Charset=gb2312 ’邮件字符集,默认为US-ASCII ’JMail.ISOEncodeHeaders=False ’是否进行ISO编码,默认为True ’发送者信息(可用变量方式赋值) [email protected] ’用于发送的邮箱 JMail.FromName=网站1 ’发送者姓名 JMail.Subject=信箱a ’邮件主题 ’身份验证 [email protected] ’用于发送的邮箱 JMail.MailServerPassword=xxxxxxx ’密码 ’设置优先级,范围从1到5,越大的优先级越高,3为普通 JMail.Priority=3 JMail.AddHeaderOriginating-IP,Request.ServerVariables(REMOTE_ADDR) ’加入一个收件人【变量email:收件人地址】可以同一语句重复加入多个 JMail.AddRecipient([email protected]) ’加入附件【变量filename:附件文件的绝对地址,确保用户IUSR_????有访问的权限】 ’【参数设置是(True)否(False)为Inline方式】 ’contentId=JMail.AddAttachment(filename,True) ’邮件主体(HTML(注意信件内链接附件的方式)) JMail.HTMLBody=发信人姓名:&a&<br>电话:&aa&<br>mail:&aaa&<br>邮编:&aaaa&<br>联系地址:&aaaaa&<br>标题:&b& <br> 内容:&bb&<br> ’邮件主体(文本部分) JMail.Body=我们的邮件采用了HTML格式,请点击邮件下方HTML内容来查看详细内容。 ’发送【调用格式:objJMail.Send([username:password@]SMTPServerAddress[:Port])】 sendok=JMail.Send(mail.xxx.com) '发送mail服务器 ifsendokthen endstr=已经成功发送了邮件! else endstr=发送邮件失败,可能是您填写了错误的邮件地址。<br/>&_ 如果您确信没有写错邮件地址,则可能是发信程序出了<br/>&_ 故障,请与管理员联系! endif ’关闭并清除对象 JMail.Close() SetJMail=Nothing %> <%=endstr%> |
分享:如何防止网上投票重复投票ASP对象 在ASP中有5个对象:Request、Response、Session、Application、Server。下面只针对本文能用到的对象属性进行说明,其他方面的属性请参考相关资料。本文提供的方法的原理是:设置一个逻辑变量IsVoted,在投票之前验证IsVoted的值,只有值为False时,才