Skip to main content

AccessTr.neT


Hata mesajı hk.

Hata mesajı hk.

Çözüldü #8
Private Sub Barkod_AfterUpdate()
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[BarkodSeriNo] = '" & Me![Barkod] & "'"
If Not rs.EOF Then Me.Bookmark = rs.Bookmark

If ([Barkod] = BarkodSeriNo) Then

Else

MsgBox "mesajınızı buraya yazabilirsiniz", 64, "İsmail ÇINAR"

End If
End Sub

verdiğiniz kodu metin kutusunun adını barkod olarak değiştirerek denedim fakat hata veriyor Me.Bookmark = rs.Bookmark kısmını sarı ile işaretliyor.
erkanb, 06-11-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Hata mesajı hk. - Yazar: erkanb - 13/02/2012, 16:34
Cvp: Hata mesajı hk. - Yazar: iscinar - 13/02/2012, 16:43
Cvp: Hata mesajı hk. - Yazar: erkanb - 13/02/2012, 16:48
Cvp: Hata mesajı hk. - Yazar: iscinar - 13/02/2012, 16:50
Cvp: Hata mesajı hk. - Yazar: iscinar - 13/02/2012, 17:00
Cvp: Hata mesajı hk. - Yazar: erkanb - 13/02/2012, 17:03
Cvp: Hata mesajı hk. - Yazar: iscinar - 13/02/2012, 17:19
Cvp: Hata mesajı hk. - Yazar: erkanb - 13/02/2012, 17:47
Cvp: Hata mesajı hk. - Yazar: iscinar - 13/02/2012, 18:59
Cvp: Hata mesajı hk. - Yazar: erkanb - 14/02/2012, 01:46
Hata mesajı hk. - Yazar: erkanb - 14/02/2012, 01:59
Cvp: Hata mesajı hk. - Yazar: iscinar - 14/02/2012, 12:07
Cvp: Hata mesajı hk. - Yazar: iscinar - 17/02/2012, 23:47
Task