我在这样的程序中发送电子邮件:
Call Shell(smtpPath,emailInput...)
这很好用,除非我调用该函数两次,该函数第一次运行,调用shell命令,然后该函数再次运行,再次调用shell命令,但是第一个shell命令没有完成,所以有一个错误,因为第二个shell命令尝试使用与第一个相同的smtp文件(仍在使用中).
如何让函数等到shell命令运行完毕?
附录:或者有没有办法让我看到文件是否被使用,如果是,请睡觉,然后再试一次?
您可以使用
WScript.Shell,它是
run方法:
Set objShell = CreateObject("WScript.Shell") result = objShell.Run(smtpPath & " " & emailInput,true)