BytesToBstr獲取的源碼轉(zhuǎn)換為中文的代碼
更新時間：2007年09月01日 22:03:33 作者：
'==================================================
'函數(shù)名：BytesToBstr
'作 用：將獲取的源碼轉(zhuǎn)換為中文
'參 數(shù)：Body ------要轉(zhuǎn)換的變量
'參 數(shù)：Cset ------要轉(zhuǎn)換的類型
'==================================================
Function BytesToBstr(Body,Cset)
Dim Objstream
Set Objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write body
objstream.Position = 0
objstream.Type = 2
objstream.Charset = Cset
BytesToBstr = objstream.ReadText
objstream.Close
set objstream = nothing
End Function
'函數(shù)名：BytesToBstr
'作 用：將獲取的源碼轉(zhuǎn)換為中文
'參 數(shù)：Body ------要轉(zhuǎn)換的變量
'參 數(shù)：Cset ------要轉(zhuǎn)換的類型
'==================================================
Function BytesToBstr(Body,Cset)
Dim Objstream
Set Objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write body
objstream.Position = 0
objstream.Type = 2
objstream.Charset = Cset
BytesToBstr = objstream.ReadText
objstream.Close
set objstream = nothing
End Function
相關(guān)文章
ASP編程實(shí)用20例...2006-07-07
防止網(wǎng)站內(nèi)容被小偷采集的ASP代碼...2006-09-09
asp OpenTextFile文本讀取與寫入實(shí)例代碼
打開指定的文件并返回一個 TextStream 對象，可以讀取、寫入此對象或?qū)⑵渥芳拥轿募?2008-08-08
在.NET Core 中使用 FluentValidation 進(jìn)行規(guī)則驗(yàn)證的方法
這篇文章主要介紹了在.NET Core 中使用 FluentValidation 進(jìn)行規(guī)則驗(yàn)證,本文通過實(shí)例代碼給大家介紹的非常詳細(xì)，對大家的學(xué)習(xí)或工作具有一定的參考借鑒價值，需要的朋友可以參考下2021-02-02
這篇文章主要介紹了ASP獲取數(shù)據(jù)庫表名、庫名、字段名的方法,本文例子使用的是SqlServer數(shù)據(jù)庫,需要的朋友可以參考下2014-07-07
ASP.NET?MVC+EntityFramework圖片頭像上傳功能實(shí)現(xiàn)
這篇文章主要介紹了ASP.NET?MVC+EntityFramework圖片頭像上傳功能實(shí)現(xiàn)，本文通過實(shí)例代碼給大家介紹的非常詳細(xì)，對大家的學(xué)習(xí)或工作具有一定的參考借鑒價值,需要的朋友可以參考下2023-12-12
ASP基礎(chǔ)入門第九篇（Global.asa文件的使用）
這篇文章主要介紹了Global.asa文件的使用，是一個可選文件，每個應(yīng)用程序只能有一個 Global.asa 文件，需要了解的朋友可以參考下2015-10-10
這篇文章主要介紹了校驗(yàn)算法與ASP程序2006-12-12
非常不錯的ASP+Access數(shù)據(jù)庫的終極安全大法18則
非常不錯的ASP+Access數(shù)據(jù)庫的終極安全大法18則...2007-06-06
vbcrlf生成的代碼在查看源代碼的時候是有換行的。2009-05-05