鉴于大家对ASP类作品十分关注，我们编辑小组在此为大家搜集整理了“基于ASP医药连锁店信息管理系统的设计”一文，供大家参考学习
4．回复留言 用户在“留言列表”页面中单击【回复该留言】按钮，进入到“回复该留言”页面，进行回复留言信息的添加。 回复留言页面所涉及的方法和上面讲解的发表留言页面中实现的方法基本类似，这里不再赘述。 在“查看留言”页面，单击【回复该留言】按钮，程序代码如下： <input type="button" value="回复该留言" onClick="return newwin(''huifu.asp?id=<%=id%>'');" style="border:1px solid;border-color:#000000;background-color:#ffffff"> 通过上面的代码可以看出，操作被提交到处理页后，处理页将根据传递过来的id值对回复的留言信息进行存储，其关键代码如下： <% id=request("id") if request.ServerVariables("CONTENT_LENGTH")>0 then content=trim(request("content")) if len(content)=0 then <script language="javascript"> alert("请填写留言内容！"); window.history.back(); </script> response.End() end if content=replace(content,chr(13),"<br>") content=replace(content," "," ") author=trim(request("author")) postdate=now() ''回复留言日期和时间 sql="insert into tb_BBS (content,author,postdate,upid) values (''"&content&"'',''"&author&"'',''"&postdate&"'',"&id&")" ''向数据表中添加回复留言信息 set rs=conn.execute(sql) sql1="update tb_BBS set backcount=backcount+1 where id="&id conn.execute(sql1) response.write "<center><br><h3>回复信息成功！</h3></center>" %> <script language="javascript"> opener.location.reload(); setTimeout("window.close();",800); </script> <%else%> …… ''此处省略了判断昵称及回复留言内容是否为空的代码 end if %> 5．删除留言 在查看留言页面中，单击【删除】按钮，进行相应的留言信息或回复信息的删除操作。 删除留言信息是在每条留言记录后添加一个【删除】按钮，可以在浏览完留言信息后对于没有价值的留言信息做删除操作，其关键代码如下： <% if Session("Passed")=true and Session("Flag")=1 then %> <input type="image" src=/uploadfile/201305/7/E6195311147.gif" onClick="return newwin1(''delask.asp?id=<%=id%>'');"> <%else%> <input type="image" src=/uploadfile/201305/7/E6195311147.gif" onClick="javascript:alert(''是管理员请登录！''); window.location.href=''index.asp'';"> <%end if%> 删除回复信息是在每条记录后添加一个【删除】按钮，可以在浏览完留言的回复信息后对于没有价值的留言回复信息做删除操作，代码如下： <%if Session("Passed")=true and Session("Flag")=1 then%> <a href="delask.asp?id=<%=rs1("id")%>"><img src=/uploadfile/201305/7/E6195311147.gif" border="0"></a> <%else%> <a href="#" onClick="javascript:alert(''是管理员请先登录！'');window.location.href=''index.asp'';"> <img src=/uploadfile/201305/7/E6195311147.gif" border="0"></a> <%end if%> 当操作被提交到处理页后，首先通过标记Flag来判断用户是否有操作权限，如果该用户为管理员级别，则处理页将根据传递过来的id值对相应的记录进行删除，其关键代码如下： <!--#include virtual="manage/include/conn.asp"--> <%if Session("Flag")<>1 then%> <script language="javascript"> alert("您无权删除！"); setTimeout("window.close();",10); </script> <%else id=request.QueryString("id") set rs=conn.execute("delete from tb_BBS where Id="&id&" or upid="&id)%> <script language="javascript"> alert("删除留言信息成功！"); window.location.href="askfor.asp"; </script> <%end if%> |
| 本站发布的计算机毕业设计均是完整无错的全套作品，包含开题报告+程序+论文+源代码+翻译+答辩稿PPT |
本文选自计算机毕业设计http://myeducs.cn
|
