明輝手游網(wǎng)中心：是一個免費(fèi)提供流行視頻軟件教程、在線學(xué)習(xí)分享的學(xué)習(xí)平臺！

Text 轉(zhuǎn)換為 Access MDB

發(fā)表時間：2024-02-11 來源：明輝站整理相關(guān)軟件相關(guān)文章人氣：

[摘要]Text 文件類型在很多軟件中都為一般應(yīng)用程序與數(shù)據(jù)庫之間架起一座橋梁。你可以使用 Text ISAM 驅(qū)動程序和 SQL 來把 Text 文件轉(zhuǎn)換成 Access MDB 數(shù)據(jù)庫文件，首先，為文本文件創(chuàng)建一個 SCHEMA.INI文件。然后，你可以使用下面的代碼來實(shí)現(xiàn)轉(zhuǎn)換：Dim db As D...
Text 文件類型在很多軟件中都為一般應(yīng)用程序與數(shù)據(jù)庫之間架起一座橋梁。你可以使用 Text ISAM
驅(qū)動程序和 SQL 來把 Text 文件轉(zhuǎn)換成 Access MDB 數(shù)據(jù)庫文件，首先，為文本文件創(chuàng)建一個 SCHEMA.INI
文件。然后，你可以使用下面的代碼來實(shí)現(xiàn)轉(zhuǎn)換：
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"
db.TableDefs.Append tbl
db.Execute "Select Temp.* into NewTable from Temp"
db.TableDefs.Delete tbl.Name
db.Close
Set tbl = Nothing
Set db = Nothing