| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 906 人关注过本帖
标题:求助:把TXT做数数据库连接
取消只看楼主 加入收藏
fanglanlan
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2007-9-23
结帖率:100%
收藏
 问题点数:0 回复次数:1 
求助:把TXT做数数据库连接
小弟在做数据库时碰到一问题,引用了Microsfot ActiveX Data Objects 2.5 Library
D盘根目录下有一个test.txt和test.xls,代码如下
      
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Private Sub Form_Activate()
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\test.txt;Extended Properties='text;HDR=Yes;FMT=Delimited';"
  rs.Open "test.txt", cn, adOpenKeyset, adLockOptimistic
  Set MSHFlexGrid1.DataSource = rs
End Sub
运行到红色那句就提示 不是有效路径,是否连接到文件存放的服务器,
如果把D:\test.txt改为D:\test.xls, 把Extended Properties='text;改为Extended Properties='Excel;就可以运行?
谢谢各位帮帮忙呀,怎么会出现这样呢?

test.rar (1.71 KB)
搜索更多相关主题的帖子: 数据库 TXT test New txt 
2008-04-02 09:27
fanglanlan
Rank: 1
等 级:新手上路
帖 子:15
专家分:0
注 册:2007-9-23
收藏
得分:0 
Private Sub Form_Activate()跟Private Sub Form_Load()差不多的,但好像是先运行load的吧,很久以前试过忘了,呵呵

没事网上逗逗
2008-04-02 11:53
快速回复:求助:把TXT做数数据库连接
数据加载中...
 
   



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

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