📄 send_flash.asp
字号:
<%
FID=request("FID")
Name=request("Name")
%>
<%'on error resume next%>
<%
if request("action")="send" then
MailSubject=request("FileName")
MailBody=request("Content")
MailBody=replace(MailBody,chr(13),"<br>")
MailBody=replace(MailBody,chr(32)," ")
Mailfrom=request("YourMail")
MailTo=request("UserMail")
Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
objCDOMail.Importance=2
objCDOMail.BodyFormat=0
objCDOMail.MailFormat=0
objCDOMail.From=Mailfrom
objCDOMail.To=MailTo
objCDOMail.Subject=MailSubject
objCDOMail.Body=MailBody
objCDOMail.Send
Set objCDOMail = Nothing
response.write"<SCRIPT language=JavaScript>alert('邮件已经发送完毕,感谢您使用本系统！');"
response.write"javascript:history.go(-1)</SCRIPT>"
response.end
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>送给好友</title>
<link rel="stylesheet" href="Inc/Css.css" type="text/css">
</head>
<body topmargin="0" leftmargin="0">
<table border="0" width="400" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF">
<tr>
<td width="100%"><img border="0" src="Image/Icon_Send.gif"></td>
</tr>
<form action="Send.asp" method="post">
<tr>
<td width="100%" align="center">
<table border="0" width="90%" cellspacing="0" cellpadding="5">
<tr>
<td width="25%" align="right">对方姓名：</td>
<td width="75%"><input type="text" name="UserName" size="20"></td>
</tr>
<tr>
<td align="right">对方信箱：</td>
<td><input type="text" name="UserMail" size="30"></td>
</tr>
<tr>
<td align="right">您的姓名：</td>
<td><input type="text" name="YourName" size="20"></td>
</tr>
<tr>
<td align="right">您的信箱：</td>
<td><input type="text" name="YourMail" size="30"></td>
</tr>
<tr>
<td align="right">作品名称：</td>
<td><input type="text" name="FileName" size="30" value="<%=Name%>"></td>
</tr>
<tr>
<td align="right">您的附语：</td>
<td><textarea rows="5" name="Content" cols="30">这部FLASH作品很不错，建议你看看哦！
地址http://flash.eyefouse.com/Show_Flash.asp?FID=<%=FID%></textarea></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="100%" background="Image/Icon_Send_D.gif" height="80" valign="top" align="right">
<table border="0" width="45%" cellspacing="0" cellpadding="0">
<tr>
<td width="100%"><input type="hidden" name="action" value="send"><input type="image" border="0" name="imageField" src="Image/B_Send.gif" align="absmiddle"></td>
</tr>
</table>
</td>
</tr>
</form>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -