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

タイトル レコードの更新でエラー
投稿日: 2005/04/22(Fri) 18:05
投稿者FM
[OSのVer]:Windows 2000 [VBのVer]:VB.NET 2003 

Mdbファィルのレコードの更新を実行したいのですが
下記のコードではエラーが発生します。
よろしくお願いします。
 
'-----------
Db_File_Name = "Test.mdb"
Dim Cns As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                     "Data Source= " & Db_Path & Db_File_Name & ";" & _
                     "Persist Security Info=False"

Dim cn As New Data.OleDb.OleDbConnection(Cns)
Dim da As New Data.OleDb.OleDbDataAdapter
Dim cmd As New OleDb.OleDbCommand
Dim SQ As String = "select * from Teble"
    cn.Open()
    cmd.Connection = cn
    cmd.CommandText = SQ
    da.SelectCommand = cmd
    da.Fill(dtSet, "Teble")
    Dim CB As Data.OleDb.OleDbCommandBuilder = New Data.OleDb.OleDbCommandBuilder(da)
    cn.Close()
    dtSet.Tables("Teble").Rows(0).Item("NO") = "0001"     'データの変更
    cn.Open()

    'Err -------------
    'System.InvalidOperationException' のハンドルされていない例外が system.data.dll で
    発生しました。
    'UpdateCommand の動的 SQL 生成は、キーである列情報を返さない SelectCommand に対して
    サポートされていません。
     '-------------
    Dim s As Integer = da.Update(dtSet, "Teble") 'ここで上記のエラーが発生します。

    cn.Close()
    cmd.Dispose()
    da.Dispose()
    cn.Dispose()

- 関連一覧ツリー をクリックするとツリー全体を一括表示します)

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