Excel Forum
ALTIN ÜYELİK Hakkında Bilgi


Geri Git   Excel Forum > Diğer Yazılımlar > Access Soruları
Atatürk
Şifremi Unuttum

DUYURU SİSTEMİ / REKLAM PANOSU

Access Soruları Access hakkındaki sorular ve cevaplar.
Dosya ekleyebilirsiniz

Özel Arama


Yanıtla
 
Paylaş Konu Araçları Görünüm Modları
Eski 09-03-2007, 08:24   #1
gulsum1
 
gulsum1 kullanıcısının avatarı
 
Giriş: 22/01/2007
Mesaj: 816
Excel Vers. ve Dili:
2003
Varsayılan taksitlendirme örneği ve yeni Access kod deposu

şu dillere destan taksitlendirme olayı varya hani benimle akd arkadaşı birbirine düşüren hem bu olaya bir son vermek hemde forma yeni giripte böyle bir uygulama arayanlar o konuya yönlenip bizim gereksiz mücadelemizi görmelerini istemediğimden bu yeni konuyu açma gereği gördüm

'kod bu
'başlangıç tarihine tarih girince son taksitin ne zaman olduğunu kişinin borcunun ne zaman biteceğini bittar alanına ekler
Private Sub bastar_AfterUpdate()
bittar.Value = Metin15.Value
End Sub



Private Sub Komut17_Click()
Dim rs As New ADODB.Recordset
rs.Open "tarih", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
z = taksay.Value 'taksay formda taksit sayısını girdiğimiz yer
For i = 1 To z Step 1 ' burda taksiti 1 den yazdığımız taksite kadar döndürür
Dim tar1 As Date
Dim tar As Variant
Dim n As Variant
Dim par As Variant
tar1 = bastar.Value ' tar1 adlı sanal alana başlangıç tarihini yazar
par = toplam.Value / taksay.Value 'par adlı sanal alana satış fiatını taksite böler
n = no.Value ' n adlı alana müşteri nosunu yazar taksit tablosuna eklemek için
tar = DateAdd("m", i, tar1) 'tar adlı sanal alana her dönmede 1 ay ekleyerek taksit sayısı kadar tarih üretir
rs.AddNew
rs("no") = n 'tabloya taksit sayısı kadar müşteri no ekler
rs("fiat") = par ' tabloya taksit sayısı kadar taksit ekler
rs("tarih") = tar ' tabloya döndürülmüş tarihleri sırayla ekler
rs.Update
Next i
Set rs = Nothing
Set conn = Nothing
DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70 ' eklenen veriler alt formda görünsün diye formu yeniler
End Sub


Access kod deposu yenilendi eklemeler yapıldı bir çok yerden kodlar toplandı ve eklendi arkadaşların bunu indirip access yardımı gibi kullanmalarını öneririm özellikle ado dao olayını incelesinler çünkü ado yada dao özellikle ağda access çalıştranlar için büyük kolaylık ve hız sağlar
Eklenmiş Dosyalar
Dosya Türü: rar taksitlendirme.rar (35.4 KB, 405 Görüntülenme)
Dosya Türü: rar AccessNot.rar (176.1 KB, 487 Görüntülenme)
gulsum1 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 09-03-2007, 09:03   #2
karaayhan
 
karaayhan kullanıcısının avatarı
 
Giriş: 16/11/2005
Şehir: Kayseri
Mesaj: 1,090
Excel Vers. ve Dili:
Access 2002
Varsayılan

ilk teşekkür benden olsun sayın gulsum1 hanım bu gün yine gününüzdesiniz.
__________________
--------------------------------------------------
Dünya düşünenler için bir komedi, Hissedenler için bir trajedidir ***
Hugh WALPOLE
karaayhan Çevrimdışı   Alıntı Yaparak Cevapla
Eski 09-03-2007, 11:26   #3
yasemincik
 
Giriş: 02/11/2006
Mesaj: 45
Excel Vers. ve Dili:
2003
Varsayılan teşekkürler

sayın gülsüm1 emeginize ve bilginize teşekkürler size yakışanı yaptıgınız içinde ayrıyeten teşekkürler programı inceledim büyük bir boşugu doldurdunuz dememe programı güzel çalışıyor ama bir şey dikkatimi çekti tüm verileri girdikten sonra taksit hesapla diyoruz hesaplıyor ama yanlışlıkla iki sefer butona basıldıgında taksit sayısını ikiye katlıyor ne kadar taksit hesapla butonuna basarsan o kadar alt formda taksit sayısı ve tarih borç artıyor mükerrer artışı önlenemezmi sizden ricam siz bununda üstesinden gelirsiniz ilgi ve emeginize teşekkürler saygılar
yasemincik Çevrimdışı   Alıntı Yaparak Cevapla
Eski 09-03-2007, 12:06   #4
gulsum1
 
gulsum1 kullanıcısının avatarı
 
Giriş: 22/01/2007
Mesaj: 816
Excel Vers. ve Dili:
2003
Varsayılan cevap

öncelikle teşekkürü hakedecek bir şey yapmadım bunu ben haftalar önce yapmıştım ama olayları bilyorsunuz ve ayrıca bu benim hiç işime yaramayacak bir şey ama baktım formda bu konuda koyulan örnekler doyurucu değil o nedenden dolayı koyma kararı aldım ve inanın bu ve bunun gibi bir çok örneği yapmak için benim koyduğum access kod deposu size yardımcı olur örneğin bu kod access kod deposundaki ado ve dao açıklamaları ile yine ordaki ado ile bir tabloya veri ekleme kodunu birleştirince çıktı sizde aynı sını yaparak bir çok uygulamayı kendiniz yaparsınız

