bytes2BSTR
更新時間：2007年01月22日 00:00:00 作者：
復制代碼 代碼如下:
Function bytes2BSTR(vIn)
strReturn = ""
For i = 1 To LenB(vIn)
ThisCharCode = AscB(MidB(vIn,i,1))
If ThisCharCode < &H80 Then
strReturn = strReturn & Chr(ThisCharCode)
Else
NextCharCode = AscB(MidB(vIn,i+1,1))
strReturn = strReturn & Chr(CLng(ThisCharCode) * &H100 + CInt(NextCharCode))
i = i + 1
End If
Next
bytes2BSTR = strReturn
End Function
相關文章
利用vbscript腳本修改文件內(nèi)容，此適用于自動化的操作中
利用vbscript腳本修改文件內(nèi)容，此適用于自動化的操作中...2006-12-12
SendKeys參考文檔...2006-10-10
VBS教程：函數(shù)-CreateObject 函數(shù)
CreateObject 函數(shù)創(chuàng)建并返回對 Automation 對象的引用,在vbscirpt經(jīng)常用到，這里就為大家簡單介紹一下需要的朋友可以參考一下啊2006-11-11
這篇文章主要介紹了WINDOWS特有的消息常量標識符，vb,vbs中經(jīng)常用到，需要的朋友可以參考一下2019-09-09
SendKeys 模擬鍵盤操作，將一個或多個按鍵指令發(fā)送到指定Windows窗口來控制應用程序運行，下面有很多的vbs結合sendkyes的實例代碼，方便大家學習2008-06-06
VBS基礎篇 - 循環(huán)(for、Do、While)
經(jīng)常地，當編寫代碼時，我們希望將一段代碼執(zhí)行若干次，我們可以在代碼中使用循環(huán)語句來完成這項工作,需要的朋友可以參考下2018-05-05![獲取外網(wǎng)IP并發(fā)送到指定郵箱的vbs代碼[已測]](http://img.jbzj.com/images/xgimg/bcimg6.png)
獲取外網(wǎng)IP并發(fā)送到指定郵箱的vbs代碼[已測]
如名稱所見，獲取外網(wǎng)IP并發(fā)送到指定郵箱，這個腳本比較短小，但不如腳本之家提供的au3腳本功能強大，不過每次電腦開機記錄一下還是不錯的2012-05-05
ActiveX部件不能創(chuàng)建對象：dm.dmsoft代碼：800A01AD
vbs調(diào)用插件報：ActiveX部件不能創(chuàng)建對象，代碼：800A01AD，一般是因為病毒導致dll文件丟失或者64系統(tǒng)問題導致,需要的朋友可以參考下2019-12-12
VBS教程：屬性-AtEndOfStream 屬性...2006-11-11
vbs查詢局域網(wǎng)內(nèi)電腦的軟件和硬件列表清單
這個是可以幫助大家輕松獲取局域網(wǎng)內(nèi)電腦的相關軟硬件新的的一個小工具，希望能幫助到大家,需要的朋友可以參考下2020-12-12