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

タイトル テーブルからのデータ取得
投稿日: 2006/08/21(Mon) 11:11
投稿者スパナ
ソースとなるMDBファイルにテーブルを作成して、最初の列にランダムのIDを10行分書いて
その中で一番大きな数値を返して変数に代入する関数を作っているのですが、

'GetIDの引数
'StrConnect = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
'             "Data Source=" & Application.StartupPath & m_FileName
'StrSql = "SELECT MAX(ID) FROM テーブル"
'Name = "ID"

Public Function GetId(ByVal StrConnect As String, ByVal StrSql As String, _
                      ByVal Name As String) As Integer
    ' 接続文字列の設定
    m_dbConnect.ConnectionString = StrConnect
    ' 接続を開く
    m_dbConnect.Open()
    ' コマンドの設定
    m_dbCommand = m_dbConnect.CreateCommand()
    ' SQLの設定
    m_dbCommand.CommandText = StrSql

    Dim id As Integer
    'DataReader設定
    m_dbDataReader = m_dbCommand.ExecuteReader(CommandBehavior.SingleRow)
    'ID取得
    id = m_dbDataReader(Name)
    '接続を閉じる
    m_dbConnect.Close()

    Return id
End Function

以上のソースでの 「ID取得」 の部分で止まってしまいます。
何が間違いなのか皆目検討がつきませんのでどうかご指導をお願いします。

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

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