主题：[求助]重启动按钮时而不灵时而灵

请教：重启动按钮时而灵时而不灵，有时要按n次才会重启动，项目发布后也如此！

 例子如下：

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:重启动.foxdb

mark 重启项目

 

Dim str As String = ""
str &= "Set ws = CreateObject(""Wscript.Shell"")" & vbcrlf
str &= "ws.run ""cmd /c d:\test.bat"",vbhide"

Dim bat As String = ""
bat &= "taskkill /f /im foxtable.exe" & vbcrlf
bat &= """" & ProjectFile & """"

FileSys.WriteAllText("d:\test.bat", bat, False, Encoding.Default)
FileSys.WriteAllText("d:\test.vbs", str, False, Encoding.Default)

Dim vbs As String = "d:\test.vbs"
Dim Proc As New Process '定义一个新的Process
Proc.File = vbs '指定要打开的文件
Proc.Start()

谢谢红袍老师！

这些重新启动的代码应该写入帮助，并代替Syscmd.Project.Open()。

学习

自己重启自己，需要有良好的编程习惯，数据处理完毕该卸载的及时卸载，重启之前要把项目清理干净：该保存的先保存，停止所有计时器，并等待计时器处理完毕，......