Jak utworzyć edytowalne zapytanie UNION?

Question

W ramach złożonej struktury bazy danych muszę zapewnić użytkownikowi możliwość edycji danych przechowywanych w serii tabel. Mimo że wszystkie typy danych są takie same, nie zawierają linii 1: 1 w swoich nazwach. Aby to złagodzić, stworzyłem zapytanie, które odwzorowuje oryginalne nazwy (pochodzące z zewnętrznych raportów) na nazwy używane wewnętrznie; z tych zapytań wszystko jest podane do jednego gigantycznego zapytania UNION.

Wszystkie typy danych i rozmiary pól są ustawione prawidłowo.

Co jeszcze muszę zrobić, aby zapytanie UNION działało?

ten jest obecny w zapytaniu SQL za:

SELECT * FROM MappingQuery1 UNION SELECT * FROM MappingQuery2; 

EDIT:

Odpowiedź poniżej pisał link do KB article których stwierdza się z pewnością, że dane w UNION zapytania nie może być zaktualizowany. Czy jest jakiś sposób obejść to? Na przykład:

SELECT * FROM MappingQuery1, MappingQuery2; 

Czy to zadziała? Pamiętaj, że wszystkie pola są wyrównane pod względem typu, rozmiaru i nazwy.

Answer 1

Gdy zapytanie jest zapytaniem unijnym, użytkownik nie może zaktualizować danych w zapytaniu.

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

gdy dostęp łączy wiersze z różnych tabel w zapytaniu związkowej, poszczególne rzędy tracą swoją podstawową tożsamość stołowego. Program Access nie może wiedzieć, która tabela ma być aktualizowana podczas próby zmiany wiersza w zapytaniu zbiorczym, więc uniemożliwia wszystkie aktualizacje.

następujące pytanie edit:

Można prawdopodobnie obejść stosując VBA i ADO zaktualizować odpowiednią tabelę. Sposób, w jaki podchodzę do tego, to zapewnienie, że twoja tabela związków zawiera kolumnę, która ma identyfikator z tabeli źródłowej wraz z inną kolumną, która nazywa tablicę źródłową.

np. w unii, że masz coś takiego:

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

Następnie za pomocą formularza wprowadzania danych i VBA można spojrzeć na wartości aktualnie wybranego wiersza i zaktualizuj odpowiednią tabelę.

EDIT 2: Dla onedaywhen

wstawia to wartości w tabeli przy użyciu programu Access VBA

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

Moje preferencje byłoby skonsolidować te poszczególne tabele do tabeli głównej. Przy wszystkich danych w jednej tabeli może to być o wiele łatwiejsze.

Jeśli jednak masz mieć, aby zachować oddzielne tabele, zmień swoje zapytania odwzorowania tak, aby zawierały wyrażenie pola dla nazwy tabeli źródłowej. I umieść to pole nazwy tabeli w zapytaniu UNION.

Następnie utwórz ciągły formularz na podstawie kwerendy UNION tylko do odczytu. Dodaj podformułę na podstawie innego zapytania, które zwraca pojedynczy edytowalny rekord z odpowiedniej tabeli. W główną postać w sprawie bieżących razie przepisać RowSource dla zapytania podformularzu za:

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

Answer 3

Jest to bardzo stary wątek, ale szukałem rozwiązania tej samej rzeczy i natknąłem się na niego. Miałem wartość pola wyboru, która została przepchnięta przez kilka zapytań unijnych, a kiedy próbowałem ją zaktualizować, oczywiście nie mogłem.

Jednak znalazłem rozwiązanie i pomyślałem, że je udostępnię. W zdarzeniu OnEnter tego pola po prostu uruchomiłem kwerendę aktualizacji SQL, która zaktualizowała pole w tabeli podstawowej, którą chciałem zmodyfikować. Jeśli to było Prawdą, zaktualizowałem do Fałszywy, a jeśli Fałsz I zaktualizował się do prawdy. Voila!