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
相关文章
定时自动备份IIS的WWW日志的vbs脚本...2007-07-07
打开QQ并且让它自己输入用户名和密码的vbs脚本...2007-02-02
下载文件到本地运行的vbs...2006-10-10
'以下代码是定时关机或重启的脚本，在windows 2000下通过2008-06-06
Windows系统中通过vbs实现循环运行.bat/.exe等文件
有时候我们需要在电脑上循环运行一些命令,例如每5分钟执行一次,如果不结合别的计划软件就可以通过vbs来实现2024-04-04
VBS 强制关闭Symantec Endpoint Protection的代码
很多企业电脑系统是Windows Xp，使用Windows server 2003 来控制，其中客户端得杀毒软件有不少是使用 Symantec Endpoint Protection2013-01-01
几个超据学习价值的VBS脚本用法：将exe格式的flash拖放在此vbs文件上，即可生成swf文件2008-05-05
这段代码可以获取曾经在运行对话框中的，我们之前输入的命令历史2008-10-10
这篇文章主要介绍了vbs qq自动登录脚本改进版,需要的朋友可以参考下2014-05-05
这篇文章主要介绍了用vbs脚本实现运行DOS批处理不再出现黑屏cmd窗口,需要的朋友可以参考下2007-02-02
最新评论