ASP는 url 기능의 요약을 얻습니다. 필요한 친구는 이를 참조할 수 있습니다. 방법 1: 단순, 매개변수 없음, 가상 경로만 있음
다음과 같이 코드 코드를 복사합니다.
GetUrl =요청(url)
예: http://127.0.0.1/shiyan.asp?dfsdfsf=dsfsdfd&aa=dddd
다음으로 획득: shiyan.asp
다음과 같이 코드 코드를 복사합니다.
<%
딤창두,url,끝,wurl
창두=len(request.ServerVariables(URL))
url=instrrev(request.ServerVariables(URL),/)
URL=URL+1
end=창두+1-url
wurl=mid(request.ServerVariables(URL),url,ends)
%>
방법 2: 전체 URL 가져오기 및 매개변수 가져오기
다음과 같이 코드 코드를 복사합니다.
'현재 페이지의 주소를 가져옵니다
함수 GetUrl()
오류 발생 시 다음 재개
희미한 strTemp
LCase(Request.ServerVariables(HTTPS)) = 꺼진 경우 그러면
strTemp = http://
또 다른
strTemp = https://
종료 조건
strTemp = strTemp & Request.ServerVariables(SERVER_NAME)
If Request.ServerVariables(SERVER_PORT) <> 80 그러면 strTemp = strTemp & : & Request.ServerVariables(SERVER_PORT)
strTemp = strTemp & Request.ServerVariables(URL)
If Trim(Request.QueryString) <> Then strTemp = strTemp & ? Trim(Request.QueryString)
GetUrl = strTemp
기능 종료
예: http://127.0.0.1/shiyan.asp?dfsdfsf=dsfsdfd&aa=dddd
다음으로 획득: http://127.0.0.1/shiyan.asp?dfsdfsf=dsfsdfd&aa=dddd
방법 3: 가상 경로 가져오기 및 매개변수 가져오기
다음과 같이 코드 코드를 복사합니다.
개인 함수 GetUrl()
희미한 스크립트 주소,M_ItemUrl,M_item
ScriptAddress = CStr(Request.ServerVariables(SCRIPT_NAME)) '현재 주소를 가져옵니다.
M_ItemUrl=
If (Request.QueryString <> ) 그러면
ScriptAddress = 스크립트 주소 & ?
Request.QueryString의 각 M_item에 대해
M_item = page_num이면 '여기서의 기능은 Page_num의 매개변수를 필터링하는 것입니다(이 매개변수는 page_turn.asp에서 자체적으로 설정되고 개인 설정에 따라 변경됨). 그렇지 않으면 페이지를 넘길 때마다 이 매개변수가 겹쳐집니다. 매개변수는 기능에 영향을 미치지 않지만 여전히 좋지 않습니다~~
InStr(page,M_Item)=0이면
M_ItemUrl = M_ItemUrl & M_Item &=& Server.URLEncode(Request.QueryString(&M_Item&))
또 다른
M_ItemUrl = M_ItemUrl & M_Item &=& Server.URLEncode(Request.QueryString(&M_Item&)) & &
종료 조건
다음
또 다른
ScriptAddress = 스크립트 주소 & ?
종료하면
GetUrl = ScriptAddress 및 M_ItemUrl
기능 종료
예: http://127.0.0.1/shiyan.asp?dfsdfsf=dsfsdfd&aa=dddd
다음으로 획득:/shiyan.asp?dfsdfsf=dsfsdfd&aa=dddd
방법 4: 매개변수 문자열만 가져오기
다음과 같이 코드 코드를 복사합니다.
함수 GetUrl()
오류 발생 시 다음 재개
희미한 strTemp
LCase(Request.ServerVariables(HTTPS)) = 꺼진 경우 그러면
strTemp = http://
또 다른
strTemp = https://
종료 조건
strTemp = strTemp & Request.ServerVariables(SERVER_NAME)
If Request.ServerVariables(SERVER_PORT) <> 80 그러면 strTemp = strTemp & : & Request.ServerVariables(SERVER_PORT)
strTemp = strTemp & Request.ServerVariables(URL)
If Trim(Request.QueryString) <> Then strTemp = strTemp & ? Trim(Request.QueryString)
GetUrl = strTemp
geturl=mid(geturl,instr(geturl,?)+1)
기능 종료
예: http://127.0.0.1/shiyan.asp?dfsdfsf=dsfsdfd&aa=dddd
다음으로 획득: dfsdfsf=dsfsdfd&aa=dddd