Foxtable(狐表)用户栏目专家坐堂 → 这段代码执行时非常慢,有没有优化些方法?


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

主题:这段代码执行时非常慢,有没有优化些方法?

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/12/25 14:29:00 [显示全部帖子]

请上传实例测试

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/12/25 16:46:00 [显示全部帖子]

使用sql更新

Dim cmd As New SQLCommand
cmd.CommandText = 
"update 专业录取线 As a,专业录取线 As b set a.物理组总_减一年低排=b.物理组总_低分排名,a.物理组总_减一年低同 = b.物理组总_低分同位 where a.院校代码=b.院校代码 And a.物理系列=b.物理系列 And a.专业代码=b.专业代码 And b.录取年度 = 2017 and a.院校代码 Is not null"
cmd.
ExecuteNonQuery()

cmd.CommandText = "update 专业录取线 As a,专业录取线 As b set a.物理组总_减二年低排=b.物理组总_低分排名,a.物理组总_减二年低同 = b.物理组总_低分同位 where a.院校代码=b.院校代码 And a.物理系列=b.物理系列 And a.专业代码=b.专业代码 And b.录取年度 = 2018 and a.院校代码 Is not null"
cmd.
ExecuteNonQuery()

 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/12/25 16:47:00 [显示全部帖子]

这么大的数据量,建议使用外部数据库,加上必要的索引,会更快

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/12/26 8:28:00 [显示全部帖子]

内部表表名加上大括号

update {专业录取线} As a,{专业录取线} As b

 回到顶部
帅哥,在线噢!
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/12/26 14:06:00 [显示全部帖子]

试了什么代码?

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/12/26 15:07:00 [显示全部帖子]

这个肯定不是测试的注真实代码,请从自己项目里复制发上来。

另外第一条sql年度改了,列名没改

 回到顶部
帅哥,在线噢!
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/12/26 16:25:00 [显示全部帖子]

哦,使用sql是直接改后台数据的,界面的没有刷新自然看不到,同步数据或者重启即可


 回到顶部
帅哥,在线噢!
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111393 积分:567029 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/12/27 19:58:00 [显示全部帖子]

导出access,在导入当前项目

 回到顶部