ASP необходимо использовать эту функцию для получения текущего URL-адреса или всех параметров текущей страницы. Я не особо проверял ее и дам вам конкретный код после тестирования.
Если адрес:
http://dxy.com:8082/test/geturl.asp?Param-VR52tmx3syn03777.html
Способ 1: простой, без параметров, только виртуальный путь.
Скопируйте код кода следующим образом:
GetUrl =request(url) 'Поскольку у нас нет слова url=, мы можем передать его напрямую.
Способ 2: получить весь URL-адрес и получить параметры
Скопируйте код кода следующим образом:
'Получаем адрес текущей страницы
Функция ПолучитьUrl()
При ошибке Возобновить Далее
Dim strTemp
Если LCase(Request.ServerVariables(HTTPS)) = выключено Тогда
стрТемп = http://
Еще
стрТемп = https://
Конец, если
strTemp = strTemp & Request.ServerVariables(SERVER_NAME)
Если Request.ServerVariables(SERVER_PORT) <> 80 Тогда strTemp = strTemp & : & Request.ServerVariables(SERVER_PORT)
strTemp = strTemp & Request.ServerVariables(URL)
Если Trim(Request.QueryString) <> Тогда strTemp = strTemp & ? & Trim(Request.QueryString)
GetUrl = стрТемп
Конечная функция
После тестирования этого кода получен следующий путь:
/test/geturl.asp?Param-VR52tmx3syn03777.html=
Способ 2. Получите виртуальный путь и параметры.
Скопируйте код кода следующим образом:
Частная функция GetUrl()
Тусклый адрес сценария, M_ItemUrl, M_item
ScriptAddress = CStr(Request.ServerVariables(SCRIPT_NAME)) 'Получить текущий адрес
M_ItemUrl =
Если (Request.QueryString <>) Тогда
ScriptAddress = ScriptAddress & ?
Для каждого M_item в Request.QueryString
Если 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 = ScriptAddress & ?
конец, если
GetUrl = Адрес сценария и M_ItemUrl
Конечная функция
Адрес, полученный приведенным выше кодом,
http://dxy.com:8082/test/geturl.asp?Param-VR52tmx3syn03777.html
В основном то же самое
Если мы просто хотим получить объект после числа ?, мы можем использовать следующий код.
Скопируйте код кода следующим образом:
response.write replace(request.querystring,.html,)
Мы получаем Param-VR52tmx3syn03777. Соответствует ли он нашим потребностям?
PS: Все вышеперечисленные ситуации относятся только к чистому ASP. В сочетании с urlrewrite функции будут улучшены, а также улучшится удобство поиска.