• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

Çözüldü Kurum bilgilerini güncelle

Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

ERDAL

Gold Üye
Katılım
3 Nis 2021
Mesajlar
293
Çözümler
1
Aldığı beğeni
51
Excel V
Office 2013 TR
Gold Bitiş
21 Mart 2027
Konu Sahibi
Merhaba Arkadaşalar,

Kurmum listesini güncellerken (Kurum bilgilirini güncelle, açılanları ekle ve kapananları sil) olmak üzere 3 kod çalıştırarak bilgileri güncellemekteyim.
Bu kodu bire düşürebilirmiyiz

Yapılacak işlemeler;
Kurum bilglereni güncelleme; Kaynak dosyadaki ilçe, genel müdürlük, kurum türü ve kurum adlarını güncelemek eğer değişen kurum adı varsa "Durumu" başlığına 'Kurum Adı Degisti (03.06.2024)' şeklinde not düşmesi ve mesaj olarakta '.....................Kurum Adı Değişti şeklinde bilgi vermesi
Not: Bu bölümün kodu örnek olarak eklediğim dosyada var.

Kapanan kurum varsa sil: Eğer kurum kaynak dosyada olmayıp hedef dosyada var ise ilgili kurumun bulunduğu satırın silinmesi ve mesaj olarakta '.....................Kurum kapandı' şeklinde bilgi vermesi

Açılan kurum var ise hedef dosyaya ekle: Eğer kaynak dosyada olup, hedef dosyada kurum yok ise, bu kurumun hedef dosyasına eklenlmesi
ve "Durumu" başlığına 'Yeni Açılış (03.06.2024)' şeklinde not düşmesi ve mesaj olarakta '.....................Açıldı şeklinde bilgi vermesi

Güncelleme işleminde ben ADO kullandım. Eğer ADO kullanarak yapılırsa daha iyi olur.

Yardımlarınız için şimdiden teşekkür ederim.
 
Çözüm
Eğer yazdıklarımı tek sub içine alırsanız çok kafa karıştırır bunun yerine parametreler ekledim.

KURUM_BİLGİLERİNİ_GETİR kodunu çalıştırırsanız silme ve eklemede çalışır.
Yada önceden yazdığım gibi sub olanların adlarını yazacaksınız.

'Sonradan Eklenenler----------------------------------------------------------------------------------------------------
KurumSil con, rs, ws, yol
KurumEkle con, rs, ws, yol
'Sonradan Eklenenler----------------------------------------------------------------------------------------------------


Ayrıca yukardaki gibi yapınca silme ve ekleme kodlarına yol,recordset,connection vs... yazmaya gerek kalmadı.
Benden bu kadar kolay gelsin.

HTML:
C#:
İçeriği görebilmek için Giriş yap ya da Üye ol.
Eğer yazdıklarımı tek sub içine alırsanız çok kafa karıştırır bunun yerine parametreler ekledim.

KURUM_BİLGİLERİNİ_GETİR kodunu çalıştırırsanız silme ve eklemede çalışır.
Yada önceden yazdığım gibi sub olanların adlarını yazacaksınız.

'Sonradan Eklenenler----------------------------------------------------------------------------------------------------
KurumSil con, rs, ws, yol
KurumEkle con, rs, ws, yol
'Sonradan Eklenenler----------------------------------------------------------------------------------------------------


Ayrıca yukardaki gibi yapınca silme ve ekleme kodlarına yol,recordset,connection vs... yazmaya gerek kalmadı.
Benden bu kadar kolay gelsin.

HTML:
C#:
İçeriği görebilmek için Giriş yap ya da Üye ol.


HTML:
C#:
İçeriği görebilmek için Giriş yap ya da Üye ol.


HTML:
C#:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Çözüm
Aklıma takılan soruyu sormak istedim.
Silme ve Ekleme olayında kriter olarak sadece KURUM_KODU olarak kriter olarak yaptım.
Mesela silme için Açık excelde KURUM_KODU sütununda döngü yapıp kapalı excelde KURUM_KODU sütununda yoksa siliyor.Kriter olarak belki ilçe vs.. eklenmesigerekiyordur diye kafama takıldı.

Eğer fazla kriter olacaksa yeni konu açabilirsiniz.
 
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst