Newsgroup: it.comp.appl.access
Titolo: Unire tabelle

Ciao a tutti,
ho un piccolo problemino, ovvero mi trovo a dover unire 2 tabelle che non
hanno campi in comune in un'unica tabella, facendo una semplice query di
creazione tabella mi viene restituito un errore del tipo "Argomento non
valido"! Esiste una soluzione a questa cosa?
Grazie a chiunque mi voglia rispondere!
Serena

 ha scritto nel messaggio
news:pXOn6.936$p95....@news2.tin.it...

Per fare quello che hai detto credo tu ti sia comportata così:
In una nuova query hai aggiunto la tabella 1 e la tabella 2. Le due tabelle
non hanno nessun legame. Hai preso i rispettivi campi o quelli che ti
servivano e li hai messi sulla riga "Campo" della nuova query. Hai eseguito
la query di "Creazione Tabella" verso una tabella che non esisteva e di cui
hai specificato il nome.
Se hai fatto così hai fatto bene e tutto doveva funzionare. Se non ha
funzionato ti suggerisco di verificare la creazione di una nuova tabella a
partire dall'aggiunta di un singolo campo e con tutte e due le tabelle
presenti nella query. Man mano aggiungi un nuovo campo  e verifichi quando
ti dà l'errore.
Se ancora non funziona mandami il db con solo le due tabelle che vuoi unire
e vedrò cosa fare...la cosa mi incuriosisce.
Ciao, Carlo

 e vedrò cosa fare...la cosa mi incuriosisce.
Ahhhh, la femme....
Antonio

Ciao, ho provato quello che mi hai suggerito, ovvero provare ad importare
una sola colonna per la prima tabella ed una sola colonna per la seconda
tabella. Risultato: dopo 3 ore mi ha restituito un errore del tipo
"Argomento non valido".
Purtroppo non posso inviarti il db in questione per due motivi:1) sono dati
di lavoro; 2)è un po' grandino il db.....
Non è che per caso hai qualche altra idea da suggerire?
Grazie ancora Serena



Cominciamo a stabilire che se le due tabelle non hanno campi di join la
tabella risultante sarà il prodotto cartesiano tra le due tabelle. E' questo
che vuoi ottenere?
Se sì potresti utilizzare una cosa del tipo  (in ACC97)
SUB ImportaDati()
Dim Rst1 as Recordset, Rst2 as Recordset ,    RstUnione as Recordset
On error goto err_ImportaDati
Set Rst1 = DBEngine(0)(0).OpenRecordset ("Tabella1")
Set Rst2 = DBEngine(0)(0).OpenRecordset ("Tabella2")
Set Rst3 = DBEngine(0)(0).OpenRecordset ("TabellaUnione")
Do While Not Rst1.eof
    Do While Not Rst2.eof
        RstUnione.AddNew
        RstUnione("campo1") = Rst1("NomeCampodellatabella1")
        RstUnione("campo2") = Rst2("NomeCampodellatabella2")
        RstUnione.Update
        Rst2.MoveNext
    Loop
   Rst2.MoveFirst
   Rst1.MoVeNext
Loop
Set Rst1=Nothing
...
exit sub
err_ImportaDati:
        Msgbox err.description
        ' qui fai quello che devi fare tipo uscire o continuare con il
prossimo record....
End Sub
Non l'ho provata per cui potrei aver dimenticato qualcosa ....
Ciao Nicola
--
email:sostituire inwind a NOSPAM

 "Argomento non valido".
cut
Non vorrei (come mio solito) fare la parte di quello che pretende di entrare
nel merito, ma: perche' vuoi unire le tabelle?
Ti serve un prodotto cartesiano?
Le due tabelle solo relazionate?
Vuoi ottenere una tabella con tutti o alcuni dei campi delle due tabelle?
In tutti i casi: peche' non vuoi gestire la cosa usando le query per
estrarre i dati?
Sib
--
il sito comune di it.comp.database.access:
http://www.sitocomune.com
------------------------------------------------------
La mia home
http://digilander.iol.it/syb
------------------------------------------------------
"Non sempre cio' che viene dopo e' progresso"
Alessandro Manzoni
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente