タイトル : Re^2: 重複チェック 投稿日 : 2009/01/26(Mon) 16:36 投稿者 : nao
> > 重複してないかどうかはどう記述していけば宜しいのでしょうか? > > Insertする前にSelectかければ、重複してる時にレコードが返ってくると思いますよ。 琴さん、有難うございます。 Dim chk As ADODB.Recordset を加え ss = "select * from TBL where コード = '" & txt(0).Text & "' " chk = New ADODB.Recordset chk.Open ss If chk.RecordCount = 0 Then Ret = MsgBox(・・・ と書き加えたのですが『プロパティの使い方が不正です』と出てしまいました。 記述の仕方をご教授いただけますでしょうか。 よろしくお願いいたします。 |