Düzenlenebilir bir UNION sorgusunu nasıl yapabilirim?

Question

Karmaşık bir veritabanı yapısı sırasında, kullanıcıya bir dizi tablo içinde saklanan verileri düzenleme aracı sağlamanız gerekir. Tüm veri türleri aynı olsa da, adlarına 1: 1 uymuyorlar. Bunu hafifletmek için, orijinal isimleri (dış raporlardan gelen) dahili olarak kullanılan isimlere eşleyen bir sorgu oluşturdum; Bu sorgulardan, her şey bir dev UNION sorgusuna beslenir.

Tüm veri türleri ve alan boyutları düzgün bir şekilde hizalanır.

Bu UNION sorgusu yapmak için başka ne yapmam gerekiyor?

Bu sorgusunun ardındaki geçerli SQL geçerli:

SELECT * FROM MappingQuery1 UNION SELECT * FROM MappingQuery2; 

DÜZENLEME: bir cevap aşağıda bir UNION sorguda veri olamayacağını kesin olarak bildiren bir KB article bir bağlantı yayınlanmıştır

güncellenmiş. Bu konuda çalışabileceğim bir yol var mı? Örneğin,

Bu işe yarar mı? Unutmayın, tüm alanlar tür, boyut ve ad ile hizalanır.

Answer 1

Sorgu, Birleşim sorgusu olduğunda, sorgusundaki verileri güncelleştiremezsiniz.

http://support.microsoft.com/kb/328828

Erişim Sendika sorguda farklı tablolardan satırları birleştirir

, bireysel satırlar altta yatan masa kimliğini kaybeder. Erişim, bir sendika sorgusundaki bir satırı değiştirmeye çalıştığınızda hangi tabloyu güncellemek istediğinizi bilmiyor, dolayısıyla tüm güncellemelere izin vermiyor.

ardından soru düzenlemek:

Muhtemelen gelen tabloyu güncellemek için VBA ve ADO kullanarak bu geçici bir çözüm olabilir. Buna yaklaşımım, sendika tablonuzun, kaynak tablodan kimliğe sahip bir sütun ve kaynak tabloyu adlandıran başka bir sütun içermesidir.

örn. Sendikanızdaki böyle bir şey olurdu: Bir veri giriş formu ile Ardından

SELECT 'Table1', id, ... FROM Table1 
UNION 
SELECT 'Table2', id, ... FROM Table2 

ve VBA şu anda seçili satırın değerlere bakmak ve ilgili tablo güncelleyebilirsiniz.

DÜZENLEME 2: Bu tabloya değerleri ekler onedaywhen

için

Option Compare Database 
Option Explicit 

Public Sub InsertDataPunk(TargetTable As String, IdVal As Long, MyVal As String) 

    Dim conn As ADODB.Connection 
    Set conn = CurrentProject.Connection 

    Dim sql As String 
    'You could build something fancier here 
    sql = "INSERT INTO " & TargetTable & " VALUES (" & IdVal & ",'" & MyVal & "')" 

    Dim cmd As ADODB.Command 
    Set cmd = New ADODB.Command 
    Set cmd.ActiveConnection = conn 
    cmd.CommandText = sql 
    cmd.CommandType = adCmdText 
    cmd.Execute 

End Sub 


InsertDataPunk "Table2", 7, "DooDar" 

Answer 2

Benim tercihini Erişim VBA kullanarak bir ana tabloya olanlar tek tek masaları pekiştirmek olacaktır. Tüm veriler bir tabloda, bu çok daha kolay olabilir.

Bununla birlikte, , bağımsız tabloları ayrı tutmak için numaralı varsaydı, eşleme sorgularınızı, kaynak tablo adı için bir alan ifadesi içerecek şekilde değiştirin. Ve UNION sorgusundaki tablo adı alanını da ekleyin.

sonra salt okunur UNION sorgusu göre sürekli bir form oluşturmak. Uygun tablodan tek bir düzenlenebilir kayıt döndüren başka bir sorguyu temel alan bir alt form ekleyin. ana form Güncel olayda var ise, alt formun sorgu için RowSource yeniden yazın:

strSQL = "SELECT fields_to_edit FROM " & Me.txtTableSource & _ 
    " WHERE pkfield =" & Me.txtPKeyField & ";" 
Me.SubformName.Rowsource = strSQL 
Me.SubformName.Requery 

Answer 3

Bu çok eski bir iplik ama aynı şey bir çözüm arayan ve karşıya geldi. Birkaç Union sorgusuyla itilmiş bir onay kutusu değeri vardı ve güncellemeye çalıştığımda, tabii ki yapamadım.

Ancak, ben bir çözüm buldum ve bunu paylaşmak istedim. Onay kutusunun OnEnter olayında, değiştirmek istediğim temel tablodaki alanı güncelleyen bir SQL Update sorgusu çalıştırdım. Doğru olsaydı False olarak güncelledim ve False true olarak güncelledim. İşte bu kadar!