A.S.C Filtre, Grafik ve Raporlama Eklentisi

Veritabanı Tablolar arası alan değiştirme
#1
Merhabalar elimde bir programa ait veritabanı var ben bu veritabanında tablolar arasında sabit olan değeri tüm tablolara otomatik olarak değitirmek istiyorum Mesela dersler tablosunda SıraNo Notlar tablosunda SıraNo Konular tablosunda DersNo Analiz tablosunda DersSıraNo gibi alanlardaki sabit değerleri değiştirmek istiyorum fakat bunu makro kullanarak veya daha farklı bir yol var ise ne şekilde değiştirerek nasıl yapabilirim şimdiden teşekkürler


Eklenti Dosyaları
.rar   SINAV001.rar (Boyut: 1,08 MB / İndirilme: 20)



  Alıntı
Bu mesajı beğenenler:
#2
Merhaba..

Bahettiğiniz alanlar birincil anahtar durumunda.. Dolayısıyla değiştirmeniz için bu özelliği iptal etmeniz gerekir.. Bu sizin için sorun olmazsa (veritabanı yapısı için sorun olabilir) değiştirilebilir.. Bu amaç içinde sorgular kısmında günceleme sorgusunu istediğiniz değerleri vererek kullanabilirsiniz..



  Alıntı
Bu mesajı beğenenler:
#3
ben tablo içerisnde her tabloda ayrı ayrı ctrl+H ile değerleri değitiriyorum mesela 1 i 4 yap gibi bunu daha kolay nasıl yapabilirm bu verdiğim veritabanı gibi birden fazla veritabanı oluyor bunları birleştiriyorum program her değerlendirme ders numarasını 1 den başlatıyor o yüzden diğer vt lerde değiştirmek istiyorum



  Alıntı
Bu mesajı beğenenler:
#4
Konu Biraz Eskide kalmış hortlatmış olacağım ancak bu sorunla ilgili bir kaç araştırma yaptım ve aşağıda bıraktığım kodu buldum. Arkadaşımızın sorununu çözebilecek bir kod Tüm sayfalarda belirtilen alanı arayıp varsa değişiklik yapıyor.

Visual Basic
  1. Dim db As DAO.Database
  2. Dim tdf As DAO.TableDef
  3. Dim fdf As DAO.Field
  4.  
  5.  
  6.  
  7. Set db = CurrentDb
  8.  
  9. DoCmd.SetWarnings False
  10. For Each tdf In db.TableDefs
  11.  
  12.    If Not (tdf.Name Like "MSys*" Or tdf.Name Like "~*") Then
  13.    
  14.        For Each fdf In tdf.Fields
  15.        
  16.            If fdf.Name = "Tablodaki Alan Adını Yazınız" Then DoCmd.RunSQL "update " + tdf.Name + " set Tablodaki Alan Adını Yazınız= 1 "
  17.        Next
  18.    End If
  19. Next
  20. Set tdf = Nothing
  21. Set db = Nothing
  22. DoCmd.SetWarnings True




Tek sorun şu belirtilen tabloda ki belirtilen alan adına sabit bir değer yazıyor. (Kodda 1 değerini yazıyor)  bunun değiştirebilmek için önerisi olan var mı?



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  [VBA] Iki Tarih Arası Büyük Olanını Bulma benuva 12 251 28-02-2021, 22:47
Son Mesaj: userx53
  [FORM] Bölünmüş Formda Imlecin Veri Sayfasında Spesifik Bir Alan Içerisinde Takılı Kalması schecter 3 88 25-02-2021, 12:40
Son Mesaj: onur_can
access-sql-9 Sekme Denetimi Içerisinde Sayfalar Arası Alt Forma Veri Aktarımı Kaydı neco_can 5 157 12-02-2021, 17:52
Son Mesaj: neco_can
  [VBA] Tarihler Arası Hesaplama* benuva 11 391 08-01-2021, 16:48
Son Mesaj: halily
  [VBA] Veri Biçimini Değiştirme hedefkaya 5 136 30-12-2020, 12:37
Son Mesaj: hedefkaya
  [SORGU] çapraz Sorguda Sıralamayı Değiştirme ekremer1969 2 144 30-12-2020, 07:45
Son Mesaj: ekremer1969
  2 Saat Arası Hesaplama hedefkaya 6 543 13-12-2020, 21:16
Son Mesaj: footprinting
access-sql-17 [TABLO] Veritabanı Performansım Var Hastane Veritabanı Tasarımı Yapmam Gerek aydyass 1 236 09-12-2020, 16:06
Son Mesaj: alperalper

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi