Sorguların fazla olmasından nasıl kurtulabilirim?

[ayhan2122]

Aşağıdaki örnekte 30 tane ekleme sorgusu yaptım ve her biri bir koşula bağlı olarak çalışıyor. Örneğin bu günden başlayarak 5 gün eklemesini istersem eklenecek tabloya, her bir satıra bir gün olacak şekilde 5 gün ekleniyor. 30 gün eklemek istersem eklenecek tabloya, her bir satıra bir gün olacak şekilde 30 gün ekleniyor. Bu ekleme işini 31 gün yapamıyorum veya daha fazla. Yapabilmem için ekleme sorgularının sayısını arttırmam gerekiyor. Yani 45 gün yapmak istersem o zaman 45 tane sorgu oluşturmam ve Bu sorguları bir seferde çalıştıracak düğmenin olay yordamına da bu 45 satırı yazmam gerekiyor. Doğal olarak ZAHMET.
Velhasıl beni bu dertten kurtaracak bir kod varmı?

 

[modalı]

Sayın ayhan2122,

Bu sorgularla neyi hedeflediğinizi anlayamadım. Bence gereksiz bir işlem.

 

[mehmetdemiral]

Ben seçtiğiniz yöntemi hiç eleştirmeden sorguların rahatsızlık vermeden çalışmasını sağladım. fena olmadı galiba... Bir inceleyin.. NOT: Bu arada makro2 de sadece 4 sorgunuzdan sonra form kapatma komutu verdim. Siz oraya bence 45 sorgunuzu da koyun. O zaten ana formda kaç gün izin varsa o kadar izin yazıyor. Önceden hiç durmadan, siz iptal diyene kadar soruyordu kaydedeyim mi diye... Böyle süper oldu ama siz sorgularınızı 45'e tamamlayıp aynı yöntemle makro2ye 45 sorguyu da ekleyin. -45 günlük tek izin oluyor mu bilmiyorum - İzin istemci formunda kaçgün izin istersen o kadar izin yazar. Sonra formu kapatı yine koyun.

 

[yeni54]

Ne yapılmak istendiğini anlamadım.

Ama, basit bir döngü ile yapılabilecek bişeyler varmış gibi geliyor bana.

Biraz daha detaylandırsana şunu.

 

[ayhan2122]

Bir başka deyişle;

Gönderdiğim dosyayı aldıysanız onu açın ve AnaPano'dan İzinİşlemciFormu'nu açın ve "İzinİşlemciÇalıştır" düğmesinin olay yordamına bir bakın. Kodda 30 adet sorgunun çalıştırıldığını göreceksiniz.
Ben diyorum ki;
Hiç sorgu olmasın ve aynı işlem, sadece 30 kayıt değil, sınırsız sayıda kayıt ekleyebilsin.
İlgi gösteren arkadaşlara tekrar teşekkürlerimi sunarım.
Saygılar, İyi Çalışmalar.

 

[ayhan2122]

Sn mehmetdemiral;

Öncelikle ilgilendiğin için teşekkür ederim.
Sizin yaptığınızın benim yaptığımla bir farkı yok. Tek fark, ben sorguları kodlarla çalıştırıyorum, Siz ise makrolarla. Benim istediğim veritabanında hiç sorgu olmadan bu işlemin yapılabilmesi.
Saygılar, İyi Çalışmalar.

 

[yeni54]

Kodda 30 adet sorgunun çalıştırıldığını göreceksiniz.

Yahu mübarek adam , ne yapmak istediğini sözlü olarak anlatsana.
Ne diye sorguların ne yapmaya çalıştığını çözmeye çalışalım.

Ben şunu şunu şunu yapmak istiyorum de.

Sorguyla mı yaparız, sihirbazla mı yaparız neyle yaparsak yaparız. O yapacak olanın bileceği iş. (yiğit/yoğurt misali)

Olayı anlamıyoruz anlayacağın.

 

[ayhan2122]

Şunu yapmak istiyorum;

