关于数据下载过虑 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 关于数据下载过虑

共有1746人关注过本帖树形打印复制链接主题：关于数据下载过虑

初学者阿成

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

加好友

发短信

等级：婴狐帖子：19 积分：191 威望：0 精华：0 注册：2016/12/28 9:13:00

关于数据下载过虑 发帖心情

Post By：2016/12/28 11:11:00 [显示全部帖子]

If e.DataTableName = "期间汇率" Then

Dim aa As String=user.extendedvalues("数据期间")

Dim exp As String

exp=cexp("Select * Fr om {期间汇率} Where [年月]='{0}'",aa)

e.SelectString = exp

output.show(exp)

End If

在beforeloadouterdata事件中加入上述程序段，没有起作用，即无下载到数据期间为‘201612’的数据，而且直接退出程序，求教为什么？是否是引用“user.extendedvalues("数据期间")”的原因。

初学者阿成

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

加好友

发短信

等级：婴狐帖子：19 积分：191 威望：0 精华：0 注册：2016/12/28 9:13:00

Post By：2016/12/28 11:18:00 [显示全部帖子]

已试过了，没有弹出。我使用的是外部表。

初学者阿成

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

加好友

发短信

等级：婴狐帖子：19 积分：191 威望：0 精华：0 注册：2016/12/28 9:13:00

Post By：2016/12/28 11:29:00 [显示全部帖子]

这是原来的程序段，没有show(1)看到，后没有任何弹出。

If e.DataTableName = "期间汇率" Then

messagebox.show(1)

Dim aa As String=user.extendedvalues("数据期间")

messagebox.show(2)

Dim exp As String

exp=cexp("Select * Fr om {期间汇率} Where [年月]='{0}'",aa)

messagebox.show(3)

MessageBox.Show(exp)

messagebox.show(4)

e.SelectString = exp

End If

初学者阿成

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

加好友

发短信

等级：婴狐帖子：19 积分：191 威望：0 精华：0 注册：2016/12/28 9:13:00

Post By：2016/12/28 11:30:00 [显示全部帖子]

应该是只有show(1)有弹出，但后面的几个都没有作用。

初学者阿成

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

加好友

发短信

等级：婴狐帖子：19 积分：191 威望：0 精华：0 注册：2016/12/28 9:13:00

Post By：2016/12/28 11:48:00 [显示全部帖子]

改成 “e.user.extendedvalues("数据期间")”，OK了，谢。

下一主题 >> << 上一主题

主题：关于数据下载过虑