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
Ïà¹ØÎĵµ£º
<%
'==================================================
'º¯ÊýÃû£ºGetHttpPage
'×÷ Ó㺻ñÈ¡ÍøÒ³Ô´Âë
'²Î Êý£ºHttpUrl ------ÍøÒ³µØÖ·
'==================================================
Function GetHttpPage(HttpUrl)
If IsNull(HttpUrl)=True or Len(HttpUrl)<18 or HttpUrl="$False$" Then
GetHttp ......
index.aspÎļþ ±£´æutf-8
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=utf-8" />
<form id="form1" name="form1" method="post">
<input name="ip" type="text" id="ip" style="width:170px" />
</form>
<mce:script type="text/javascript" src="ajaxrequest-m ......
ÕâÀàÎÊÌâͨ³£ÔÚÕûºÏ»ò¶þ´Î¿ª·¢ASPÍøÕ¾Ê±Óöµ½¡£°´³£ÀíÀ´Ëµ£¬ä¯ÀÀÆ÷µÄCookie´æ·ÅÔÚ¿Í»§¶Ë£¬Êµ¼ÊÉÏÓë·þÎñ¶ËʹÓÃʲôÓïÑÔÎ޹أ¬µ«ÎÒÃÇÔÚʵ¼Ê²Ù×÷¹ý³ÌÖУ¬×Ü»áÓöµ½Ò»Ð©ÒâÏë²»µ½µÄÎÊÌâ¡£
1. µ±ASPдµÄCookieµÄKeyÖдøÓÐÏ»®Ïߣ¬ÀýÈçÎÒÃÇÔÚASPÖÐÕâÑùÉèÖÃCookie:
......
1,Q:ÔõÑù°Ñ±ðÈËÍøÒ³Éϵı³¾°ÒôÀÖ±£´æÏÂÀ´?
A:ä¯ÀÀ¸ÃÍøÒ³ºó,ÔÚÄãµÄ Windows\Temporary Internet Files Îļþ¼ÐÏ¿ÉÒÔÕÒµ½¸Ã±³¾°ÒôÀֵĻº´æÎļþ£¬¿½±´³öÀ´¼´¿ÉʹÓá£Èç¹û»¹ÊÇÕÒ²»¼û¸ÃÎļþ£¬¿ÉÒÔ´ò¿ªÍøÒ³µÄÔ´Îļþ£¬ÕÒµ½ÒôÀÖÎļþµÄ URL ·¾¶£¬ÓÓÂìÒÏ”µÈ FTP Èí¼þ½øÐÐÏÂÔØ¡£
2,Q:±ÜÃâÓ ......
ÎļþÍ·ÓÃÁË
<%@Language="VBScript" CodePage="65001"%>
Îļþ±¾ÉíÒѾÊÇUtf-8µÄ±àÂëÁË
Ìá½»¹ýµ½Access¿âÖÐÔõô¶¼ÊÇ “产品介绍 ”ÕâÑùµÄ±àÂë
Ò»²½²½·ÖÎö£¬²»´æ¿âÖ±½ÓÊä³ö£¬Ò²ÊÇÕâÑùµÄ±àÂë¡£ÏëÀ´¸úAccessÎÞ¹ØÁË¡£
ÏàÓÚÃԻ󣬺óÀ´ÖØÐ½¨Ò»¸ö±íµ¥Ôª£¬Ìá½» ......