'===textarea顯示用===
function htmlencode1(fstring)
if fstring<>"" and not isnull(fstring) then
fstring = replace(fstring, ">", ">")
fstring = replace(fstring, "<", "<")
fstring = replace(fstring, " ", chr(32))
fstring = replace(fstring, "
", chr(10) & chr(10))
fstring = replace(fstring, "
", chr(10))
htmlencode1=fstring
else
htmlencode1=""
end if
end function
'===頁面顯示用===
function htmlencode2(fstring)
if fstring<>"" and not isnull(fstring) then
fstring = replace(fstring, ">", ">")
fstring = replace(fstring, "<", "<")
fstring = replace(fstring, chr(32), " ")
fstring = replace(fstring, chr(10) & chr(10), "
")fstring = replace(fstring, chr(10), "
")htmlencode2=fstring
else
htmlencode2=""
end if
end function
'===取出指定字串前後的字串方法===
function getstrs(str1,charflag,dflag)
dim tmpstr
if dflag=0 then'取左
pos1=instr(str1,charflag)
if pos1<=20 then
tmpstr=left(str1,pos1-1)
else
tmpstr=mid(str1,pos1-20,20)
end if
else '取右
pos1=instr(str1,charflag)+len(charflag)
if len(str1)-pos1<=20 then
tmpstr=right(str1,len(str1)-pos1)
else
tmpstr=mid(str1,pos1+1,20)
end if
end if
getstrs=tmpstr
end function
'===取出檔名===
function getfilename(str)
pos=instr(str,".")
if str<>"" then
str=mid(str,pos,len(str))
end if
getfilename=str
end function
'===取到瀏覽器版本轉換字串===
browser="未知"
end if
end function
'===取到系統指令碼轉換字串===
public function getclientip()
dim uipaddr
' 本函式參考webcn.net/asphouse 文獻《取真實的客戶ip>
'===取到瀏覽器版本轉換字串===
browser="未知"
end if
end function
'===取到系統指令碼轉換字串===
public function getclientip()
dim uipaddr
' 本函式參考webcn.net/asphouse 文獻《取真實的客戶ip>
asp常用函式
array function 返回一個陣列 syntax array list arguments 字元，數字均可 example dim myarray for i 1 to 7 redim preserve myarray i myarray i weekdayname i next resul...
asp常用函式
set jmail server.createobject jmail.tpmail 建立一個jmail物件 jmail.silent true jmail不會丟擲例外錯誤，返回的值為false跟true jmail.logging true 啟用使用日誌 jmail.charset gb2312 ...
asp常用函式
array function 返回一個陣列 syntax array list arguments 字元，數字均可 example dim myarray for i 1 to 7 redim preserve myarray i myarray i weekdayname i next resul...
ASP常用內建函式
在asp中，把帶有返回值的這樣的一段 叫做函式。例如通過編寫一段 計算出一個自然數是否是質數，返回給呼叫程式，由於呼叫程式需要知道那個自然數是否是質數，所以必須要返回一個值。1，日期 時間函式 這些函式包括對 年 月 日 時 分 秒 星期 等的顯示。1 now函式 根據計算機系統設定的日期和時間，返...
ASP裡常用函式
asp裡常用函式 以下為常用函式 文字處理1 效果 去掉前後空格，進行html 編譯，並替換掉回車換行 用於處理普通文字,一般用於寫入資料庫文字的處理 function formattext text text trim text text server.htmlencode text text r...