mükerrer kaydı önlemeye gelince ya tabloda veri varsa tekrar veri eklenmeyecekki o olmaz çünkü adam aldığı malın taksidi bitmeden yeni birşey alabilir peki ozaman ne yapılabilir mantıken şöyle olbilir kod çalışmadan önceye eğer tarih daha önce girilmişlerden birine eşitse veri yazma bu tarih aralığında zaten taksit var gibi bir şey yapılabilir taksit konusunda çalışan arkadaşlar denesinler şayet yapamazlarsa ben tekrar düzenleyerek eklerim zaten bir çok eksiği var yok ödediği tasitleri topla toplam borçtan düş kalan taksit toplamı gibi basit şeyler bunu yapabileceklerini bildiğim için üzerinde uğraşmadım

Bu mesaj en son " 09-03-2007 " tarihinde saat 12:22 itibariyle gulsum1 tarafından düzenlenmiştir....
gulsum1 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 09-03-2007, 16:28   #5
assenucler
Altın Üye
 
Giriş: 19/08/2004
Şehir: Istanbul
Mesaj: 2,500
Excel Vers. ve Dili:
Office 2016 TR - Windows 10 TR x64
Varsayılan cevap

Sn. Gulsum1

Süpersiniz. Sizin egitici ve paylaşımcı katkılarınızı özledik. Teşekkürler.
__________________
Windows 10 Türkçe
Office 365 TR Ev Ekstra 2016
assenucler Çevrimdışı   Alıntı Yaparak Cevapla
Eski 09-03-2007, 18:21   #6
turkerdundar
 
turkerdundar kullanıcısının avatarı
 
Giriş: 02/03/2005
Şehir: ankara
Mesaj: 111
Excel Vers. ve Dili:
Office 2010 Türkçe
Smile teşekkürler

Slm bu örnek işime yarıyacak inşallah teşekkürler gülsüm1
__________________
Buralar sizlerle ve bizlerle özel vede güzel cankardaşlerim...
turkerdundar Çevrimdışı   Alıntı Yaparak Cevapla
Eski 21-03-2007, 10:13   #7
gulsum1
 
gulsum1 kullanıcısının avatarı
 
Giriş: 22/01/2007
Mesaj: 816
Excel Vers. ve Dili:
2003
Varsayılan oleee

access kod depomuz 300 dayandı gelişmeleri bekleyin sayın modalıdan bizim koyduğumuz depoya elinde değerli kodları ekleyerek güncellemsi şimdiden kendisine teşekkürü bir borç bilyoruz
gulsum1 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 21-03-2007, 10:15   #8
gulsum1
 
gulsum1 kullanıcısının avatarı
 
Giriş: 22/01/2007
Mesaj: 816
Excel Vers. ve Dili:
2003
Varsayılan olleee

300 yaklaştı
gulsum1 Çevrimdışı   Alıntı Yaparak Cevapla
Eski 21-03-2007, 11:05   #9
assenucler
Altın Üye
 
Giriş: 19/08/2004
Şehir: Istanbul
Mesaj: 2,500
Excel Vers. ve Dili:
Office 2016 TR - Windows 10 TR x64
Varsayılan Bekliyoruz

Sn. Modalı'nın

Kod bankasına katkısını bekliyoruz. Ustalara sonsuz teşekkürler. Her şey gönüllerince olsun. Sevgiyle hoşçakalın.
__________________
Windows 10 Türkçe
Office 365 TR Ev Ekstra 2016
assenucler Çevrimdışı   Alıntı Yaparak Cevapla
Eski 27-03-2007, 02:19   #10
geren
 
Giriş: 04/10/2006
Mesaj: 55
Excel Vers. ve Dili:
Excel 2002
Varsayılan

Gerçekten mükemmel. Emeklerinize sağlık...
geren Çevrimdışı   Alıntı Yaparak Cevapla
Yanıtla


Konu Araçları
Görünüm Modları

Gönderme Kuralları
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Açık
SimgelerAçık
[IMG] kodu Açık
HTML kodu Kapalı


Saat 11:38


Bu forum Elit NET - www.elitnet.com.tr tarafından sunulmaktadır.

Excel Eğitimi - Mobil Uygulama - Çorlu - Çorlu Web Tasarım - Tarot Falı - invest in turkey - Lingerie - Dyeing Machine - Karton Bardak- Çorlu Özel Eğitim- Site Yönetimi- Led Aydınlatma- Pronet Tekirdağ- Çorlu Kamera- Pronet Edirne- Pronet Kırklareli- Pronet Çerkezköy- Pronet Çorlu- Pronet Lüleburgaz- Pronet Keşan- Çorlu Araç Takip- Çorlu Su Arıtma- Boru Profil- Gebze Emlak- Beylikdüzü Temizlik- İstanbul Burun Estetiği- Bakır Sülfat- Rampa- Rotary- Çorlu İnternet Sitesi- youngblood- Çorlu Palet- Çerkezköy Palet- Çorlu Prefabrik- Çorlu Sürücü Kursu- Çorlu Sandviç Panel- Şişli Avukat- Korona Test Kalemi- Çorlu Vinç- Çorlu Pimapen Tamiri-
Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Advertisement System V2.6 By   Branden