run a bat file

[redbull2k]

i have a .bat file and when double clicked itwill run thorugh cmd.exe. when i run the .bat file from qm its not working.
inside the .bat file i have

Set cloner = CreateObject("WScript.Shell")
cloner.run"cmd"
WScript.Sleep 500

cloner.SendKeys"telnet 192.168.1.1 -f cmd.txt"
cloner.SendKeys("{Enter}")
WScript.Sleep 500



cloner.SendKeys"admin"
cloner.SendKeys("{Enter}")
WScript.Sleep 500

cloner.SendKeys"admin"
cloner.SendKeys("{Enter}")
WScript.Sleep 500

cloner.SendKeys"sh"
cloner.SendKeys("{Enter}")
WScript.Sleep 500

cloner.SendKeys"cat proc/net/ip_conntrack"
cloner.SendKeys("{Enter}")
WScript.Sleep 500

WScript.Sleep 10000
WScript.Sleep 10000
cloner.SendKeys"exit"
cloner.SendKeys("{Enter}")
WScript.Sleep 500

cloner.SendKeys"exit"
cloner.SendKeys("{Enter}")
WScript.Sleep 500

or is there a way i can do this just with qm

[ssimop]

This is how I run .bat files through QM functions :

run "C:\to_xpc.bat"

[Gintaras]

Try to change file extension from .bat to .vbs

Or convert to QM:

run "cmd.exe"
key "telnet 192.168.1.1 -f cmd.txt"
wait 0.5
...
key Y ;;Enter
...