AccessTr.neT
girilen tarih tabloda var ise hata vermesi - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: girilen tarih tabloda var ise hata vermesi (/konu-girilen-tarih-tabloda-var-ise-hata-vermesi.html)

Sayfalar: 1 2 3 4


Cvp: girilen tarih tabloda var ise hata vermesi - slayerrrrr - 23/02/2012

istediğiniz gibi güncelledim hocam


Cvp: girilen tarih tabloda var ise hata vermesi - POWER - 23/02/2012

Dosyayı açtık ama ne yapmak istediğinizi anlayamadım.

Form2 yi açtım.

1.adım Veri alındı
2.adım 01,01,2012 ve 05,01,2012 SONUÇ a bastım
3.adım Ara Tablo Temizle ye bastım

Yapılacak olan nedir ?


Cvp: girilen tarih tabloda var ise hata vermesi - slayerrrrr - 23/02/2012

2. adımda çetiğiniz tarih 01,01,2012 ve 05,01,2012 tarih ve aralağındaki diğer tarihleri DU tablosundan kontrol edicek ve var ise hata vericek ve işlemi durdurucak daha önce bu tarih aralığını çektiniz gibi mesela


Cvp: girilen tarih tabloda var ise hata vermesi - POWER - 23/02/2012

Bitiş tarihinin Güncelleme sonrasına aşağıdaki kodu yapıştırın.
Private Sub ST_AfterUpdate()
Dim B1, B2 As String
Dim Sql As String
Dim db As Database
Dim rs As DAO.Recordset
Set db = CurrentDb()

B1 = Mid(BT, 1, 2) & Mid(BT, 4, 2) & Mid(BT, 9, 2)
B2 = Mid(ST, 1, 2) & Mid(ST, 4, 2) & Mid(ST, 9, 2)

SQL = "SELECT * FROM DU"
Set rs = db.OpenRecordset(SQL)
If rs.EOF = True Then GoTo 400

rs.MoveFirst
Do Until rs.EOF
If rs!TARİH < B1 Then GoTo 300
If rs!TARİH > B2 Then GoTo 300
MsgBox ("Daha önce aktarılmış tarih var.... Kimlik = " & rs!Kimlik)
GoTo 400
300
rs.MoveNext
Loop
400
End Sub



Cvp: girilen tarih tabloda var ise hata vermesi - slayerrrrr - 23/02/2012

Hocam eline sağlık istediğim olmuş ancak sorunlar var
1.Hatayı verdiği zaman tamam bastığımızda işlem duruyor ancak tekrar sonuc butonuna bastığımda hata vermeden devam ediyor.
2.Hata verdi tamam basıtım tarihi değiştirdim ve girdiğim tarihte aslında tabloda var ama yine beni uyarmadan işleme devam ediyor


Cvp: girilen tarih tabloda var ise hata vermesi - POWER - 23/02/2012

Ben kaydetme öncesi bilgi olup olmadığına baktırdım ve gerekli mesajı vermesini sağladım. Uygulamaya yön vermedim.

Diğer sorularınız için yeni konu açınız...