Foxtable(狐表) → 用户栏目 → 专家坐堂 → 处理EXCEL


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

主题：处理EXCEL
帅哥哟，离线，有人找我吗？
wh420
 小大  51楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1107 积分：10586 威望：0 精华：0 注册：2014/2/19 16:32:00 		  发帖心情 Post By：2021/6/2 17:07:00 [显示全部帖子]

那应该怎样创建才好？

 回到顶部
帅哥哟，离线，有人找我吗？
wh420
 小大  52楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1107 积分：10586 威望：0 精华：0 注册：2014/2/19 16:32:00 		  发帖心情 Post By：2021/6/3 14:57:00 [显示全部帖子]

可以一涉及填加行的时候“'Dim dr As Row = Tables("临时表").AddNew”还是报错啊？

 回到顶部
帅哥哟，离线，有人找我吗？
wh420
 小大  53楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1107 积分：10586 威望：0 精华：0 注册：2014/2/19 16:32:00 		  发帖心情 Post By：2021/6/3 15:10:00 [显示全部帖子]

那您的意思是把Dim dr As Row = Tables("临时表").AddNew这段代码放到同步函数里？怎么写？
[此贴子已经被作者于2021/6/3 15:10:23编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
wh420
 小大  54楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1107 积分：10586 威望：0 精华：0 注册：2014/2/19 16:32:00 		  发帖心情 Post By：2021/6/3 15:59:00 [显示全部帖子]

感谢老师的耐心回复，这个问题给您折腾不轻，再次脆谢！

按老师的方法做了测试，不用临时表也可以正常执行。只要满足把这个Dim dr As Row = Tables("临时表").AddNew放到同步函数执行就可以，但问题是这样的执行的效率很低，没有体现异步的优势。

我想换个思路：把EXCEL提出来的内容异步存入LIST集合，然后再把集合内容存入狐表中，这个思路可行吗？
 回到顶部
帅哥哟，离线，有人找我吗？
wh420
 小大  55楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1107 积分：10586 威望：0 精华：0 注册：2014/2/19 16:32:00 		  发帖心情 Post By：2021/6/3 17:19:00 [显示全部帖子]

集合可以塞进的字符串有限制吗？

 回到顶部
帅哥哟，离线，有人找我吗？
wh420
 小大  56楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1107 积分：10586 威望：0 精华：0 注册：2014/2/19 16:32:00 		  发帖心情 Post By：2021/6/3 19:37:00 [显示全部帖子]

1、经测试凡是多线程往一处写数据多少都会出现一些问题。所以改变思路，可否处理每个文件的时候动态生成一个集合，都处理完成后再把各个集合中的数据按处理完成的先后顺序一个个写入数据库中？

2、



For Each file In FileSys.GetFiles(path)

如何根据每个文件的主文件名名称加一个后缀的形式动态生成一个集合的变量名？
如：
dim 文件名+后缀  As New List(of String)
dim 文件名+后缀2  As New List(of String)

NEXT
 回到顶部
帅哥哟，离线，有人找我吗？
wh420
 小大  57楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1107 积分：10586 威望：0 精华：0 注册：2014/2/19 16:32:00 		  发帖心情 Post By：2021/6/3 20:13:00 [显示全部帖子]

就是一个文件的内容对应一个集合变量名

 回到顶部
帅哥哟，离线，有人找我吗？
wh420
 小大  58楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：五尾狐 帖子：1107 积分：10586 威望：0 精华：0 注册：2014/2/19 16:32:00 		  发帖心情 Post By：2021/6/7 11:45:00 [显示全部帖子]

好的，用您说的方法SQLCOMMAND增加数据。

我弄了一个ACCESS数据库，并指定了数据源，然后使用下面代码
Dim cmd As new SQLCommand
cmd.C
cmd.CommandText = "Insert Into table1(字段1) Values(?)" 
cmd.Parameters.Add("@字段1",ary(i,j))
cmd.ExecuteNonQuery()
最后报错“已添加了具有相同键的项。”
 回到顶部
总数 59 上一页 1 2 3 4 5 6
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.05469 秒, 5 次数据查询