天津11选5走势图带连线:新聞資訊

點擊排行

您現在的位置:首頁 > 新聞資訊 > 資源共享

【解決方案】字節轉字符自定義函數BytesToBstr

來源:安信科技    瀏覽: 次    日期:2015年12月26日

天津11选5前三直遗漏 www.ujbzbf.com.cn  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

親,試試微信掃碼分享本頁! *^_^*

精彩推薦