Foxtable(狐表)用户栏目专家坐堂 → 客户端有时启动不了,提示运行错误


  共有3160人关注过本帖树形打印复制链接

主题:客户端有时启动不了,提示运行错误

帅哥哟,离线,有人找我吗?
yankunhao
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1031 积分:7237 威望:0 精华:0 注册:2008/9/1 22:34:00
客户端有时启动不了,提示运行错误  发帖心情 Post By:2014/5/8 10:11:00 [显示全部帖子]

客户端有时启动不了,提示运行错误

 

提示指定的索引键不字典中!请问为什么会这样?


 回到顶部
帅哥哟,离线,有人找我吗?
yankunhao
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1031 积分:7237 威望:0 精华:0 注册:2008/9/1 22:34:00
  发帖心情 Post By:2014/5/8 10:48:00 [显示全部帖子]

以下是引用有点甜在2014-5-8 10:13:00的发言:

 个别电脑?不规律发生?

 

 启动的时候,你写了什么代码?

我的电脑还未发现这个问题,就是位于香港那边的同事发生过这样的提示,但重新打开一下就可以了。

 

启动时:

 

BeforeOpenProject

 

If FileSys.DirectoryExists("\\192.168.1.147\升级\产品规格表")  Then
    Return
Else
    shell("net use \\192.168.1.147\升级  sjsj /user:sj")
End If

If FileSys.DirectoryExists("\\192.168.1.2\pic") Then
   Return
Else
   shell("net use \\192.168.1.2\pic  1011234 /user:101")
End If

 

AfterOpenProject

Forms("登陆").Open()

Network.Ping("192.168.1.147")
Network.Ping("192.168.1.147")

Dim s As String
s=ProjectPath & "\Images\Logo.ico"
BaseMainForm.Icon = New Icon(s)

If FileSys.DirectoryExists("\\192.168.1.147\升级\产品规格表")  Then
    Syscmd.Project.Update(False,True)
Else
    shell("net use \\192.168.1.147\升级  sjsj /user:sj")
End If

If FileSys.DirectoryExists("\\192.168.1.2\pic") Then
    Return
Else
    shell("net use \\192.168.1.2\pic  1011234 /user:101")
End If

 

[此贴子已经被作者于2014-5-8 10:50:03编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
yankunhao
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1031 积分:7237 威望:0 精华:0 注册:2008/9/1 22:34:00
  发帖心情 Post By:2014/5/8 11:05:00 [显示全部帖子]

以下是引用有点甜在2014-5-8 11:02:00的发言:

 看代码没有错才对。在哪个阶段出错?

 

 启动的时候,还是登陆之后?

启动的时候


 回到顶部
帅哥哟,离线,有人找我吗?
yankunhao
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:五尾狐 帖子:1031 积分:7237 威望:0 精华:0 注册:2008/9/1 22:34:00
  发帖心情 Post By:2014/5/12 9:33:00 [显示全部帖子]

今天又出现了,信息如下,没显示什么事件的。

 

.NET Framework 版本:2.0.50727.5477
Foxtable 版本:2014.3.8.1
错误所在事件:
详细错误信息:
指定的索引鍵不在字典中。


 回到顶部