Skip to main content

AccessTr.neT


veri tabanında kayıttan başka kayda kopyalama

veri tabanında kayıttan başka kayda kopyalama

Çözüldü #1
merhabalar,

ekteki veritabanı, bir adet tablo ve formdan oluşuyor. yapmak istediğim, tablodaki "ad" "soyad" bölümünde yazan kısım hariç, kalanları bir kayıttan diğerine kopyalayabilmek. (örneğin, bir butona tıklayınca; ilk kayıttaki "ali veli" için "ülke", "şehir", "yaş" ve "okul" alanlarında bulunan veriyi "yasin k" ve "emre y" içindeki ilgili alanlara kopyalamak istiyorum)

yardımlarınızı bekliyorum.

teşekkürler
.rar Database1_2003.rar (Dosya Boyutu: 10,87 KB | İndirme Sayısı: 5)
Son Düzenleme: 01/09/2009, 09:29, Düzenleyen: passenger.
Cevapla
Çözüldü #2
Güncelleme Sorgusu ile yapılmış örneğiniz ektedir.

Ancak bu işi devamlı mı yapacaksınız, yoksa bir kereye mahsus mu belli değil.
Ayrıca tablonuzda bir anahtar alan bile yok, bu şekilde doğru değil.
.rar Database1_2003_Seruz.rar (Dosya Boyutu: 12,31 KB | İndirme Sayısı: 18)
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla
Çözüldü #3
SERUZ merhaba,

üstad haklısınız:
yeni bir anahtar alan oluşturdum.
bir de bu işi devamlı yapacağız.

aslında bu konuyu bu proje için yapmayacağız, kafamızda yeni proje sadece taslak olarak var ancak size üzerinde çalışılabilecek bir veritabanı vermek için oluşturduk.

istediğimiz fonksiyon şu: diyelim ali veli için girilen kayıtları başka kayıtlarda da kullanmak isteyeceğiz. bunu da, ali veli kaydı içinde iken, (ilk gönderdiğim db içinde olmayan sonradan eklediğimiz form içindeki) KOPYALA butonuna tıklayarak yapmak istiyoruz. bu butona tıklayınca, bize ali veli kaydında yer alan "ülke", "şehir", "yaş" ve "okul" alanlarındaki kayıtları db içinde halihazırda mevcut olan (örneğin yasin y) kaydına ve ilgili "ülke", "şehir", "yaş" ve "okul" alanlarına kopyalamasını istiyoruz. tabi burada kopyalama yapılacak yeri de bize sorması gerekiyor ki orayı seçebilelim. bunu da şu şekilde düşündük: bi listboxt yaptık, ad-soyad'ı seçip o kayda kopyalama yapmak güzel olur. (bu arada yeni db ekte)
yeniden düzenlediğimiz db'de, ülke alanı da combobox oldu bu arada..

biraz uzun oldu ama umarım anlatabilmişimdir. ilgilinize teşekkürler.
.rar Database1_2003_Seruz_0.rar (Dosya Boyutu: 15,01 KB | İndirme Sayısı: 9)
Cevapla
Çözüldü #4
Gün içinde fırsat bulduğumda bakacağım.

"Lütfen dosyalarınızı sıkıştırıp gönderin" diye ısrarla belirttiğim halde yine direkt mdb olarak göndermişsiniz.
Gönderdiğiniz dosya 276kb iken "Düzenle ve Onar" yapıp RAR olarak sıkıştırdıktan sonra sadece 15kb oluyor.
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla
Çözüldü #5
seruz hocam kusura bakmayın, dalmışım Img-grin bından sonra dikkat ederim.

teşekkürler,
Cevapla
Çözüldü #6
Örnek ektedir.

Kod:
Private Sub Command7_Click()
Dim Secilen_ID

    'Uyarı mesajları kapatılıyor
    DoCmd.SetWarnings False
    
    'Listeden seçilenler tek tek işleme alınıyor
    For Each Secilen_ID In Me.Kopya_Listesi.ItemsSelected
        
        'Formda görünen kişinin bilgileri seçilen kişiye kopyalanıyor
        DoCmd.RunSQL "Update Table1 Set ülke=forms!form1.ülke, şehir=forms!form1.şehir, yaş=forms!form1.yaş, okul=forms!form1.okul Where Kisi_ID=" & Secilen_ID
        
        'Listedeki seçim kaldırılıyor
        Me.Kopya_Listesi.Selected(Secilen_ID) = False
    
    Next Secilen_ID
    
    'Liste güncelleniyor
    Me.Kopya_Listesi.Requery

    'Uyarı mesajları açılıyor
    DoCmd.SetWarnings True

End Sub

.rar Kopyala_Seruz.rar (Dosya Boyutu: 14,78 KB | İndirme Sayısı: 26)
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da