设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

返回列表 发新帖
查看: 5479|回复: 5
打印 上一主题 下一主题

[帮助] 请问用SQL语句怎么把一个TXT文件导入到ACCESS表中

[复制链接]
跳转到指定楼层
1#
发表于 2014-12-5 15:13:58 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
access中有一表student,内有三个字段sno文本型,sname文本型,age整型
在目录D:\work\grade1下有一txt文件student.txt,内容如下(字段间是TAB符):
00001        张三        15
00002        李四        14
00003        王五        15
请问怎么用SQL语句将student.txt的内容导入到access的student表中?
请各位高手指点。
谢谢!
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅

点击这里给我发消息

2#
发表于 2014-12-5 19:33:21 | 只看该作者
1.用access导入,保存规格
2.用代码 open file ', 文件流方式
3#
 楼主| 发表于 2014-12-7 12:40:51 | 只看该作者
谢谢tmtony 的回复。
我的意思是怎么用SQL语句导入,比如是说SELECT INTO语句或是INSERT INTO语句。
请各位大侠指点。
4#
发表于 2014-12-7 15:47:45 | 只看该作者
白度ADO打开文本文件,或许对你有帮助
5#
发表于 2014-12-8 17:27:30 | 只看该作者
下面是我的实际例子,希望对你有帮助。

  Open "D:\work\grade1\student.txt" For Input As intFreeFileNumber
    If EOF(intFreeFileNumber) = False Then

        Do While EOF(intFreeFileNumber) = False

            Line Input #intFreeFileNumber, strRecord
            strCardID = Left(strRecord, 6)
            strPeopleNo = CS(DLookup("员工代号", "N-基本资料单头", "刷卡卡号='" & strCardID & "'and 是否离职='0'and 须刷卡否='1' and 指纹考勤='0' "))
            strDate = Format(Mid(strRecord, 7, 8), "0000/00/00")
            strTime = Format(Right(strRecord, 6), "00:00:00")
            strDateTime = Format(strDate & " " & strTime, "yyyy/mm/dd HH:mm:ss")

            cmm.CommandText = "Insert [N-刷卡钟数据表] (刷卡卡号,员工代号,日期,时间,完整时间,采集日期) " & _
                              "Values ('" & strCardID & "','" & strPeopleNo & "','" & strDate & "'," & _
                              "'" & strTime & "','" & strDateTime & "','" & Date & "')"
            cmm.Execute
            iRecordCount = iRecordCount + 1
            Call ProgressBar(20)
        Loop
        SysCmd acSysCmdClearStatus
    Else
        MsgBox "您所选择的文件没有任何刷卡资料!请查核后再继续下一步!", vbCritical
    End If
6#
发表于 2014-12-8 17:51:11 | 只看该作者
gzllh 发表于 2014-12-7 12:40
谢谢tmtony 的回复。
我的意思是怎么用SQL语句导入,比如是说SELECT INTO语句或是INSERT INTO语句。
请各 ...

SELECT * INTO [filname]
FROM [Text;DATABASE=E:\Developer].[filname.txt]
但是前提是需要表头(即字段名)哦。
http://support2.microsoft.com/de ... 201&Product=acc
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-4-30 11:45 , Processed in 0.112683 second(s), 29 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表