vbscript相关内容
我有一个VB脚本可以调用PowerShell脚本,希望将PowerShell输出返回到HTA(HTML应用程序)图形用户界面。现在,我只想看看是否可以将PowerShell输出返回到VB脚本中的MsgBox中。这件事我运气不太好。 VBScript代码: Set shell = CreateObject("WScript.Shell") return = shell.Run("powe
..
我正在寻找一种方法来读取一个大的二进制文件使用VBScript(大-1 GB)。我不能使用ReadAll函数直接读取它,因为文件太大,所以我正在寻找一种循环读取它的方法,就像在C中一样。所以我想读取X个字节,处理它们(我不需要整个文件来完成我的工作),然后反复读取下一个10。 问题是我找不到方法,我知道如何从偏移量开始读取,但找不到读取X字节的方法,只有ReadAll和ReadLine函数。
..
我还在学习VBS,不确定我做这件事的方式是正确的,还是最有效的。测试场景如下,除了常规的桌面项目外,我还添加了三个.txt文件,名为: "Tool - YouTube" "welcome to facebook" "BBC news" 当我的代码(底部)运行时,它会按预期创建“sorted”文件夹(如果它不存在),但‘instr’函数只能找到并移动“bbc新闻”文本文件。此外,如果“so
..
ChrW()有没有其他函数/解决方案可以接受不在-32768-65535范围内的值,就像字符代码一样,这会导致“”。使用ChrW()会产生错误 “过程调用或参数无效” 所以我想要一个将字符代码转换为实际字符的替代解决方案。 Code: Function HTMLDecode(sText) Dim regEx Dim matches
..
我希望在admin.bat控制台窗口从ADMINTASKS行执行命令时隐藏它。是否可以在VBSCRIPT中指定ID或以其他方式隐藏控制台? 运行.vbs Set oShell = CreateObject ("Wscript.Shell") Dim strArgs strArgs = "cmd /c admin.bat" oShell.Run strArgs, 0, false a
..
如何在WMI查询中执行此操作? 尝试首先在VideoModeDescriptor类上直接使用查询,但这仅在实例化时可访问。因此尝试了InstancesOf,如以下AutoHotkey代码片段所示: Enabled := ComObjError(1) wmi := ComObjGet("winmgmts:{impersonationLevel=impersonate}!\" A_Comput
..
我这里有一个VBScript来“切换”我的网络适配器(从Internet上找到的脚本构建)。 我想知道是否有人可以帮助我将其转换为一个脚本,该脚本可以“重置”(禁用,然后重新启用)我的无线适配器,而不是切换它。 '~ Toggle a SPECIFIED NIC on or off Option Explicit Const NETWORK_CONNECTIONS = &H31&
..
我正在编写一个VB脚本,它应该标识操作系统的详细信息。我在这里找到了一个使用InstancesOf Win32_Operating System的示例,但我只想解决第一次出现的问题,而不是示例中的Foreach循环,所以我这样做了: Set SystemSet = GetObject("winmgmts:").InstancesOf ("Win32_OperatingSystem") Set
..
我需要将我所有的照片从我的旧笔记本电脑复制到我的新笔记本电脑上。这是一个快速而肮脏的脚本,我将它放在一起(基于此站点上的其他脚本),将文件从一个网络位置复制到另一个网络位置。我希望这个过程能够在网络复制错误的情况下恢复,因为复制我所有的照片总共需要40个小时。 sourceRoot和targetRoot是要在位置之间替换的文件路径的开始部分。lastFileLog是用于跟踪上次复制的文件的文件。
..
我有一个脚本(或者更准确地说,我有一个脚本),它检查一个文件夹并将该文件夹中的文件复制到不同的位置(每天运行一次)。但是,我要从中复制的文件名会根据日期发生变化。 基本上,我不想将";strFilePath";设置为";C:ome PathomePath2myFile.txt";,而只想获取最近修改(或添加的-这对脚本有影响吗?),而不是将";strFil
..
从MySQL中提取2个十进制值并尝试使用非常简单的IF语句: if subtotal
..
我正在尝试将文本文件转换为Excel工作表。这就是格式的样子。 我尝试过编写脚本,但目前它所做的只是覆盖我当前的文本文件,添加我的列标题。它不会添加我的文本文件中的任何数据。有人能帮我弄明白我做错了什么吗? Set objExcel = CreateObject("Excel.Application") objExcel.Visible = True strInput=InputB
..
我的VBScript文件中有一个字符串。我想将字符串作为代码执行。例如,字符串可以是‘msgbox(“hello”)’。但是,eval函数只接受数字或字符串操作。我应该如何执行代码?我总是可以创建一个新文件并将该字符串写入该文件、执行该文件并将其删除,但我正在寻找一种更好的方法来完成此操作。 推荐答案 可能令人惊讶的是,您可以使用Execute语句来实现这一点。甚至在Eval函数的do
..
VBScript 似乎没有办法包含通用函数文件. 有没有办法做到这一点? 解决方案 “Windows Script Host"框架(如果你想这样称呼它)提供了一个 XML 包装文档,它在常规 vbs 文件上添加了功能.其中之一是能够包含 VBscript 和 Jscript 风格的外部脚本文件.我从来没有深入了解它,但我认为它会做你想做的事.http://msdn.microsoft
..
我和一位同事试图找出一种在 VBScript“For/Next"循环中执行“继续"语句的等效方法. 我们到处都发现人们无法在 VBScript 中执行此操作而没有讨厌的嵌套,这对我们来说不是一个选项,因为它是一个非常大的循环. 我们提出了这个想法.它会像“继续(到下一次迭代)"一样工作吗?有没有人有更好的解决方法或改进建议? 对于 i=1 到 N对于 workaroundloop =
..
好吧,我尝试了解 VBScript 中 Const expressions 的限制.除了文字,我无法使用任何东西.文档说是: 字面量或其他常量,或包含所有算术或逻辑运算符,除了 Is. 所以,如果“包括所有算术或逻辑运算符",那么逻辑上我希望我可以做这样的事情: 常量 X = (1 + 2) 但这会带来错误“预期的文字常量".我在here找到了一个有趣的答案,它允许在某种程度上作弊
..
以下解释来自Rhino Developer Docs 空 当你在 VBScript 中声明一个变量时,变量之前的值第一个赋值是未定义的,或者 Empty. Dim varValue ' 空值 所以基本上,Empty 表示“我是一个未初始化的变体".如果你需要检测变量是否实际上是空变体而不是字符串或数字,您可以使用 IsEmpty.或者,您可以使用TypeName 或 VarType
..
我有一个脚本,其中包含生成 powershell 脚本的批处理文件.我自己承担了通过 VB 脚本完成相同的任务.到目前为止,我已经将我需要的大部分信息分配给了字符串.但是我希望提示输入密码,该密码存储为安全字符串,并且可以输出到文本文件中以供以后在进一步的脚本中使用.到目前为止,我发现的唯一代码不起作用,我想可能是因为它是为 VB 而不是 VBS 设计的.非常感谢任何帮助. 之前使用的pow
..
我可以让每个人自己工作但我不能让他们一起工作,登录脚本使用strArg =调用HTA文件,HTA文件生成密码窗口.当登录脚本运行 HTA 文件时,第 31 行和第 106 行出现错误. 我知道问题出在 strArg 中,但我无法弄清楚.它应该在到期标记前 13 天通知最终用户.任何帮助都会很棒.目前,就像现在的脚本一样,我收到 HTA 文件部分的错误: 线路:31 和 106 错误:
..
我有一个 Web 服务加载驱动程序,它是一个 Windows 脚本文件 (WSF),其中包括一些 VBScript 和 JavaScript 文件.我的 Web 服务要求传入的消息是 base64 编码的.我目前有一个 VBScript 函数可以执行此操作,但它的效率非常低(内存密集型,主要是由于 VBScripts 糟糕的字符串连接) [旁白;是的,我看过 Jeff 的最新博文.连接发生在
..