Change DNS Setting programically

[newuser]

Thanks alot, it work perfectly now, maybe you right, I left some spaces in between.

One more question, how do I go about converting this vbscript below correctly to QM vbscript format?

Code:

Copy      Help

Dim WSHShell
Set WSHShell = WScript.CreateObject("WScript.Shell")

' open maximized and wait
WSHShell.Run "notepad.exe", 3, true
' open minimized and wait
WSHShell.Run "notepad.exe", 2, true
' open normal and don't wait
WSHShell.Run "notepad.exe", 1, false

Set WSHShell = Nothing
WScript.Quit(0)

I know its mention wscript cant be use in QM, for Wscript.Echo, I can replace with MsgBox but what about Wscript.Shell like the above code? :?: