Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

aspα¾²Ì¬´úÂë

<%
DirName="html\" '¾²Ì¬Îļþ±£´æµÄĿ¼£¬½áβӦ´ø"\"
foxrax=Request("foxrax")
if foxrax="" then
FileName=GetStr()&".html"
FileName=replace(FileName,"/","")'Ìæ»»×Ö·û
FileName=replace(FileName,"?","")
FileName=replace(FileName,"\","")
FileName=DirName&FileName
if tesfold(DirName)=false then
createfold(Server.MapPath(".")&"\"&DirName)
end if
if ReportFileStatus(Server.MapPath(".")&"\"&FileName)=true then'Îļþ´æÔÚ
List=ReadFile(FileName)
else'Îļþ²»´æÔڵϰ
List=getHTTPPage(GetUrl())
WriteFile(FileName)
end if
'Lists=split(List,"!@#$%")
'Response.write Lists(0)
'Response.end
end if
'========================º¯ÊýÇø============================
'»ñÈ¡µ±Ç°Ò³Ãæurl
Function GetStr()
On Error Resume Next
Dim strTemps
strTemps = strTemps & Request.ServerVariables("URL")
If Trim(Request.QueryString) <> "" Then
strTemps = strTemps & "?" & Trim(Request.QueryString)
else
strTemps = strTemps
end if
GetStr = strTemps
End Function
'»ñÈ¡»º´æÒ³Ãæurl
Function GetUrl()
On Error Resume Next
Dim strTemp
If LCase(Request.ServerVariables("HTTPS")) = "off" Then
strTemp = "http://"
Else
strTemp = "https://"
End If
strTemp = strTemp & Request.ServerVariables("SERVER_NAME")
If Request.ServerVariables("SERVER_PORT") <> 80 Then
strTemp = strTemp & ":" & Request.ServerVariables("SERVER_PORT")
end if
strTemp = strTemp & Request.ServerVariables("URL")
If Trim(Request.QueryString) <> "" Then
strTemp = strTemp & "?" & Trim(Request.QueryString) & "&foxrax=foxrax"
else
strTemp = strTemp & "?" &


Ïà¹ØÎĵµ£º

asp¶àÎļþÉÏ´«£¨×ª£©

<html xmlns="http://www.w3.org/1999/xhtml" > 
  <HEAD> 
    <title>¶àÎļþÉÏ´« </title> 
    <script language="JavaScript"> 
    function addFile() 
    { 
    var str = ' <br / ......

ASP²úÉú²»Öظ´µÄËæ»úÊý£¨Ä£ÄâÏ´ÅÆ£©

¹¦ÄÜ×÷ÓãºASP²úÉú²»Öظ´µÄËæ»úÊý£¨Ä£ÄâÓÎÏ·Ï´ÅÆ£©
<%
function GetRnd(lowerNum,upperNum)
Dim unit,RndNum,Fun_X
unit = upperNum - lowerNum
Redim MyArray(unit)
For Fun_I=0 To unit
myArray(Fun_I)= lowerNum + Fun_I
Next
For Fun_I=0 To round(unit)
RndNum ......

ASP URL傳輸參數隱²Ø

ʹµØÖ·欄URL¹Ì¶¨£¬隱²Ø參數£º
<head>
</head>
<frameset>  
    <frame   name=""   src="Login.aspx"   target="Login.aspx"   scrolling="auto"   noresize></frame>
<nofr ......

ASP³£¼ûµÄ°²È«Â©¶´

¡¡¡¡ASPµÄ©¶´ÒѾ­ËãºÜÉÙµÄÁË£¬ÏëÒªÕÒµ½Êý¾Ý¿âµÄʵ¼ÊλÖÃÒ²²»¼òµ¥£¬µ«Õâ²»±íÃ÷ºÚ¿ÍÎ޿׿ÉÈ룬ҲÕýÊÇÕâ¸ö¹Ûµã£¬Ò»°ãµÄ³ÌÐòÉè¼ÆÔ±³£³£Íü¼Ç×ÐϸµÄ¼ì²éÊÇ·ñÓЩ¶´£¬ËùÒÔ²ÅÓпÉÄܵ¼ÖÂÍøÕ¾×ÊÁϱ»ÇÔÈ¡µÄʼþ·¢Éú¡£½ñÌìÎÒÔÚÕâÀïºÍ´ó¼Ò̸̸ASP³£¼ûµÄ°²È«Â©¶´£¬ÒÔÒýÆð´ó¼ÒµÄÖØÊÓ¼°²ÉÈ¡ÓÐЧµÄ·À·¶´ëÊ©¡£(×¢Ò⣬ÔÚ±¾ÎÄÖÐËù½éÉܵķ½·¨Çë´ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