这是一款简单的简单asp mssql server 留言板系统源码哦,是我学asp是写的希望给初学者有帮助。 <script>ec(2);</script> sub opensql() set sqlrs=server.CreateObject("adodb.recordset") set sqlcn=server.createobject("adodb.connection") sqlconstr="driver={sql server};server=xiewen;uid=sa;pwd=123456;database=jimmy" sqlcn.open sqlconstr end sub //功能处理程序asp教程把内容保存到数据库 <%dim f_id,tag,names,lytxt f_id=request.QueryString("id") tag=request.QueryString("tag") lytxt=html_encode(request.Form("lytxt")) names=session("lyname") if names="" then names="匿名" end if if (not isnumeric(f_id)) or (not isnumeric(tag)) or len(lytxt)<5 then response.Write("<script language='javascript教程'>alert('文章内容不能少于五个字符!');history.back();</script>") else sql="select * from guestbook" on error resume next call opensql() sqlrs.open sql,sqlcn,1,3 sqlrs.addnew sqlrs("ly")=lytxt sqlrs("f_id")=f_id sqlrs("tag")=tag sqlrs("name")=names sqlrs.update if err=0 then response.Redirect("list.asp?id="&f_id&"&tag="&tag) else response.Write("<script language='javascript'>alert('非常抱歉,您的留言失败!');history.back();</script>") end if end if %> html提供页面 <input name=lytxt > <input type=submit value提交 /> 本站原创转载注明 www.111cn.net
|