| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 2475 人关注过本帖
标题:求VB将记事本数据txt数据导入到Access2010数据库的程序
只看楼主 加入收藏
vbcaonia
Rank: 1
等 级:新手上路
帖 子:107
专家分:0
注 册:2016-5-4
结帖率:96.67%
收藏
已结贴  问题点数:20 回复次数:5 
求VB将记事本数据txt数据导入到Access2010数据库的程序
本人初学vb,现求:VB将记事本数据txt数据导入到Access2010数据库的程序
1、数据库中建有一个表, 表名为:数据,数据表中有7个字段,其名分别为:数据1,数据2,数据3,数据4,数据5,数据6,数据7
2、要导入的txt文本数据每相邻2个数字间空1格存放在电脑中某盘:硬盘的text数据不固定在哪个盘,实行自由选择。
3 5 8 9 11 15 17
6 9 21 33 44 56 66
11 22 33 44 55 66 77

点击导入按钮选,txt文件依次写入数据库 表名为:数据的对应的字段中,且每行的第1个数据填写在数据1字段、第2个数据填写在数据2字段、第3个数据填写在数据3字段......依次。

3、请写出详细程序,最好有逐行说明(本人vb刚学习),特别是INSERT INTO 语句一定要详细写出。


谢谢!

0.rar (27.65 KB)
搜索更多相关主题的帖子: 记事本 数据库 数据表 
2016-05-04 17:02
hjxlj
Rank: 10Rank: 10Rank: 10
来 自:江西
等 级:贵宾
威 望:14
帖 子:292
专家分:1519
注 册:2013-6-25
收藏
得分:7 
无偿的话楼主还是自己慢慢研究吧,毕竟你这问题不是一句两句能给你解决的。如果可以接受多少出点费用的话,可以加我QQ细聊。

本人QQ:775420425
2016-05-04 20:37
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4947
专家分:30084
注 册:2008-10-15
收藏
得分:7 
关键就在  SQL 命令。
自己研究一下如何写的。就OK了。

授人于鱼,不如授人于渔
早已停用QQ了
2016-05-04 20:54
vbcaonia
Rank: 1
等 级:新手上路
帖 子:107
专家分:0
注 册:2016-5-4
收藏
得分:0 
回复 3楼 风吹过b
版主呀,其他的都搞定了,就是调试时下面这个出错,麻烦版主看看下面这句怎样写,谢谢!
sql = "insert into table1 values('")

[此贴子已经被作者于2016-5-4 21:43编辑过]

2016-05-04 21:41
vbcaonia
Rank: 1
等 级:新手上路
帖 子:107
专家分:0
注 册:2016-5-4
收藏
得分:0 
回复 2楼 hjxlj
钓鱼。。。。。。。。。。。。。。。。。。。。。。。
2016-05-04 22:07
风吹过b
Rank: 20Rank: 20Rank: 20Rank: 20Rank: 20
等 级:贵宾
威 望:364
帖 子:4947
专家分:30084
注 册:2008-10-15
收藏
得分:0 
语法1:
INSERT INTO 表名称 VALUES (值1, 值2,....)
然后这个值1,值2,你要根据你的字段的数据类型进行引起来。
-------------
假如你的字段全是 数字类型,整行读的变量是 S,已清理了多余的空格
s=Replace(s," ",",")
sql="INSERT INTO 表名称 VALUES (" & s & ");"
----------------
假如你的字段全是字符型的
s="'" & Replace(s," ","','") & "'"
sql="INSERT INTO 表名称 VALUES (" & s & ");"

授人于鱼,不如授人于渔
早已停用QQ了
2016-05-05 09:57
快速回复:求VB将记事本数据txt数据导入到Access2010数据库的程序
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.028502 second(s), 9 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved