Connections.Add("主数据源",s)
'用户管理
Dim cmd As New SQLCommand
cmd.C
'全部加载数据的表
Dim ary() As String ={"SYS_用户管理","ZL_部门人员","ZL_部门","SYS_数据字典","ZL_往来单位","ZL_产品资料1","SYS_角色管理"}
For Each ar As String In ary
cmd.CommandText ="s e le c t * from {" & ar & "}"
vars(ar.split("_")(1)) = cmd.ExecuteReader(True) '全局变量不能以sys开头 表名称取 用户管理 部门人员
Next
这种运行中生成的vars变量,在具体执行的时候,有时候会存在失效的情况,如何解决?什么原因?
并不是说其他类型变量不会出问题,当前主要发现了这个datatable类型的出了问题,运行在服务器上,1天多事件
[此贴子已经被作者于2019/9/11 9:50:36编辑过]