国产高清在线免费观看-国产高清在线免费无码-国产高清在线男人的天堂-国产高清在线视频-国产高清在线视频精品视频-国产高清在线视频伊甸园

ASP版UTF-8轉GB2312的函數，在同一個頁面內完美實現UTF-8、GB2312中文顯示。

 

function utf2gb(fileContent)
 dim stm
 set stm=Server.CreateObject("adodb.stream")
 stm.Type=2
 stm.Mode=3
 stm.Charset="GB2312"
 stm.Open
 stm.WriteText fileContent
 stm.Position=0
 stm.Charset="UTF-8"
 utf2gb = stm.ReadText
 stm.Close
 set stm=nothing
End function