Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
11/03/2010 12:59
Konu Sahibi
osman06
Yorumlar
3
Okunma
2219
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

osman06

Aktif Üye
Aktif Üye
 Belirtilmemiş
239
22/11/2008
0
Ankara
Ofis 2003
15/07/2018,15:58
Çözüldü 
aşağıdaki kod un bi kısmı doğru çalışıyor yalnız aşağıdaki kodla şunu (siteden alınma bi koddur tabi) yapmak istedim 1 yıl ile 10 yıl arası 10 yıl dahil 20 gün 10 yıldan sonra 30 gün ama bu kodla 01.01.2000 yazdığımda 30 gün hesaplıyo bi yanlışlıkmı var acaba yardımlarınız için şimdiden teşekkürler.



Private Sub Komut39_Click()
Dim Bugun As Date
Dim CalSure As Long
Dim Giris As Date
Dim HakIzin As Byte
Dim Yl As Integer
On Error GoTo 10

Bugun = Date
Yl = Year(Bugun)
Giris = Me.BasTar
CalSure = Bugun - Giris

If CalSure <= 364 Then
HakIzin = 0
Else
If CalSure > 364 And CalSure <= 3652 Then
HakIzin = 20
Else
HakIzin = 30
End If
End If


DoCmd.OpenForm "Frm_YillikTahakkuk"
Forms![Frm_YillikTahakkuk]![HakTah] = HakIzin
Forms![Frm_YillikTahakkuk]![Ad] = Me.Adi
Forms![Frm_YillikTahakkuk]![SoyAd] = Me.Soyadı
Forms![Frm_YillikTahakkuk]![YLThk] = Yl
Exit Sub

10 MsgBox Err.Description
Exit Sub

End Sub



Kullanici Avatari

Puletin

Onursal Üye
Onursal Üye
 Belirtilmemiş
1.716
01/11/2008
416
-
Ofis 2003
24/12/2016,00:18
Çözüldü 
Örneğiniz olmadığı için ufak bir örnek hazırladım
İşinizi görürse kendinize uyarlayınız isterseniz...


Ek Dosyalar
.rar   Yılizin.rar(Dosya Boyutu: 24,5 KB / İndirme Sayısı: 61)
Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...

Kullanici Avatari

osman06

Aktif Üye
Aktif Üye
 Belirtilmemiş
239
22/11/2008
0
Ankara
Ofis 2003
15/07/2018,15:58
Çözüldü 
hocam çok tşk elinize sağlık



Kullanici Avatari

Puletin

Onursal Üye
Onursal Üye
 Belirtilmemiş
1.716
01/11/2008
416
-
Ofis 2003
24/12/2016,00:18
Çözüldü 
Rica ederim ...


Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Güvenlik Kontrol Kodu idrisy 2 128 03/07/2018, 02:44
Son Yorum: idrisy
Çözüldü Uzun Tarih Filtreleme Hakkında (tarih Saat) sertac76 2 133 22/06/2018, 16:44
Son Yorum: sertac76
Çözüldü Mükerrer kayıt engelleme hakkında orkuncan5 10 5.870 20/06/2018, 15:48
Son Yorum: okan60
Çözüldü İç İçe Iff Kodu Sorunu mcaratash 4 121 09/05/2018, 12:13
Son Yorum: mcaratash
Çözüldü Arama Kodu Fikri güler 3 253 09/04/2018, 19:55
Son Yorum: Fikri güler

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2018 MyBB Group.