推薦：ASP中檢查沒有數據提交的頁面用戶在訪問站點時經常遇到一些煩人的信息，比如他們經常不知何故地在沒有實際提交數據給表單時就到了下一個頁面，或者經常達到一個頁面，它是以查詢字符串的形式轉來的，比如?ID=236454。
如
這個子程序大家可能不太明白，他是用于顯示各個房間信息的。
好了，下面是關鍵的顯示頁面chatpage.html,它分為三幀，左右為80%，20%，然后再將右面的分為上下80%，20%，左上的部分就是主的顯示頁面
|
以下為引用的內容：
showpage.asp
<!--
#include virtual="/chat/inc/Convert.inc"
--> <%'將內容記入application數組并調整順序%>
<!--
#include virtual="/chat/inc/ChangeRoom.inc"
--> <%'處理換房的過程%>
<!--
#include virtual="/chat/inc/Logname.inc"
-->
<!--
#include virtual="/chat/inc/uLogname.inc"
-->
<%
if request.servervariables("Request_Method")="POST" then
if request.form("cmdChangeRoom")="換房" then
application.lock
call changeroom()
application.unlock
else
chat=request.form("txtChat")
who=session("sChater_Name")
towho=request.form("selShow")
common_or_private="common"
chat=who&towho&"說："&chat
if request.form("chkPrivate")="private" then
common_or_private="private"
chat=chat&"[私聊]"
end if
application.lock
call convert(common_or_private&","&who&","&towho&","&chat&"<br>")
application.unlock
end if
end if
%>
<html>
<head>
<title> ShowPage </title>
</head>
<body>
<center>
<%
response.write session("sRoom_Name")
%>
</center>
<%
for i=0 to application(session("sRoom_Name")&"_Number")-1
position_one=instr(application(session("sRoom_Name")&"_Value")(i),",")
position_two=instr(position_one 1,application(session("sRoom_Name")&"_Value")(i),",")
position_three=instr(position_two 1,application(session("sRoom_Name")&"_Value")(i),",")
if mid(application(session("sRoom_Name")&"_Value")(i),1,position_one-1)="common" or session("sChater_Name")=mid(application(session("sRoom_Name")&"_Value")(i),position_one 1,position_two-position_one-1) or session("sChater_Name")=mid(application(session("sRoom_Name")&"_Value")(i),position_two 1,position_three-position_two-1) then
response.write mid(application(session("sRoom_Name")&"_Value")(i),position_three 1)
end if
next
'大家注意了，這里是關鍵的關鍵，房間的顯示與悄悄話的處理都在這里了
代碼是太長了，但若使用好的數據結構應該能大大簡化代碼，我會用sever端的
javascript來試一試，希望可以
%>
<%
end if
%>
</body>
</html>
|
好長哦，^O^,沒辦法，高級的功能要付出大的代價，我這里是想告訴大家一種思想。以前你肯定定義過application("var1")這樣的變量，但象application(session("sRoom_Name")&"_Value") 這樣的呢？？？我會在近期將它做成一個activex控件，那時大家就方便了。
想要的話給我寫個mail就行了。。
請作者聯系本站，及時附注您的姓名。聯系郵箱:mb5u#vip.qq.com（把#改為@）。
分享：ASP后門之終極偽裝記得當年asp木馬出來的時候號稱“永不被殺的木馬”，呵呵，時至今日，隨便什么殺毒軟件都能將其殺得片甲不留^_^呵呵，受到木馬換殼躲避殺毒軟件思路影響，我們也可以給asp木馬“
。