VBS 获取外网IP的实现代码

• vbscript - IBM PCOMM - 无法从另一个 vbs 宏中调用 vbs 宏

  我使用 IBM Personal Communications 12.0.3.0 的宏记录器制作了一个凭据输入宏。它只是在调用时输入我的用户名和密码。 sub Credentials() Dim

• batch-file - 批处理更改了 vbs 代码，使 vbs 无法使用

  该批处理更改了 vbs 代码，使其无法供 vbs 使用。我该如何解决这个问题？ 批号: echo Const HIGH = 128 >> prio.vbs echo strComputer = "."

• vbscript - 从另一个 .VBS 文件创建类的实例(驻留在 B.vbs 中)

  我有 2 个 vbs 文件。 A.vbs: Class test public a public b End Class B.vbs: Dim objShell Set objShell =

• iis - 如何使用 cscript 和 vbs 参数从 Inno Setup 脚本调用 vbs 脚本？

  以下是我用来尝试在 IIS 6 中创建虚拟目录的条目: [Run] Filename: {tmp}\cscript.exe mkvirtdir.vbs; Parameters: "-c LocalHo

• vbs 读写注册表之系统启动项添加与删除

  核心vbs代码 ? 1

• vbs ping实现的两种方式

  对于vbs中ping的实现可以通过两种方式 ： 1、调用系统ping命令； 2、使用wmi查询pingstate类处理。 1、调用系统ping命令

• vbs 自制数字益智游戏实现代码

  在看vb开发,看到二维数组时突发奇想用二维数组作为游戏关卡; 1. 选择操作: 游戏开始时会提示选择注册, 登录, 退出三种选项, 2.注册: 注册成功会将用户账户与密码存入用户数据txt文档中

• vbs 复制指定文件到指定目录下

  复制指定文件到指定目录下 核心代码 ? 1

• vbs qq自动登录脚本改进版

  复制代码 代码如下: On Error Resume Next Dim WshShell, QQPath, QQselect set wshshell=createobject("

• vbs qq自动发信息增强版

  运行前请确定你的电脑安装了word。 复制代码 代码如下: i=0 set wshshell=createobject("wscript.shell") Set objWo

• vbs 定时删除功能实现代码

  参考代码一： 复制代码 代码如下: Function DeleteLog( )     Dim objFSO, objFolder, strPath,

• vbs 查找硬盘分区中指定扩展名文件的实现代码

  挺实用的一段代码，用来深入学习vbs，确实不错咯。 复制代码 代码如下: On Error Resume Next '忽略所有错误 Dim filename '声明变量 Di

• vbs 多线程下载实现代码

  话说还是闲来练手，初步实现了自己认为的“多线程”下载。(至于是不是多线程，可以参考12楼链接) 为避免冗余，省了一些错误检查。我觉得没多大实际用途，有兴趣的兄弟一起学习讨论呗。欢迎大家指正: 复制

• VBS 获取外网IP的实现代码

  复制代码 代码如下: set oDOM = WScript.GetObject("http://ipseeker.cn//") flag=0 for i=1 to 10 &n

• VBS 自动登录论坛的实现代码

  复制代码 代码如下: on error resume next url = " http://www.bathome.net/logging.php?action=login"

• VBS 十六进制异或加密实现代码

  效果图： 代码都封装成函数了，方便调用：   复制代码 代码如下: Key = "www-enun-net" '不要用数字  

• VBS 提取狗狗影视中的ED2K连接的实现代码

  打开狗狗影视，搜索自己需要的资源，资源类型选：电驴，如下图： 我找到一个 19.75gb 的： 点开它，出现如下图的界面，可以看到正常下载地址已被屏蔽。我们复制地址栏中的网址，备用。

• VBS 添加右键计算文件MD5的实现代码

  最近相关的备份比较频繁，为了校验文件的完整性，老是要打开某文件HASH校验工具，比较麻烦，于是乎写了这个东东，文件较大时计算有点慢，文件的MD5值保存在剪贴板！效果如图： 使用方法： 1.先

• vbs 获取当前目录的实现代码

  CMD当前路径   复制代码 代码如下: test = createobject("Scripting.FileSystemObject").GetF

• VBS For Next循环的一些细节

  For Next 语句的基本结构为： 复制代码 代码如下: For counter = start To end [Step step] [statements] [Exit For] [st