[求助] 计划任务执行报错 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助] 计划任务执行报错

共有2050人关注过本帖树形打印复制链接主题：[求助] 计划任务执行报错

chnfo

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：九尾狐帖子：2239 积分：18446 威望：0 精华：0 注册：2011/11/26 20:21:00

[求助] 计划任务执行报错 发帖心情

Post By：2015/7/1 21:51:00 [显示全部帖子]

建立了一个计划任务“XYZ”，定时往共享数据库的表中写数据。

定时600000，即600秒写一次。

Dim dr As DataRow = DataTables("AAA").DataRows(0) ‘AAA表是共享数据库的表

dr("CS") = EncryptText( "CID:" & ComputerId & vbcrlf & "Time:" & now ,"ABCD","DCBA") ’CS列设为备注型

在程序运行过程中，报出这个错误：

计划XYZ代码执行出错，在对代码做出修正之前，将停止执行此计划。

错误信息：

System.IndexOutOfRangeException: 索引超出了数组界限。

在 Foxtable.DataRowCollection.get_Item(Int32 Index)

在 UserCode.Timer_CreatClient()

这是什么问题？

chnfo

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：九尾狐帖子：2239 积分：18446 威望：0 精华：0 注册：2011/11/26 20:21:00

Post By：2015/7/1 22:06:00 [显示全部帖子]

果然，把那个表初始化了。难怪

加上一句：

if DataTables("AAA").DataRows.count = 0 then

DataTables("AAA").addnew()

end if

Dim dr As DataRow = DataTables("AAA").DataRows(0) ‘AAA表是共享数据库的表

dr("CS") = EncryptText( "CID:" & ComputerId & vbcrlf & "Time:" & now ,"ABCD","DCBA") ’CS列设为备注型

主题：[求助] 计划任务执行报错