tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板) [ツリー表示へ]   [Home]
一括表示(VB.NET VB2005)
タイトルMdb更新について
記事No1393
投稿日: 2005/02/14(Mon) 15:02
投稿者迷惑
[OSのVer]:Windows    [VBのVer]:VB.NET  

テーブル更新ができない。
count = oCommand.ExecuteNonQuery() ←この文でいつもシステム例外エラーが起きる。
因みに更新しようとしてるMdbのテーブルColumnはテキスト型です。
ぜひお願いします。
ソースは以下
========================
      Dim oConn As New OleDbConnection
            Dim oCommand As New OleDbCommand

            Const strUpdate As String = "UPDATE T_GROUP_ENV " + _
            "SET BS_DATA=@strData " + _
            "WHERE BS_GROUPID=@strGroupID AND BS_KEY=@strKey"

            'DB接続文字列の設定
            oConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=&q
uot; + _
                FileName_To_Tmp

            'コネクションの設定
            oCommand.Connection = oConn

            'DB接続を開く
            oConn.Open()

            For i = 0 To dtTable.Rows.Count

                dtRow = dtTable.Rows(i)


                'SQL文の設定
                oCommand.CommandText = strUpdate

                'SQL文パラメータの設定
                oCommand.Parameters.Add(New OleDbParameter("@strData", OleDbType.
VarChar,
255))
                oCommand.Parameters("@strData").Value = dtRow(2)
                oCommand.Parameters.Add(New OleDbParameter("@strGroupID",
OleDbType.VarChar, 10))
                oCommand.Parameters("@strGroupID").Value = dtRow(0)
                oCommand.Parameters.Add(New OleDbParameter("@strKey", OleDbType.V
arChar,
50))
                oCommand.Parameters("@strKey").Value = dtRow(1)

                '更新SQL文実行
                Dim count As Integer
                count = oCommand.ExecuteNonQuery()
                If count > 0 Then
                    '更新成功
                    MessageBox.Show("成功")
                Else
                    '更新するレコードがなかった時の処理
                End If

            Next

========================

[ツリー表示へ]
タイトルRe: Mdb更新について
記事No1394
投稿日: 2005/02/14(Mon) 15:17
投稿者花ちゃん
回答ではありません。下記の件はどうなったのでしょうか?
まず、そちらが先決では。

☆ - Fileリスト表示 - 迷惑 02/08-12:03 No.1371

☆ - MDBインポート - 迷惑 02/10-21:32 No.1386

[ツリー表示へ]
タイトルRe^2: Mdb更新について
記事No1396
投稿日: 2005/02/14(Mon) 15:42
投稿者迷惑
[OSのVer]:Windows    [VBのVer]:VB.NET  
すみません。今後注意します。
「MDBインポート」はまだなので「Fileリスト表示」のみレスしました。

[ツリー表示へ]
タイトルRe^3: Mdb更新について
記事No1397
投稿日: 2005/02/14(Mon) 16:25
投稿者花ちゃん
> 「MDBインポート」はまだなので「Fileリスト表示」のみレスしました。


> 質問の内容だと少し状況が把握しにくいので的確な回答ではないですが・・・。
>
> 単にデータのインポートをしたいのでしょうか?
> それともデータの整合性も確保する必要がありますか?

上記、レスに対するお礼や返信はするべきでしょう。

[ツリー表示へ]
タイトルRe: Mdb更新について
記事No1411
投稿日: 2005/02/16(Wed) 16:27
投稿者ぺがらぼ
参照先http://pegalabo.net/
とりあえず、
'DB接続文字列の設定
の下、oConn.ConnectionString = "Provi...
でブレークポイントに設定して、「strUpdate」の中身を確認してみてください。
あと、「コネクションの設定」と「DB接続を開く」の順番が逆なのでは?


------------------------------------------------------
ぺがらぼ
hhttp://pegalabo.net/
hhttp://www.ailight.jp/blog/pegalabo/

[ツリー表示へ]
タイトルRe^2:解決しました。
記事No1417
投稿日: 2005/02/17(Thu) 18:02
投稿者迷惑
有難うございました。指摘通りでした。

[ツリー表示へ]