Tablo Aktarması Hakkında
Tarih
23/02/2009 00:25
Konu Sahibi
SADIK54
Yorumlar
11
Okunma
2412
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



SADIK54
Aktif Üye
Kullanici Avatari
Aktif Üye
252
15/11/2008
0
Sakarya
Ofis 2003
09/10/2016,07:39
Çözüldü 
resim

resim



Arkadaşlar liste kutusunda seçtiğim bilgileri form sayfası içinde hücrelere yazdırıp başka bir tablodan gelen liste kutusuna aktarma yapmak istiyorum bu konuda yardımcı olurmusunuz. örnek dosyam ektedir.


Ek Dosyalar
.rar   deneme.rar (Dosya Boyutu: 24,49 KB / İndirme Sayısı: 21)
Cevapla


SADIK54
Aktif Üye
Kullanici Avatari
Aktif Üye
252
15/11/2008
0
Sakarya
Ofis 2003
09/10/2016,07:39
Çözüldü 
arkadaşlar konu hakkında yardımcı olacak kimse yokmu yardımlarınızı bekliyorum.
Cevapla


mehmetdemiral
.
Kullanici Avatari
Uzman
M.... D....
4.734
30/10/2008
Samsun
Ofis 2013 Tr. 32 Bit
Bugün,00:14
Çözüldü 
Merhaba
Her bir buton teker teker verileri diğer metin kutularına aktarırken her seferinde uyarmasın

Kod:
DoCmd.SetWarnings False 'Eylem sorgusu uyarılarını kapatalım


aktarma ve silme başlasın

Kod:
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
        DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
        DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70


Bu arada tüm kutular dolduğunda, yani 4 aktarım yapıldığında, form üzerine koyduğum sayaç "4" sayısına geldiğinde listeye aktarım butonu görünsün.
Onun denetim kaynağı şöyle:

Kod:
=IIf(IsNull([1 Adı Soyadı]);0;1)+IIf(IsNull([2 Adı Soyadı]);0;1)+IIf(IsNull([3 Adı Soyadı]);0;1)+IIf(IsNull([4 Adı Soyadı]);0;1)  



Sayaç 4 olduğunda ne yapılacak?

Kod:
If Metin57 = 4 Then ' metin57 4 ise
Komut56.Visible = True ' Komut56 görünsün
Else 'değilse
Komut56.Visible = False ' komut56 gizlensin
End If 'if bitir


Tekrar uyarılarımız açılsın.

Kod:
DoCmd.SetWarnings True  'tekrar uyarıları aç


4 bölümde de veriler tamamlanınca ana aktarım butonu göründü. Şimdi bu butona basarak şu Sql kodunu çalıştıralım:

Kod:
DoCmd.RunSQL "INSERT INTO Aktarılanlar ( [Adı Soyadı1], [Doğum Yeri1], Görevi1, [Adı Soyadı2], [Doğum Yeri2], Görevi2 ,[Adı Soyadı3], [Doğum Yeri3], Görevi3, [Adı Soyadı4], [Doğum Yeri4], Görevi4)  SELECT [Forms]![Kişisel Bilgileri]![1 Adı Soyadı] AS adısoyadi1, [Forms]![Kişisel Bilgileri]![1 Doğum Yeri] AS dogumyeri1, [Forms]![Kişisel Bilgileri]![1 Görevi] AS gorevi1, [Forms]![Kişisel Bilgileri]![2 Adı Soyadı] AS adısoyadi2, [Forms]![Kişisel Bilgileri]![2 Doğum Yeri] AS dogumyeri2, [Forms]![Kişisel Bilgileri]![2 Görevi] AS gorevi2, [Forms]![Kişisel Bilgileri]![3 Adı Soyadı] AS adısoyadi3, [Forms]![Kişisel Bilgileri]![3 Doğum Yeri] AS dogumyeri3, [Forms]![Kişisel Bilgileri]![3 Görevi] AS gorevi3, [Forms]![Kişisel Bilgileri]![4 Adı Soyadı] AS adısoyadi4, [Forms]![Kişisel Bilgileri]![4 Doğum Yeri] AS dogumyeri4, [Forms]![Kişisel Bilgileri]![4 Görevi] AS gorevi4 ;", -1


Bu aktarımdan sonra da liste'yi güncelleyelim:

Kod:
Me.Liste49.Requery


İşte bu kadar. Örneği de incelerseniz tam anlayacaksınız.

Kolay gelsin.



Ek Dosyalar
.rar   deneme_mdemiral.rar (Dosya Boyutu: 34,47 KB / İndirme Sayısı: 59)
İnadına, ille de Accesstr.net...
Cevapla


ozanakkaya
sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.023
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,01:03
Çözüldü 
ben ekleyene kadar mehmet hocam eklemiş.


Ek Dosyalar
.rar   sled_deneme.rar (Dosya Boyutu: 26,96 KB / İndirme Sayısı: 39)
Cevapla


assenucler

Kullanici Avatari
Onursal
A.... S.... Ş....
2.052
31/10/2008
63
İstanbul
-
29/11/2016,00:04
Çözüldü 
Sayın Mehmet Demiral ve Sledgeab, sizlerden öyle güzel şeyler öğreniyoruz ki...

Sağolun ve her şey gönlünüzce olsun.

Selam ve sevgiler.
Cevapla


Seruz
Uzman
Kullanici Avatari
Uzman
S.... U....
1.544
7
30/10/2008
804
Tekirdağ
Ofis XP
02/12/2016,15:18
Çözüldü 
Ben mi yanlış görüyorum, yoksa siz hakkaten sabahın 5'in de mi cevap yazdınız?

Sn. mehmetdemiral'ın mesaj saati 5.08
Sn. sledgeab'ın mesaj saati 5.27

Hayretler içindeyim.

Nasıl bir forum sitesidir bu yarabbim,
Tebrikler.
10806
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Personel İzin Takip Prog. Hakkında ? captain_10 4 216 28/11/2016, 14:28 atoz112
  Güncelleştirme Sorgusu Çalıştırınca Kayıt Kilit Hatası Hakkında shalala 2 51 23/11/2016, 00:39 shalala
  Tablo dan Açılır Kutu ya alınan verilerek Sabit Ekleme yapma ask200075 7 269 21/11/2016, 18:49 ask200075
  Access Veritabanında Tablo Şifreleme ve Formdan Tabloya Bağlanma Nasıl Yapılır?? mehami 11 309 09/11/2016, 23:35 mehami
  Pencere Gizleme Hakkında Serkan Çevik 3 103 09/11/2016, 22:43 Serkan Çevik


Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya