VB如何将文本文件(TXT)写入ACCESS的表中?
这是一个时常能用到的方法,解高手解答,最好附上源码,谢谢!!
'假设有一个字段,多列字段的情况照者修改即可
MDB_ZD = InputBox("请输入数据库中欲存号码的字段名")
'假设文本文件有一列数据,循环取得存入数组 JGHaoMa(i)
'执行下面的过程,要引用ado
Sub Xr_ACCESS() '写入数据库
Dim i As Long
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
cn.Open "dbq=" & MDB_Path & ";driver={microsoft access driver (*.mdb)}"
For i = 1 To UBound(JGHaoMa)
cn.Execute "insert into * (" & MDB_ZD & ") values('" & JGHaoMa(i) & "')"
Next
MsgBox "导入完毕"
End Sub
需要指定Access字段；
Text 转换为 Access MDB
Text 文件类型在很多软件中都为一般应用程序与数据库之间架起一座桥梁。你可以使用 Text ISAM
驱动程序和 SQL 来把 Text 文件转换成 Access MDB 数据库文件，首先，为文本文件创建一个 SCHEMA.INI
文件。然后，你可以使用下面的代码来实现转换：
Dim db As Database, tbl as TableDef
Set db = DBEngine.CreateDatabase(App.Path & "/mymdb.mdb", dbLangGeneral, dbVersion_0)
Set tbl = db.CreateTableDef("Temp")
tbl.Connect = "Text;database=c:\vbpj\data"
tbl.SourceTableName = "Customer#txt
相关问答：
比如说要在1表中的第三列第二行单元中输入“一二三”一要粗体宋体12号字，二 不要粗体 15号字 三斜体5号字
代码应该怎么打？
LZ指的是个什么表格控件呢，貌似只能设置整个表的字体，或者某几行或几列，没有单独设� ......
我用Access数据库做了一个图书数据库，里面有一个字段是ISBN，就是ISBN号，但是只的一总分图书写的ISBN号，有的没写，写的那一部分有的ISBN是重复的，能否用SQL语言把重复的过滤掉，但没写ISBN号的图书不能过滤掉，� ......
ACCESS数据库中有一个tablename表，设计如下
编号,书名,作者,出版时间,出版社,ISBN,目录,简介
其中除“编号”为自动编号外，其它都为“备注”
其中"编号"维一，在“ISBN”中有的为空值， ......
Dbgrid连接access 显示数据时拖动滚动条死机？怎么解决啊？
机器太差了吧？
是不是你数据量太大了啊
你数据少一些看看还死机吗？
数据很少啊 就一页。
我在BCB6下做过不少 DBGRID+ACCESS ，从来没有遇到 ......
招对日VB工程师
要求二年以上的VB经验
有过对日项目的最好，能看懂日语的
有合适的发简历到邮箱xiaocm2004@163.com
哥们
大连有你的地盘吗？
VB没做过咋整！
VB6倒是没问题，可惜不懂日 ......
