tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル MDBにCSVファイルをインポート
投稿日: 2008/03/26(Wed) 13:48
投稿者むら
いつもお世話になっております

WindowsXP VB2005 環境です

VB5 DAO のソースを VB2005 ADO にコンバートしているのですが
インポートのソース記述が調査しているのですがよくわかりません
申し訳ありませんがどなたかご教示ください

以下コードです
---------------------------------------------------------------
<VB5 DAO>
    Public Db As DAO.Database 'データベース変数

    Dim td As DAO.TableDef

    Db = DAODBEngine_definst.OpenDatabase("C:\A.MDB", False, False, "")

    td = Db.CreateTableDef("S情報")
    td.Connect = "Text;DATABASE=" & "C:\" & ";TABLE=" & "S情報.CSV;"
    td.SourceTableName = "S情報.CSV"
    Db.TableDefs.Append(td)

      ↓

<VB2005 ADO>
    Dim cat As ADOX.Catalog
    Dim tbl As New ADOX.Table
    Dim strConnect As String
    strConnect = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & "C:\A.MDB" & ";"
    cat = New ADOX.Catalog
    cat.let_ActiveConnection(strConnect)
    tbl.Name = "S情報"
    (ここからどのような記述をすればいいかがわかりません・・・)

古いスレッドにレスはつけられません。