sendmessage.asp

来自「集合了学习asp的100个实例」· ASP 代码 · 共 38 行

ASP
38 行
字号 
<% @language=vbscript%>

<html>

<head>

</head>

<body bgcolor=#c1f7d8>

<center>

<%

dim strname,strcontent,strtable,strdsn

strname=request.form("name")

strcontent=request.form("content")

strtoname=request.form("toname")

if trim(strname)="" or trim(strcontent)="" then

    response.write "<br><br>姓名及内容不能为空"

%>

<br><br><a href=javascript:history.bakc()>上一页</a><br>

<%

   response.end 

end if

strtable="message"

strdsn="dsn=bbs;uid=feng;pwd=feng"

set rs=server.createobject("adodb.recordset")

rs.open strtable,strdsn,1,3

rs.addnew

rs("messagename")=strname

rs("messagecontent")=strcontent

rs("messagetoname")=strtoname

rs.update

rs.close

set rs=nothing

response.write "祝贺你，你的信息成功地发给" & strtoname

%>

</center>

</body>

</html>

sendmessage.asp - 源码说明

本页面展示了「集合了学习asp的100个实例」中的 sendmessage.asp 源码文件，采用 ASP 编程语言编写，共 38 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

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

⌨️ 快捷键说明

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