VC 如何调用 VBScript 代码，紧急求助！！！！

Question

请高手帮忙解决一下，现在用到VC调用一段VBScript代码片段，不知道如何实现，从网上查找相关资料都运行不正常。紧急求助~~~~
所调用VBS代码片段：dim wshell
set wshell = createobject("WScript.Shell")
wshell.run("Dialing")
WScript.Sleep(2000)
wshell.sendKeys("%{F4}")
WScript.Sleep(200)
wshell.sendKeys("%FO")
WScript.Sleep(2000)
wshell.sendKeys("{ENTER}{ENTER}")相关参考资料：
http://bbs.xml.org.cn/dispbbs.asp?boardid=61&id=64729&star=1#149656

Answer 1

对Script不太熟悉，能不能给点示例代码？懒人用的那种。

Answer 2

http://www.vckbase.com/document/viewdoc/?id=1063

Answer 3

Windows Script Control
http://www.microsoft.com/downloads/details.aspx?FamilyID=d05fcf37-4d9f-4769-9442-0bceef907033&displaylang=zh-cn&Hash=7sJ3SKBkJ1E7OmPdcjvGVf0Kgg4RuuvQkwgetjBA0PeFLJ4N3P3yf%2b5Joojhgtuh%2bA%2bUF3mkhd9pUy0HOA70JA%3d%3d

Answer 4

http://www.setoutsoft.cn/ScriptDemo.htm
获取对你有用。

Answer 5

应该如何调试？为什么我执行下面的代码就出错啊？所调用VBS代码片段： dim wshell 
set wshell = createobject("WScript.Shell") 
wshell.run("Dialing") 
WScript.Sleep(2000) 
wshell.sendKeys("%{F4}") 
WScript.Sleep(200) 
wshell.sendKeys("%FO") 
WScript.Sleep(2000) 
wshell.sendKeys("{ENTER}{ENTER}") 

Answer 6

这几句话可以不用脚本实现,换成对应的API就可以了.