Takvimi dış veri al ile alamıyorum - 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ığı: Takvimi dış veri al ile alamıyorum (/konu-takvimi-dis-veri-al-ile-alamiyorum.html) |
Cvp: Takvimi dış veri al ile alamıyorum - tdsharun - 18/05/2009 Takvim uygulaması olarak benim eklemiş olduğum bir uygulama var. Modul kullanıyor. Sürekli formda da kullanılabiliyor. Aradığınız örnek bu olabilir: Açılır Pop-Up Takvim Uygulaması Cvp: Takvimi dış veri al ile alamıyorum - firdevs - 19/05/2009 Harun Hocam denedim Tarih alanının çift tıklandığında olay yordamına Private Sub Tarihi_DblClick(Cancel As Integer) Dim blRet As Boolean Dim dtStart As Date, dtEnd As Date dtStart = Nz(Me.Tarihi.Value, 0) dtEnd = 0 blRet = ShowMonthCalendar(mc, dtStart, dtEnd) If blRet = True Then Me.Tarihi = dtStart Else MsgBox "Tarih seçmediniz!!! Lütfen kontrol edin...", vbOKOnly, "Tarih seçmediniz..." End If End Sub blRet = ShowMonthCalendar(mc, dtStart, dtEnd) satırında mc yi hta olarak kabul etti. Size zahmet olacak ama bu örneği bir sürekli forma uygulayarak tekrar gönderebilirmisiniz. Veya seruz hocamın örneği sürekli formda uygulanmış olursa bende uygulayabilirim. Başka türlü uyarlayamıyorum. Hocalarım ben hala , sürekli forma bu tarih örneklerini uygulayamadım. Konu cevaplanmış konulara taşınmış. Lütfen yardım edermisiniz... Cvp: Takvimi dış veri al ile alamıyorum - C*e*l*o*y*c*e - 19/05/2009 (19/05/2009, 08:27)firdevs yazdı: Size zahmet olacak ama bu örneği bir sürekli forma uygulayarak tekrar gönderebilirmisiniz. Sayın firdevs siz halen örneği eklememişsiniz, diğer konuya gelirsek tsdharun hocanın örneğinden almıntı yapmışsınız ve mc'nin hata verdiğini belirtiyorsunuz,acaba siz 1-bu örnekten alıntı yaparken modülleri almamış olabilirmisiniz 2-kodların hepsini almamışsınız gibime geliyor bakın o kodların geçmişinde mc'nin görevi var ... Option Compare Database Option Explicit Private mc As clsMonthCal Private Sub Form_Load() Set mc = New clsMonthCal mc.hWndForm = Me.hWnd End Sub Private Sub Form_Unload(Cancel As Integer) If Not mc Is Nothing Then If mc.IsCalendar Then Cancel = 1 Exit Sub End If Set mc = Nothing End If End Sub ...bunlara dikkat edin yadd örneğinizi bir ekleyin yardım ederken onun üzerinde yapmaya çalışalım ..kolay gelsin Cvp: Takvimi dış veri al ile alamıyorum - firdevs - 19/05/2009 Tamam hocam bu sefer başardım sanırım biraz ara vermem gerekiyormuş.. Off tam herşey tamam derken formun birinde çalışıyor birinde çalışmıyor. Gelir_Havale ve Gider_Havale sürekli formlarına ekledim. Birisinde her satırda çalışıyor diğerinde sadece ilk satırda çalışıyor. Sorunum çözüldü zannedip sizi uğraştırmayım diye örneği göndermekten vaz geçmiştim. Şimdi gönderiyorum. Bu işe işin uzmanı gerekiyor... örnek ekte Cvp: Takvimi dış veri al ile alamıyorum - tdsharun - 19/05/2009 Sayın firdevs, C*E*L*O*Y*C*E hocam zaten gerekli bütün açıklamayı yapmış. Örneğe bakarak örneği kendinize uygulamanız yeterliydi aslında. Neyse, ben sizin örneğinizdeki bahsettiğiniz iki forma da uyguladım. Kolay gelsin... Cvp: Takvimi dış veri al ile alamıyorum - firdevs - 19/05/2009 Hocam yaptığınız örnekte de gelir_havale deki butonlar çalışmıyor. Herneyse bensürekli forma takvim koymasam daha iyi olacak sanırım. Ne benim başım ağrır ne de sizin.. Yardımlarınız için teşekkür ederim... hWnd Sürekli form demek mi oluyor? |