ohohyo 发表于 2009-5-11 16:00:00

vba能不能不调出dos界面来运行dos命令啊

<p>vba能不能不调出dos界面来运行dos命令啊</p><p>vba能不能不调出dos界面来运行dos命令啊</p><p>vba能不能不调出dos界面来运行dos命令啊</p>

ohohyo 发表于 2009-5-11 17:06:00

跪求啊   跪求啊    跪求啊

ohohyo 发表于 2009-5-11 17:25:00

<p>高手帮帮忙吧</p>

mccad 发表于 2009-5-11 18:00:00

Private Sub Command1_Click()<br/>On Error GoTo ts: '如果错误跳到ts:<br/>&nbsp; &nbsp;&nbsp; &nbsp; Set wshl = CreateObject("wscript.shell")<br/>&nbsp; &nbsp; wshl.run "arp -a", 0, True 'arp -a是要执行的DOS命令,0隐藏cmd窗口, 1显示cmd窗口<br/>&nbsp; &nbsp; MsgBox "命令执行完成!", vbInformation, "完成"<br/>exit sub<br/>ts:<br/>&nbsp; &nbsp;&nbsp;&nbsp;MsgBox "命令执行失败!", vbCritical, "失败"<br/>End Sub<br/>

wuyunpeng888 发表于 2009-5-11 19:06:00

直接用shell函数，第二个参数用vbHide

wuyunpeng888 发表于 2009-5-11 19:21:00

<p>Shell "CMD /C COPY c:\CONFIG.SYS D:\CONFIG.SYS", vbHide</p><p>执行DOS内命令将c:\CONFIG.SYS复制到D盘</p>

ohohyo 发表于 2009-5-12 09:03:00

Shell "CMD /C 所以就是这里写要运行的dos程序就是了吧？", vbHide

ohohyo 发表于 2009-5-13 09:22:00

<p>那如果我想要到一个路径名下==&gt;在dos 界面下就输入cd c:\Document and Settings\Documents\New Folder就能变成c:\Document and Settings\Documents\New Folder》&nbsp; 那在这里要怎么弄呢？</p>

雪山飞狐_lzh 发表于 2009-5-13 09:41:00

<p>编辑为Bat文件</p><p>然后shell</p>

ohohyo 发表于 2009-5-13 10:21:00

请教怎么弄成bat啊？
页: [1] 2
查看完整版本: vba能不能不调出dos界面来运行dos命令啊