Sayın hocalarım Otel yönetimVt. adında programım var bunu içinde Oda Kayıt ve Rezervasyon diye 2 forum var burada yapmak istediğim Rezervasyon listesinde kayıtlı oda No ve Giriş tarihinin Oda kayıt formunda Kayıt yaptığım Oda No ve tarihle çakışması halinde Oda Kayıt formunda uyarı vermesi,ayrıca oda kayıt formunda giriş yaptıktan sonra kaydın Liste Kaydedilsinmi edlmesinmi şeklinde uyarı mesajı vermesi,şimdiden emeğinize sağlık,tşk ederim
Saygılarımla.

Ek Dosyalar

Otel Yönetim-deneme.rar(409.89 KB)

odano metin kutusunun güncelleştirme sonrasında olayına aşağıdaki kod yazıldı.

On Error Resume Next

Dim OdaSira As Integer

Dim OdaKalan As String

OdaSira = Dlookup ("Kimlik", "[tbl_odabilgileri]", "[bosdolu]=0 And [ODA NO] =" & [odano])

OdaKalan = Dlookup ("[ADI] &' '&[SOYADI]", "tbl_musteri", "[odaid]=" & OdaSira)

If OdaSira <> 0 Then

MsgBox (odano & " numaralı odada " & OdaKalan & " isimli Müşteri Kalıyor.")

End If

Ek Dosyalar

Otel Yönetim-deneme_sled.rar(242.6 KB)

Sayın hocam elinize sağlık,açılışta hatalı başvuru uyarısı alıyorum,kod hatası herhalde,bakabilirmisiniz.
Saygılarımla.

İndirdim denedim bir problem yok. Daha ayrıntılı bilgi ve resim ekleyiniz, referansları kontrol ediniz.

Ayrıca hocam uyarıyı Rezervasyon formunda değilde,oda kayıt formunda vermesi gerekiyor Örneğin Oda Kaydı yaptığımda eğer o güne rezerveli oda var ise şu uyarıyı yapması gerekiyor "Oda Rezervasyonlu" diye,sayagılarımla.

---

Nedendir bilmiyorum ama Oda Kayıt formunu tıkladığımda bende hata veriyor,uyarı şu eksik ve hatalı başvuru,saygılarımla.

---

Ek Dosyalar

Otel Yönetim-deneme_sled.rar(242.6 KB)

Sayın yunusotel,

tbl_rezervasyon isimli Formda Oda No metin kutusundan çıkılınca gerekli uyarıyı yapıyor. Buradaki sistemi inceleyip diğer formda uygulayacaksınız. Bence her zaman lazım olacak bu işlemi öğrenmeniz menfaatinize olacaktır.

Diğer yandan yukarıdaki yazdığım mesajı keşke değerlendirseydiniz. Ne demişiz "referansları kontrol ediniz".