otel programı

dreamboys94 · 11-05-2011, 16:51

yeni kayıta geldiğimde çıkış tarihinide oluyo imleç. hata veriyo onu nasıl giderebilirim.

Taruz · 12-05-2011, 15:44

İlgili prosedürü bununla değiştiriniz..:

Visual Basic
Sub trz()
If NewRecord = False Then
On Error Resume Next
Dim tar As Date
Dim kc_kal As Integer
gir_tar.SetFocus
tar = gir_tar
kac_gün_kalacak.SetFocus
kc_kal = Val(kac_gün_kalacak.Text)
Metin12.SetFocus
Metin12.Text = DateAdd("d", kc_kal, tar)
Else
oda_no.SetFocus
End If
End Sub

dreamboys94 · 12-05-2011, 17:30

yeni kayıt eklerken çıkış tarihi boş gelebilir mi?

Taruz · 12-05-2011, 17:39

Visual Basic
Sub trz()
If NewRecord = False Then
On Error Resume Next
Dim tar As Date
Dim kc_kal As Integer
gir_tar.SetFocus
tar = gir_tar
kac_gün_kalacak.SetFocus
kc_kal = Val(kac_gün_kalacak.Text)
Metin12.SetFocus
Metin12.Text = DateAdd("d", kc_kal, tar)
Else
oda_no.SetFocus
Metin12 = ""
End If
 
End Sub

Ayrıca, özel mesajla sorulan soruları dikkate almıyorum.. Sorunuzu konuda paylaşmanız yeterli..

dreamboys94 · 12-05-2011, 21:45

boş geliyo bu seferde tıklayınca tarihi vermiyo

Taruz · 12-05-2011, 21:48

Tıklayarak tarih getirmenin bir anlamı yok zaten.. Kaydet adında bir buton ekleyip konuda trz yazın veriler eşitlenir.. Ya da Metin12 = "" komutunu istediğiniz şekilde farklı olaylarda kullanın.. Bu komut kutuyu temizler..

Benzer Konular...
Konu:		Yazar	Cevaplar:	Gösterim:	Son Mesaj
	[SORGU] OTEL TAKİP SQL VERİ TABANLI	betmen	1	1.935	03-03-2018, 14:21 Son Mesaj: onur_can
	Otel Otomasyonu veritabanı	ercn	1	4.905	21-05-2016, 05:13 Son Mesaj: dsezgin
	ODEV: Otel otomasyonu	ercn	1	1.673	26-04-2016, 22:53 Son Mesaj: onur_can
	ÖDEV: ACCESS'DE OTEL İLE İLGİLİ VERİ TABANI ..	rrawness34	3	2.918	03-04-2016, 07:28 Son Mesaj: dsezgin
	TALEP:Meslek yüksekokulu Haftalık ders programı hazırlama programı	bahriye terlemez	2	3.491	12-09-2015, 10:33 Son Mesaj: afatsum75
	[TABLO] arkadaslar bır arkadasımın acces te yapılan otel verı tabanına ıhtıyacı var	gelmen	1	2.022	06-05-2013, 18:59 Son Mesaj: serdar2020
	[TABLO] SQL 'DE OTEL TAKİP PROGRAMIMA YARDIMCI OLUR MUSUNUZ	emre343	0	1.596	02-05-2013, 18:51 Son Mesaj: emre343
	[TABLO] otel	fatma4563	1	1.540	19-04-2013, 17:19 Son Mesaj: dsezgin

Oturum Aç




Beni Hatırla Şifremi Unuttum?

Access SQL