2014-02-26 86 views
0

由於新的供應商編程更改,我有一個奇怪的要求。VBscript應用程序啓動器

我們使用C:\ windows \ system32中的dnscmd.exe程序自動設置DNS記錄。

供應商現在已經做了一個更改,限制我們運行位於特定目錄(而不是system32)內的腳本。

我需要一個可以執行C:\ windows \ system32 \ dnscmd.exe的VBscript,並讓我動態地提供這些開關。

EX:我可以做

dnscmd.vbs /recordadd blahblah blah 
dnscmd.vbs /recorddelete blahblah blah 
+0

參見[這](http://stackoverflow.com/questions/298562/windows-xp-or-vista - 如何運行一個批處理文件在背景中 - 沒有窗口/ 298564#298564)後收集開關(args),並將它們傳遞到另一個應用程序,您可以運行'Shell'對象的'Run'方法。 – Bond

回答

0

在這裏你去:

Dim oShell : Set oShell = WScript.CreateObject ("WScript.Shell") 
'separate commands by "&" symbols 
dim commands(1) 
commands(0) = "dnscmd.exe /recordadd blahblah blah" 
commands(1) = "dnscmd.exe /recorddelete blahblah blah" 

'....continue.... 

oShell.run "cmd /K CD C:\windows\system32\ & " join(commands, " & ") 
Set oShell = Nothing