简单留言板代码

2022-05-19 12:50:22 第一文档网 [ 字体：小中大 ] [

阅读： ] [

文档下载 ]

说明：文章内容仅供预览，部分内容可能不全。下载后的文档，内容与下面显示的完全一致。下载之前请确认下面内容是否您想要的，是否完整无缺。下载word有问题请添加QQ：admin处理，感谢您的支持与谅解。

【#第一文档网# 导语】以下是®第一文档网的小编为您整理的《简单留言板代码》，欢迎阅读！
留言板,代码,简单

09</word><word ps='' class=''>计算机</word><word ps='' class=''>

09计算机留言板

<%

set conn=server.createobject("adodb.connection")

conn.Open="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("wang.mdb") if request("task")="insert" then xm=request("xm") sj=date()

sj=sj&" "&hour(time())& ":"&minute(time()) if request("lyq")=" "then

response.write("留言不能为空！") response.end else

ly=request("lyq") end if

sqlstr="insert into wang (姓名,时间,留言)values('" & xm &"',# " & sj &"#,'"& ly &"')" conn.execute sqlstr end if

sqlstr="select * from wang order by 时间 DESC" set rs=conn.execute(sqlstr) do while not rs.eof %>

姓名:<%=rs("姓名")%>

留言时间:<%=rs("时间")%>

留言内容:<%=rs("留言")%>