mail.asp
来自「本程序开发的是一个论坛系统」· ASP 代码 · 共 30 行
ASP
30 行
<!--#INCLUDE FILE="config.inc" -->
<!--#INCLUDE FILE="top.inc" -->
<%
set my_conn= Server.CreateObject("ADODB.Connection")
set rs = Server.CreateObject("ADODB.RecordSet")
my_Conn.Open ConnString
StrSql = "Select * From Members Where Member_ID = " & Request.QueryString("ID")
rs = my_conn.Execute (StrSQl)
%>
<font face="<% =DefaultFontFace %>" size=3>
<center>
<p>Click to send <a href="mailto:<%= rs("m_email")%>"><%= rs("M_name")%></a> an email</p>
<font size=2>
<p><a href="javascript:history.go(-1)">Back To Forum</a></p>
</font>
</center>
<%
set rs = nothing
my_conn.Close
set my_conn = nothing
%>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?