sendmail2.txt

来自「用纯ＡＳＰ代码实现图片上传并存入数据库中」· 文本 代码 · 共 92 行

TXT
92 行
字号 

请支持我们站点以网养网，点击我们的广告，谢谢大家！  


好东西，cdo发送email的源程序.......    


--------------------------------------------------------------------------------

 【天啦】 于 00-4-21 16:13:55 加贴在 Joy ASP ↑：

<%
SUB sendMail( fromWho, toWho, Subject, Body )
     DIM myMail
    SET myMail = Server.CreateObject("CDONTS.Newmail")
    myMail.From = fromWho
    myMail.To = toWho
    myMail.Subject = Subject
    myMail.Body = Body
    myMail.Send
    SET myMail = Nothing
END SUB

fromWho = TRIM( Request.Form( "fromWho" ) )
toWho = TRIM( Request.Form( "toWho" ) ) 
Subject = TRIM( Request.Form( "Subject" ) )
Body = TRIM( Request.Form( "Body" ) )

IF toWho <> "" THEN
     sendMail fromWho, toWho, Subject, Body
END IF
%>
<HTML>
<HEAD><TITLE>Email Form</TITLE></HEAD>
<BODY BGCOLOR="#eeeeee">

<FORM METHOD="POST" ACTION="<%=Request.ServerVariables("SCRIPT_NAME")%>">
<BR>TO: <INPUT NAME="toWho" TYPE="text" SIZE=40>
<BR>FROM: <INPUT NAME="fromWho" TYPE="text" SIZE=40>
<BR>SUBJECT: <INPUT NAME="subject" TYPE="text" SIZE=40>
<BR><TEXTAREA NAME="Body" COLS=40 ROWS=5></TEXTAREA>
<BR><INPUT TYPE="SUBMIT" VALUE="Send Mail">
</FORM>

</BODY>
</HTML>





--------------------------------------------------------------------------------

贴子转发：

 
E-mail地址：


--------------------------------------------------------------------------------

相关主题：


 好东西，cdo发送email的源程序.......  - 【天啦】 00-4-21 16:13:55 [ID:221676 点击:31] (952 Bytes) (1)  
 我一定好好学习ASP,谢谢天啦,谢谢......(激动得哭了) <无内容> - 【lhongbo】 00-4-21 16:26:55 [ID:221701 点击:3] (0 Bytes) (1)  


--------------------------------------------------------------------------------

回复：

    
版 面：Joy ASP ↑  *为必填项目 第一次发言请去注册>> 怎样使用UBBCode>> UBB Code Editor>> NEW!
姓 名：* 密码： * 密码遗忘请点这里>>
Email：
主 题：*

表 情：
             
             

内 容（最多16KB） 使用签名 设置签名>>   


链接地址： 
链接标题： 
链接图片：

sendmail2.txt - 源码说明

本页面展示了「用纯ＡＳＰ代码实现图片上传并存入数据库中」中的 sendmail2.txt 源码文件，采用 文本 编程语言编写，共 92 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫开发者社区收录了大量与ASP相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?