我已经生成了.xml文档,它基本上是一个播放列表,带有指向我的媒体文件的文件路径。我正在尝试使用vbscript来读取.xml文档并执行文件路径。我被一个.vbs到.bat卡住了,当执行时“系统找不到文件\movieserver.”文件路径中的空格似乎导致了问题。如果没有空格,该文件将执行。我怎样才能克服这一切?这就是我所拥有的:
Dim xmlDoc, objNodeList, path
Dim WshShell
Set xmlDoc = CreateObject("Msxml2.DOMDocument")
xmlDoc.load("C
脚本是从网络上执行的,并且应该引入一个配置文件,该文件位于本地机器C:驱动器中,并有一个映射路径。
我尝试了一些不同的想法,但每次我得到“系统错误67已经发生。网络名称找不到。”任何帮助都很感激,因为我解决不了这个问题。(我是命令行的新手)
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run "cmd /k cd.. & cd CIEB_Group3 & set /p RootServer=<Server.txt & net use K: %RootServer% /pers:
我用VBA模拟多线程,代码创建多个vbs文件并运行它们.但是我无法在它们完成后删除它们,它说“找不到脚本文件”,这是我的代码:
' Write VBScript file to disk
sFileName = ActiveWorkbook.Path & "\Thread_" & agentNr & ".vbs"
intFileNum = FreeFile
Open sFileName For Output As intFileNum
Print #intFileNum, s
Close intFileNum
' Run
所以我最初是批量写这个的,但是ASCII中可用的令牌数量太少了,我想它只允许26个,我需要35个管道才能保留在输出文件中。
我是VBScript的新手,但基本上我希望它能读到原始文件中,做一些魔术来选择文件中的第一个字符到最后35个管道(而两者之间的所有东西,即使是两个管道之间的空格都是空的)。然后将该文件输出到另一个文件,同时保持原始文件的完整性。
到目前为止,我的代码如下:
' **************
' ** Anthony B.
' **************
' ** PipeDropper
' **************
Dim W
我想获取当前运行vbs文件的文件夹路径,并将其存储到一个变量中,然后将该变量传递给一个批处理文件。
我的VBS是:
dim fso: set fso = CreateObject("Scripting.FileSystemObject")
CD = fso.GetAbsolutePathName(".")
dim WshShell
set WshShell=Wscript.CreateObject("Wscript.shell")
WshShell.run "a.bat " & CD
我的BAT代码是:
@echo off
Option Explicit
Dim oFSO, oTxtFile
Set oFSO = CreateObject("Scripting.FileSystemObject")
If oFSO.FileExists("c:\users\Installed.txt") Then
WScript.Quit
Else
Set WshShell = CreateObject("WScript.Shell")
WshShell.Exec("\\1.1.1.1\software\1.exe -s /s -a ns=1.5.3
我只想从vb脚本中秘密执行一个批处理文件。我的vb脚本包含以下几行代码,但不起作用。知道我错过了什么吗?
Dim min
Dim WshShell
min = InputBox("Enter the number of mins :")
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run chr(34) & "C:\Users\XYZ\Desktop\test.bat " & min & Chr(34), 0
Set WshShell = Nothing
我需要一个示例脚本或bat文件,在该文件中,我要执行以下:>
同时测试3台不同机器和端口的端子连接和端口。
该机器是非常锁定,因此无法安装putty或任何其他第三方应用程序或有网络访问。
我只需要脚本到第一个框,然后移动到下一个框。
我已经试过了下面的脚本,但它在第一个框中就停止了
<job>
<script language="VBScript">
Option Explicit
On Error Resume Next
Dim WshShell
set WshShell=CreateObject("WSc
请帮个忙。
我不知道为什么这不管用
Public Sub OpenFile(ByVal ImagePath As String)
Dim WshShell As Object
Set WshShell = CreateObject("WScript.Shell")
WshShell.Run ImagePath
End Sub
我得到了一个例外:(&H80070002)
我试图打开一个文件,该文件的路径存储在变量ImagePath中,该变量是一个字符串。
设想情况:
ImagePath = "C:\helloWorld.tx
我目前正在为我做的一些vbs脚本做一个简单愚蠢的UI(用户界面)。我刚添加了一个部分,在开始时它会询问用户的名字。我的问题是,每次我使用这个“后退”选项转到上一个“标签”时,它都会重新询问你的名字。我已经寻找了许多不同的方法来让它工作,但我做不到,我找不到让循环/出口的东西工作的方法。我尝试将name脚本分开,以便它在开始时运行它,当你返回到主脚本时,它会转到主脚本。但这意味着我不会在第二个脚本中知道它们的名字,因为它没有变量值。这是脚本!
Dim Input
Dim Input1
Dim Input2
Dim Input3
Dim InputName
InputName = Inputbox