ASP·ÖÒ³
'ÏÔʾ"ÉÏÒ»Ò³ ÏÂÒ»Ò³":Á´½ÓµØÖ·,×ÜÊý,Ò³Êý,ÊÇ·ñÏÔʾ×ÜÊý,ÊÇ·ñÓÃÏÂÀÁбíÌø×ª,µ¥Î»
Public Function PageControl(iCount,pagecount,page,table_style,font_style,colspan)
'Éú³ÉÉÏÒ»Ò³ÏÂÒ»Ò³Á´½Ó
action = "http://" & Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("SCRIPT_NAME")
query = Split(Request.ServerVariables("QUERY_STRING"), "&")
For Each x In query
a = Split(x, "=")
If StrComp(a(0), "page", vbTextCompare) <> 0 Then
temp = temp & a(0) & "=" & a(1) & "&"
End If
Next
if colspan=0 then
Response.Write("<table " & Table_style & ">" & vbCrLf )
end if
Response.Write("<form name=formgo action="&action & "?" & temp &"><TR><TD align=right bgcolor=ffffff colspan="&colspan&" height=25>" & vbCrLf )
Response.Write(font_style & vbCrLf )
if page<=1 then
Response.Write ("Ê×Ò³ " & vbCrLf)
Response.Write ("ÉÏÒ³ " & vbCrLf)
else
Response.Write("<A HREF=" & action & "?" & temp & "Page=1>Ê×Ò³</A> " & vbCrLf)
Response.Write("<A HREF=" & action & "?" & temp & "Page=" & (Page-1) & ">ÉÏÒ³</A> " & vbCrLf)
end if
Ïà¹ØÎĵµ£º
±¾ÎÄÁ´½Ó£ºhttp://www.oversteper.com/wprogram/asp/827.html
Ìõ¼þÓï¾äÖ® if ... then ... else Óï¾ä
ÓÃÀ´ÅжÏÌõ¼þÊÇ true »ò false £¬²¢¸ù¾ÝÅжϽá¹ûÀ´Ö´ÐÐÖ¸¶¨µÄÓï¾ä£¬Í¨³£Ìõ¼þÊÇÓñȽÏÔËËã·û¶ÔÖµ»ò±äÁ¿½øÐбȽÏÀ´±í´ï¡£
if ... then ... else ¿ÉÒÔ¸ù¾ÝÐèÒª½øÐÐǶÌ×ʹÓ㬿ÉÒÔд³É elseif ¡£
ʾÀý£º
ÒÔÏÂÎ ......
·þÎñÆ÷¶Ë×é¼þ
Ê×ÏÈ,·þÎñÆ÷¶ËµÄ×é¼þÒªÓбðÓÚ¿Í»§¶ËµÄ×é¼þ.¿Í»§¶ËµÄ×é¼þÊÇͨ¹ýÍøÂç´«Êä,ÒÀ*HTMLÀ´Æð×÷ÓÃ.¶øÇÒÖ»ÄÜÔÚIEÉÏÓÐÓÃ.µ«ÊÇ·þ ÎñÆ÷¶ËµÄ×é¼þÊÇÔËÐÐÔÚ·þÎñÆ÷¶Ë,ËüÔÚ·þÎñÆ÷ÉÏÖ´Ðи÷ÖÖ²Ù×÷.Òò´Ë,ËùÓеÄä¯ÀÀÆ÷¶¼ÄÜÏíÓÃ,ËüÒÀ*µÄÊÇ·þÎñÆ÷¶ø²»ÊÇä¯ÀÀÆ÷.
µ±IIS±»ÇëÇóÖ´ÐÐÒ»¸öASP³ÌÐò,ËüÊ×ÏÈ»áÔÚASPÎļþÖÐÕÒµ½¡´%%>±êǩ֮¼ä ......
¡ï1. ʹÓÃQueryString±äÁ¿
¡¡¡¡¡¡QueryStringÊÇÒ»Öַdz£¼òµ¥µÄ´«Öµ·½Ê½£¬Ëû¿ÉÒÔ½«´«Ë͵ÄÖµÏÔʾÔÚä¯ÀÀÆ÷µÄµØÖ·À¸ÖС£Èç¹ûÊÇ´«µÝÒ»¸ö»ò¶à¸ö°²È«ÐÔÒªÇ󲻸߻òÊǽṹ¼òµ¥µÄÊýֵʱ£¬¿ÉÒÔʹÓÃÕâ¸ö·½·¨¡£µ«ÊǶÔÓÚ´«µÝÊý×é»ò¶ÔÏóµÄ»°£¬¾Í²»ÄÜÓÃÕâ¸ö·½·¨ÁË¡£ÏÂÃæÊÇÒ»¸öÀý×Ó£º
a.aspxµÄC#´úÂë
private void B ......
asp Http_Referer,Server_NameºÍHttp_Host
ÒÔǰ¸Ð¾õRequest.ServerVariablesÀïµÄÖµºÜ¶à£¬ÏÖÔÚ¿´¿´»¹ÊÇÄÇô¶à£¬²»¹ý½ñÌì̸ÆäÖеÄÒ»¸öÖµ----HTTP_RefererÒÔ¼°Request.ServerVariablesÀïServer_NameÓëHttp_HostÖ®¼äÓÐÊ²Ã´Çø±ðÄØ£¿
¸Õ²ÅÔËÐÐÁËÒ»¶Î´úÂ룬À´²é¿´Request.ServerVariablesÀïÃæÓжàÉÙÖµ£¬¿´ÁËһϣ¬¹²50¸ö£¡
´úÂ ......
Èçid="a/b/c/asdf.html" ²ÎÊýΪ¶¯Ì¬
Ôõô°ÑºóÃæµÄasdf.html¹ýÂË?ʹid="a/b/c/"?
Èç¹ûidµÄ¸ñʽһ¶¨Îª "????/????/??????/xxxx.xxx"
¼´×îºóËùÒª¹ýÂ˵ôµÄÒ»¶¨ÊÇ×îºóÒ»¸ö"/"Ö®ºóµÄÄÚÈÝ
¿ÉÒÔÓÃÈçÏ·½·¨:
<%
URL="a/b/c/asdf.html"
PartOfURL=split(URL,"/") '½«×Ö·û´®ÒÔ"/"·Ö¸î
UnNeed=spli ......