只能是这样子调用OutLook Express
<a href="mailto:[email protected]">发邮件</a>
<a href="mailto:[email protected]">发邮件</a>
解决方案 »
- 【救命帖】各位大哥,小弟求助啊,HTML中插入两个<script>,不能同时有用
- 急求,一个关于JS兼容FF浏览器的问题
- 兼容IE6????
- 调用另一页面函数?
- 【求助】在同一页面,不同表传值问题(JQuery弹框)
- 如何读取table里列里的内容?如何判断列值是否为空?
- 各位高手帮助!!急急。在线等待!!
- 如何动态创建一个对象(如<input type=text>、<img>、<a>等),并且在当前页显示出来?
- 用js自动生成一个select下拉选项框
- 使用iframe放视频 ,,chrome等高版本没问题 ,在360内核选择IE10 及11 提示下载
- 窗口变化,实现页面两侧浮动对联隐藏~!
- 求教:如何做出太平洋电脑网这样的边框缩进拉出效果!
采用CDONTs 或者 Jmail 或者 ASPMail
等等组件~
Title="welcome you to Killerj.tK"
ToWho="[email protected]"
Content="吼吼,jmail测试"
call SendMyEmail(Title,ToWho,Content)
Sub SendMyEmail(Title,ToWho,Content)
Dim msg
Dim email_server,user_name,password,Email_type,send_email email_server = "smtp.163.com"
user_name = "[email protected]"
password = "********"
Email_type = 1
send_email = "killerJ" Set msg=Server.CreateObject("JMail.Message") msg.Body = ""
msg.HTMLBody = ""
'---
msg.appendtext(Content)
if user_name<>"" and password<>"" then
msg.MailServerUserName = user_name
msg.MailServerPassword = password
end if
if ToWho<>"" then msg.ReplyTo=ToWho
'--
msg.Logging = True
msg.silent = true
msg.Charset = "so-8859-1"
msg.From = user_name
msg.FromName = send_email
msg.Subject = Title
'--
msg.AddRecipient ToWho
msg.Priority=Email_type
err=msg.Send (email_server)
'---
msg.clear
msg.close
Set msg=nothing
End Sub
%>这个是我昨天测试成功的一个jmail程序
<script language="javascript">
<a href="mailto:[email protected]">发邮件</a>
</script>