トランザクション処理をするには？ (ID:115879)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 .ＮＥＴで開発をしています。 下記のようにテキストボックスに入力した内容でマスタを参照しています。 この時、他からアクセスできないようにレコードロックをかけたく、トランザクション処理を行いたいのですが、どのようにすればよいのでしょうか？ 説明がうまくできませんが、よろしくお願いいたします。 Dim cnCmd As SqlCommand Dim cnRd As SqlDataReader Call adoCmdCreate(cnCmd, cn) ' Command Object作成 If adoOpenReader(cnCmd, cnRd, strsql) Then If cnRd.HasRows Then cnRd.Read() Meisyo = RTrim(CType(cnRd.Item("hinme"), String)) End If End If Call adoCloseReader(cnRd) ***** オープン Public Overloads Function adoOpenReader(ByRef adoCmd As SqlCommand, ByRef adoReader As SqlDataReader, ByVal sExec As String) As Boolean Try adoCmd.CommandText = sExec ' SqlCommand文 作成 adoReader = adoCmd.ExecuteReader Catch End Try End Function ***********