izin adlı bir tablo içindeki alanlar
Kimlik=OtomatikSayı,BirincilAnahtar
izinNO=Sayı
AdıSoyadı=Metin
İzinliGünler=Tarih/Saat
İzininKaçıncıGünOlduğu=Metin
Yukarıdaki tabloya bir ekleme sorgusu oluşturmak istiyorum.
Şöyle ki;
Bir form üzerinde AdıSoyadını, İzninin kaç gün olacağını ve iznin ilk başlama tarihini girdiğim zaman onayladığımda otomatik olarak kaç gün eklenmişse yukardaki tabloya o kadar satır eklensin.
Tablodaki veriler örn şöyle olsun :
Kimlik İzinNO AdıSoyadı İzinliGünler İznininKaçıncıGünOlduğu
1 1 Ali Veli 10.09.2007 1/3
2 1 Ali Veli 11.09.2007 2/3
3 1 Ali Veli 12.09.2007 3/3

 

[yeni54]

ayhan2122, küçük bir döngü kurup dener misin.

ado kullanıcan.

sayac kullanıcan.

bir sql cümlesi oluşturucan. (bu cümle değişkenli olacak ve insert ... ile başlayacak tabi)

sonunda da xxxxx.execute(sql) yapıcan.

vaktim olsa yazardım. (bu ado komutlarını ezberleyemediğim için her seferinde kopya çekiyorum onun için pat diye yazamıyorum)

biraz uğraş. yardım eden olacaktır illaki. (beab05 buralarda)

 

[beab05]

Ben bişey anlamadım ki ?!! Tabloya neden kaydediliyor ?? Kısaca kurgudan hiçbişey anlamadım..

 

[mehmetdemiral]

Benim yaptığım ile sizin yaptığınız arasındaki farklar şöyle sıralanabilir:

1- Sizin çalışmanızda kaç gün izin verirseniz verin yapıyı durdurmak için 30 kez evet deyip artık "0 kayıt eklenecek" diye uyarmaya başladığında iptale basmanız gerekiyor. Ve tüm bu işlemler kullanıcıyı yoruyor. Oysa ben geçici olarak eylem sorgularının onay almadan ve siz hiç müdahale etmeden işini yapmasını sağladım. Size hiç sormadan ve onay istemeden işlem tamamlanıyor.

2- Kurduğunuz yapıyı hiç eleştirmeden ve radikal değişiklikler teklif etmeden verdiğiniz emeğinizi değerlendirdim. Eğer izin 45 günü geçecekse ikinci bir işlem yapabilirdiniz. Temel benim değil sizin temeliniz. Ben kurduğunuz yapıyı sadece işler hale getirmeye çalıştım.

3- Bu işi sorgular olmadan yapmak, bu kadar uğraştıktan sonra size sadece merakını gidermeyi öğretir. İnsanların bir projede sonuca ulaşması önemlidir. Ben yolun nasıl olduğuna değil, neticeye bakmanızı öneririm. Makro kullanarak bu işi kısa sürede oluşturmak varken illa da kod kullanacağım ve uzun uzun kodlarla bu işi halledeceğim diyorsanız saygı duyarım... Kolay gelsin..

 

[yeni54]

demek istediğimi bir buton ile ekledim. bir bak.

(dosyanın uzantisi 7z.)

 

[mehmetdemiral]

Süper olmuş Helal valla. Elmeğine sağlık Yeni54. Ayrıca diğer konu için de sağol... Anladın herhalde ...

 

[ayhan2122]

Hele şükür!

Sonunda sorunumu biri anlamış ve çözmüş. Teşekkürler Sn yeni54.
Yahu bir soru sordum nerdeyse sorduğuma soracağıma pişman olacaktım. Neyi anlatmak istediğim buydu. Ben de bu foruma üye olduğumdan beri bir çok arkadaşın sorununa çözüm buldum. Ancak hiç kimseye sebebini, veya amacını , sorunu çözerse ne faydası olacak gibi veya daha başka bir şeyini sormadım. Soruyu anladığım şekilde cevap verdim. Ben access'i "hiç bir eğitimini almadan" öğrendim. Niyetim eksik olduğumu hissettiğim bir konuda bilgi almaktı. Acaba olabilir mi dedim. İlk örnekte gönderdiğim izin programı sorunu olan birine cevabımdı. Çok uzattım galiba ama bazı arkadaşlara kırıldığımı da söylemek isterim. Accesste benden iyi olan ÜSTADlara ve öğrenme çabası olan arkadaşlara saygılar. Ama üstadların da bizi azarlamaması dileğiyle herkese iyi çalışmalar.

 

