Функции ASP являются необходимой частью функции реализации веб -программирования ASP, но знаете ли вы о функциях ASP? На самом деле, нам нужно только овладеть несколькими часто используемыми функциями ASP, поэтому давайте рассмотрим введение обычно используемых функций ASP.
========= Получите URL с портом, рекомендуется использовать ==================================
Функция get_scriptnameurl ()
Если запрос.servervariables ("server_port") = "80" then
Get_scriptnameurl = "http: //" & request.servervariables ("server_name") & lcase (request.servervariables ("script_name")))))
Еще
Get_scriptnameurl = "http: //" & request.servervariables ("server_name") & ":" & request.servervariables ("server_port") & lcase (request.servervariables ("script_name")))
Конец, если
Конечная функция
Выше приведено введение в обычно используемые функции ASP. После прочтения вы понимаете функции ASP?
'====================== Функция, чтобы выделить слова, найденные в строке с регулярными выражениями ==========================================================
Функция Boldword (Strcontent, Word)
Если word = "" then
BOLDWORD = strContent
Выходная функция
Конец, если
Dim objregexp
Установить objregexp = new Regexp
objregexp.ignorecase = true
objregexp.global = true
objregexp.pattern = "(" & word & ")"
strcontent = objregexp.replace (strcontent, "<font color =" "#ff0000" "> <b> $ 1 </b> </font>")
Установить objregexp = ничего
BOLDWORD = strContent
Конечная функция
'====================== Получите текущий IP -адрес пользователя ==================
Функция getip ()
uip = request.servervariables ("http_x_forwarded_for")
Если uip = "" then uip = request.servervariables ("remote_addr")
Getip = uip
Конечная функция
'=================== Получите текущий путь сценария программы ========================
Функция getScriptName ()
ScriptAddress = cstr (request.servervariables ("script_name")) 'Получите текущий адрес
If (request.querystring <> "") затем
ScriptAddress = scriptAddress & "?" & Server.htmlencode (request.querystring) 'Получите адрес с параметром
Конец, если
Если Len (scriptAddress)> 250, то ScriptAddress = Left (SciptAddress, 250) & "..."
GetScriptName = scriptAddress
Конечная функция
'================ Верните URL с параметрами, используемыми при сортировке нескольких ключевых слов ==================================================
«Параметр Removelist: параметры, которые необходимо удалить из URL -адреса, могут быть несколькими, пожалуйста, разделить их с запятыми в середине.
Функция keepurlstr (Removelist)
ScriptAddress = cstr (request.servervariables ("script_name")) и "?" Получите текущий адрес и добавьте "?" символ
M_itemurl = ""
Для каждого m_item в request.querystring
Если instr (removelist, m_item) = 0 тогда
M_itemurl = m_itemurl & m_item & "=" & server.urlencode (request.querystring ("" & m_item & "")) & "&"
Конец, если
Следующий
Keepurlstr = scriptaddress & m_itemurl
Конечная функция