<%

'================================

'函數(shù)列表：
'1： 建立數(shù)據(jù)庫的連接 ConnOpen(DataBaseConnectStr,DBType,Conn_object)
'2： 斷開數(shù)據(jù)庫的連接 ConnClose(Conn_object)
'3： 防止SQL注入 SafeRequest(paraName,paraType)
'4： 格式化日期 DateFormat(dateStr,dateType)
'5： 顯示錯誤提示 ShowErr(errStr)
'6： 查詢字符串中特定數(shù)據(jù) SelectStr(contentStr,patternStr,patternNum)
'7： 過濾指定字符 Leach(contentStr,badWords)
'8： 遠(yuǎn)程文件內(nèi)容抓取 Seize(urlStr)
'9： 數(shù)據(jù)流編碼處理 BytesToBstr(body,cset)
'10： 編碼cookies codeCookie(contentStr)
'11： 解碼cookies DecodeCookie(contentStr)
'12： 檢驗數(shù)據(jù)提交來源是否合法 ChkPost()
'13： 個性化加密 MyEncrypt(StrPassword)
'14： 禁止瀏覽器緩存本頁 NoBuffer()
'15： 網(wǎng)頁格式化輸入文本 HTMLEncode(fString)
'16： 從頭部截取字符串的指定長度(按字符數(shù)算) GotTopic(Str,StrLen)
'17： 檢測驗證碼 CheckRadomPass(RadomPass)
'18： 生成驗證碼 GetCode()
'19： 獲取客戶端操作系統(tǒng)版本 GetSystem()
'20： 數(shù)據(jù)庫事務(wù)處理 ConnManage(Conn_object)
'21： 快速排序（遞歸） QuickSort(arr,Low,High)
'22： 將數(shù)組的元素以特定字符串連起來 arr_join(arr,character)
'23： 返回字符串以某分割符分割的數(shù)目 count_character(str,character)
'24： 截取含有分割符的字符串中指定數(shù)目的字符串 inter_str_by_character_num(str,character,start,num)
'25： 利用Stream下載文件 downloadFile(strFile)
'26： 返回信息 send_back(ResultWords)
'27： 獲取錯誤信息 get_err()
'28： 與SafeRequest相反 SafeResponse(content)
'29： 保存遠(yuǎn)程圖片 SaveRemoteFile(LocalFileName,RemoteFileUrl)
'30： ...
dim language_arr(10)
language_arr(0) = "數(shù)據(jù)庫連接的參數(shù)設(shè)置錯誤！"
language_arr(1) = "數(shù)據(jù)庫連接的類型參數(shù)設(shè)置錯誤

sub ConnOpen(DataBaseConnectStr,DBType,Conn_object)
Set Conn_object = Server.Createobject("adodb.connection")
if DataBaseConnectStr = "" then call ShowErr(language_arr(0))
if DBType = 0 then
Conn_object.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DataBaseConnectStr
elseif DBType = 1 then
Conn_object.Open "Provider=SQLOLEDB.1;" & DataBaseConnectStr
else
call ShowErr(language_arr(1))