[yeni54]

...Ancak hiç kimseye sebebini, veya amacını , sorunu çözerse ne faydası olacak gibi veya daha başka bir şeyini sormadım. Soruyu anladığım şekilde cevap verdim.

Soracaksın arkadaşım soracaksın. Sormalısın.

Niye soracaksın dersen:

Genel olarak bu forum üyeleri, temelde bilgisayar eğitimi almamış, yani işi programlama olmayan, ama çok akıllıca hareket edip bilgisayarı yardımcı bir araç olarak kullanıp işlerinin maksimum performans ile çözülmesini sağlayan ve hızlandıran akıllı kimseler.

Bu sebepledir ki, iş çözümlerinde, temel bazı bilgi eksikliklerinden dolayı kurgulama hataları yapabilmekteler ki bu da çok normal.
Onun için neyi niye yapmak istediğini soracaksın ki, yapılan iş daha bir sağlam temellere otursun. Maksat tamamen bu.

Yoksa dediğin gibi azarlama, fırçalama küçük görme vs.vs gibi hiç birşey olmaz olamaz.
Sadece biraz basma kalıplıktan çıkıp işe biraz espri katmak, havayı sanal bir sohbet havasına çevirmek. Sanal samimiyeti artırmak, doğal olmak.

vs.vs.vs...

 

[nafis]

Özürdileyek soruyorum dosyayı açamadım bsit bir soru ama uzantı 7z nereden değiştirilitor.

 

[mehmetdemiral]

Sonunda sorunumu biri anlamış ve çözmüş. Teşekkürler Sn yeni54.
Yahu bir soru sordum nerdeyse sorduğuma soracağıma pişman olacaktım. Neyi anlatmak istediğim buydu. Ben de bu foruma üye olduğumdan beri bir çok arkadaşın sorununa çözüm buldum. Ancak hiç kimseye sebebini, veya amacını , sorunu çözerse ne faydası olacak gibi veya daha başka bir şeyini sormadım. Soruyu anladığım şekilde cevap verdim. Ben access'i "hiç bir eğitimini almadan" öğrendim. Niyetim eksik olduğumu hissettiğim bir konuda bilgi almaktı. Acaba olabilir mi dedim. İlk örnekte gönderdiğim izin programı sorunu olan birine cevabımdı. Çok uzattım galiba ama bazı arkadaşlara kırıldığımı da söylemek isterim. Accesste benden iyi olan ÜSTADlara ve öğrenme çabası olan arkadaşlara saygılar. Ama üstadların da bizi azarlamaması dileğiyle herkese iyi çalışmalar.

Sevgili Ayhan arkadaş.. Galiba bu ifadeleriniz bana yönelik olarak yazıldı. Oysa ben sizin emeğinizi ziyan etmemek için emek vermiştim. Yanlış anlaşıldım sanıyorum. Bilseydim sizin dosyanıza yardımcı olmak istemezdim valla. Kusura bakmayın.

 

[ayhan2122]

Sn mehmetdemiral;

Sitemim kesinlikle size değil. Siz anladığınız biçimde çözüm önerdiniz. Yani bana iyilik yaptınız. Sadece Modalı arkadaşımızın "bence gereksiz bir işlem" demesi biraz tuhafıma gitti. Üstüne üstlük sorunun bu kadar basit olmasına ve 3 sefer açıklamama rağmen anlaşılamaması. Ben sadece kırıldım ve bunu ifade etmek istedim.
Eğer benim üzdüğüm kimse varsa Ben ÖZÜR DİLİYORUM. Neyse konuyu kapatalım. Yardımlara ve Öğrenmeye ve Öğretmeye devam.
Sn Nafis;
7z bir sıkışttırma programıymış (şimdiye kadar bende bilmiyordum). Aşağıdaki adresten indirebilirsiniz.
http://www.inndir.com/program.php?id=23099

 

[beab05]

Winrar kurarsanız 7z yi açabilirsiniz...

 

[nafis]

Sn.ayhan2122 ve beab05;

Teşekkür ederim