我有一个与访问数据库(.mdb)连接的vbs。在我的windows XP系统中运行良好,但在我的windows7 x64系统中,我的驱动程序出现了问题……
这是我拥有的代码:
Set MyConn = CreateObject("ADODB.Connection")
Set MyConn = CreateObject("ADODB.Connection")
MdbFilePath = "c:\mis documentos\fusion\fusion.mdb"
'The error point to the next line
MyCon
我们目前使用Windows批处理(DOS)命令文件来控制我们的流程。要将消息显示到控制台,我们将使用ECHO命令。这些消息将显示在我们的Scheduler软件中,该软件以前是Tivoli,现在是CA WA Workstation\ ESP。
我想开始使用VBS文件,而不是CMD\BAT文件,并试图弄清楚如何对控制台进行等同的回显。
当我尝试使用WScript.Echo命令或写入标准输出时,这两个命令的对话框中都会显示消息,它们需要按下OK按钮才能继续。毫不奇怪,当我通过调度程序以无人值守的方式运行时,作业命中其中一个命令并挂起,因为没有人可以确认消息框。
SET FS = CreateObje
我正在尝试运行一个VBScript来执行Word文件中的一些操作(很重)。
Set objWord = CreateObject("Word.Application")
Set objDoc = objWord.Documents.Open(fileName)
objWord.Visible = False
' Do heavy work here.
' Do heavy work here.
objDoc.SaveAs(file.ParentFolder & "/" & theBaseName & " _comp
从bat文件运行vbs脚本时,有时会将其写入头输出文件中
Microsoft (R) Windows Script Host Version 5.8
Copyright (C) Microsoft Corporation 1996-2001. Tous droits r‚serv‚s
example: cscript myvbs.vbs file.txt >result.txt
我知道在输出文件上做更多的+2,我可以忽略它。然而,我想知道是否有可能以不同的方式做到这一点。
提前谢谢你
无论用户尝试什么,强制VBS使用cscript而不是wscript运行的stackoverflow (因此也是正确的)方法是什么?
一个快速的谷歌搜索显示了很多例子,但其中一些根本就不起作用,而那些确实起作用的例子通常不会处理它可能与参数一起运行的事实,所以我渴望知道最好的方法是什么。
下面是一个不处理参数的例子:
sExecutable = LCase(Mid(Wscript.FullName, InstrRev(Wscript.FullName,"\")+1))
If sExecutable <> "cscript.exe" Then
Set
我使用这里的解决方案将.csv转换为.xlsx:
Dim file, WB
With CreateObject("Excel.Application")
On Error Resume Next
For Each file In WScript.Arguments
Set WB = .Workbooks.Open(file)
WB.SaveAs Replace(WB.FullName, ".csv", ".xlsx"), 51
WB.Close False
Next
.Quit
End With
WScrip
我想知道如何在命令提示符中显示变量值。以下是vbs代码:
For i=0 To 10
// I should display this variable value in command prompt
Next
如果我在循环中编写Shell.run(a.bat),这将打开命令提示符10次。
但我希望所有10个值都显示在单个命令提示符中。
我今天开始使用一个名为"oblytile“的程序,它使您能够在Windows 8/8.1中将定制的tiles添加到Metro UI中。该程序运行良好,但当我打开创建的瓷砖到文件夹、程序、文件等时,有一个大问题会弹出一个小黑窗口(如CMD),如下所示:
窗口消失后,我想打开的程序就打开了。我看过一些YouTube视频,其他人没有这样的东西。我检查了其中一个程序存储有关tiles数据的文件夹,发现在Metro中单击自定义瓷砖的每一个时间都启动了一个VBScript。
样品瓷砖VBScript:
On Error Resume Next
Set objShell = CreateO
我需要一些在CMD中输出错误的帮助。
我们有一个时间表系统,它无法将假日添加到用户的时间表中,这是通过脚本完成的。以下是脚本中有问题的部分。
sql = "select h_user,h_date1,h_hrs,h_approved,hol_default from holidays,hol_type,logins_users where userid=h_user and h_type=hol_id and h_date1='" & today & "' order by h_type desc"
'WS
我有一个VBScript,它检查MS Word是否处于隐藏状态,使其可见,然后再次隐藏。
以下是在资源管理器中双击该文件时运行正常的脚本代码:
dim oWord
Dim wshShell, btn
Set wshShell = WScript.CreateObject("WScript.Shell")
set oWord = getobject(, "Word.Application")
if isobject(oWord) then
on error goto 0
wshShell.Popup "Word is running,