AccessTr.neT

Merhaba

Siparişler kaydet butonuna eklediğim aşağıdaki kod ile Siparişler ve SiparisAltForm da boş metin kutusu varsa kayıt yapmasın. Uyarı versin istiyorum. Eklediğim kod çalışmiyor.  Siparişler veya SiparisAltForm da boş metin kutusu olmasına rağmen kayıt yapıyor.  

Örneğin: Siparişler Formu boş iken SiparisAltForma veri giriyorum. Sonra Siparişler formunda herhangi bir metin kutusuna odaklandığım zaman SiparisAltForma daki verileri kayıt ediyor ve SiparisAltForma daki mesin kutularını temizliyor. Siparisler Formundaki metin kutuları boş olduğu zaman SiparisAltForma daki metin kutularına veri girmemize izin vermese çok iyi olur.

Merhaba

If Me.Alan adı = "" Or IsNull(Me.Alan adı) Then
..............
şeklinde deneyin

Hocam AltForm metin kutularının boş olduğunu nasıl denetliyebiliriz.

If Forms!FormAdı!Denetimadı="" or isnull(Forms!FormAdı!Denetimadı) then.....

Hocam kodu bu şekilde giriyorum hata veriyor nerede hata yapıyorum. Kayıt butonu Siparisler Formunda URUN_ADI metin kutusu SiparislerAltForm da.

If Forms!SiparislerAltForm!URUN_ADI = "" Or IsNull(Forms!SiparislerAltForm!URUN_ADI) Then

If Me.Form![URUN_ADI] = "" Or IsNull(Me.Form![URUN_ADI]) Then
MsgBox "Boş metin kutusu uyarısı"
Me.Form![URUN_ADI].SetFocus
Exit Sub
End If
şeklinde deneyin