以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 局域网中的$文件名的访问 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=158697) |
-- 作者:mxl810823 -- 发布时间:2020/11/29 19:53:00 -- 局域网中的$文件名的访问 我在 BeforeOpenProject 事件中加入如下代码,问题关键是在我的电脑是可以运行的,发布出去后在WIN10和XP的电脑就出问题了,win7的运行正常(出现msg信息后直接退出)。我的电脑本身是WIN10的 If Network.Ping("192.168.0.230",1000) = True Then Dim s As String = "\\\\192.168.0.230\\fxfile791123$\\系统更新包\\sys.txt" If FileSys.FileExists(s) = False Then e.HideSplashForm = True MessageBox.show("系统更新中,请稍后再重新打开.") e.Cancel = True System.Diagnostics.Process.GetCurrentProcess().Kill Return End If End If
|
-- 作者:有点蓝 -- 发布时间:2020/11/29 21:23:00 -- http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=158581 |