Ciao a tutti ,
data la mia conoscena base con access, mi trovo in difficolltà
ho bisogno di importare dei dati da una fattura in xml, durante l'importazione l'xml crea varie tabelle ed io attraverso una query di accodamento, seleziono i record di mio interesse (il primo delle tabelle interessate) e li accodo in una tabella "tabella1".
INSERT INTO Tabella1 ( Mittente, Codice_Fiscale, TipoDoc, Num, Del, Importo )
SELECT First([Denominazione]) AS Mittente, First([CodiceFiscale]) AS Codice_Fiscale, First([TipoDocumento]) AS TipoDoc, First([Numero]) AS Num, First([Data]) AS Del, First([ImportoTotaleDocumento]) AS Importo
FROM Anagrafica, DatiAnagrafici, DatiGeneraliDocumento;
alla fine del processo e prima di importare un nuovo file, ho bisogno di eleiminare tutte le tabelle esistenti tranne "tabella1". perchè oltre alle tabelle di mio interesse il file xml genera tabelle conteneti vari record, per me inutili.
Come si procede per ottenere il risultato?
la mia soluzione (che non funziona perfetamente o meglio solo in parte):
ho creato una maschera con un pulsante che al click mi esegue :
Private Sub Comando0_Click()
DoCmd.DeleteObject acTable, "Anagrafica"
DoCmd.DeleteObject acTable, "CodiceArticolo"
DoCmd.DeleteObject acTable, "DatiAnagrafici"
DoCmd.DeleteObject acTable, "DatiGeneraliDocumento"
DoCmd.DeleteObject acTable, "DatiPagamento"
DoCmd.DeleteObject acTable, "DatiRiepilogo"
DoCmd.DeleteObject acTable, "DatiTrasmissione"
DoCmd.DeleteObject acTable, "DettaglioLinee"
DoCmd.DeleteObject acTable, "DettaglioPagamento"
DoCmd.DeleteObject acTable, "FatturaElettronicaHeader"
DoCmd.DeleteObject acTable, "IdFiscaleIVA"
DoCmd.DeleteObject acTable, "IdTrasmittente"
DoCmd.DeleteObject acTable, "Sede"
End Sub
fin qui va abbastana bene però...
anche se tutti i file importati creano le stesse tabelle che vado ad eliminare col VBA, alcuni xml creano tabelle che non sono uguali agli altri tipo tabella allegati, contatti etc. quindi anche se eseguo codice alla fine mi ritrovo tabelle inutili in giro.
quindi io vorrei, prima di caricare un nuovo XML, eliminaare tutte le tabelle del DB tranne la "Tabella1 che contiene i miei dati accodati.
C'è qualcuno che mi può aiutare?