谁能帮我

你建立一个mdb的文件，然后用FileSystemObject读出文本文件内容，然后插入mdb

解决方案 »

  1.   

    谢谢BrentIvan的回答,但我是新手,还弄不明白怎么把读出的内容插入mdb,敬请指教!
      

  2.   

    dim str1 as string
    dim strsql as string
    Open filename for input #1
    do while not eof(1)
        input #1,str1
        .
        .'分解str1字串。
        strsql="insert into tablename(字段名) values(字串分解)"
        db.Execute strsql 'db可以是ADO中的联接对象或DAO的DATABASE对象
    loop刚刚才用的，效果还好。
      

  3.   

    首先﹐你的文本具有一定的格式符合數據庫要求。然后從文本中讀數據利用SQL語句插入
      

  4.   

    CreateDatabase,CreateTable,CreateField,AddField,CreateIndex
      

  5.   

    還有一點﹐操作Access最好用Jet引擎
      

  6.   

    可我有时运行程序时,他说搜索不到什么Jet引擎!
      

  7.   

    注意一下你的odbc，看看jet引擎怎么了
      

  8.   

    我又试了试,在vb数据管理器里打开了打开了一个mdb数据库文件,然后我从菜单中选了导入导出选项,选了其中一个表格进行导入txt文件.可选完文件点了确定后,出现了如下错误:3051  DAO.Database Microsoft Jet 数据库引擎打不开文件"sy.txt" .麻烦各位大虾帮我解决一下!
      

  9.   

    看一看你的Jet引擎,它還能不能引用了
      

  10.   

    T2兄!:)对了,我如果把文本文件先转换成foxpro2.5,
    再通过dbf文件转换成mdb文件(用导入导出)就能转换.
    为什么呢?
      

  11.   

    你用dbf轉沒有用到Jet﹐當然不會出問題
      

  12.   

    可我怎么检查Jet引擎是否出错呢?错了怎么修复呢?
      

  13.   

    我引用了Microsoft Jet and Replication Objects 2.1 Library,是这个吗?
      

  14.   

    Microsoft dao 2.5/3.51 ...
      

  15.   

    怎么修復Jet我不知道﹐我只知道重裝VB......哈哈
    今日較忙﹐剛看到你的Mail
    我想問你﹐你的TXT怎么那么大?
      

  16.   

    这个问题我在VB憩园看到过,但斑竹给出的解答也很简单,我也没做出来,.不知道这里是否真的有VB高手
      

  17.   

    你的VB有问题重新找个盘安装
    我转换怎么一点问题都没有呢，我用的是VB6企业版
      

  18.   

    补充，只好把你的OFFICE也重新安装一遍
      

  19.   

    对了,各位转换时能不能"导出SQL结果"呢?