Per importare un file in una tabella Access :
ImportText.exe Importing Text into Access with ADO/RDO/DAO/Filesys/Automation (August 5, 2004)
http://support.microsoft.com/kb/230265/en-us
Ti raccomando di scegliere l'esempio per ADO
Ti raccomando di usare un file SCHEMA.INI così da poter definire i campi (nome, tipo e dimensione) della tabella nel formato desiderato:
ACC: How to Use Schema.ini for Accessing Text Data (January 19, 2007)
http://support.microsoft.com/kb/149090/EN-US/
Eventualmente, il file SCHEMA.INI può anche essere creato al volo
ACC: How to Create a Schema.ini File Programmatically (January 19, 2007)
http://support.microsoft.com/kb/155512/EN-US/
Tieni presente che se non usi lo SCHEMA.INI ti troverai tutti i campi di tipo TEXT a 255, il che non è proprio una bella cosa perchè poi ti crea problemi quando dovrai esportare la tabella da Access in Excel.
Trasferire tabella da Acces ad Excel
Vi sono 2 metodi:
Il primo ESPORTA da Access a Excel usando una connessione ADODB.Connection :
Considera che nel FROM, al posto del nome della tabella (Clienti), puoi usare una tua query (che ti accennavo nel precedente post) per cuicodice:Dim CN As ADODB.Connection Set CN = New ADODB.Connection CN.CursorLocation = adUseClient CN.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & sPercorsoCompletoFileMDB CN.Execute "SELECT * INTO [Excel 8.0;Database=c:\tmp\file.xls].[Foglio1] FROM Clienti" CN.Close Set CN = Nothing
Dim sSQL As String
sSQL = "SELECT ..... FROM ... GROUP BY ...."
Il secondo IMPORTA in Excel da Access usando il metodo di Excel CopyFromRecordset (solo con recordset di tipo ADO!)codice:CN.Execute "SELECT * INTO [Excel 8.0;Database=c:\tmp\file.xls].[Foglio1] FROM " & sSQL
http://msdn.microsoft.com/en-us/library/aa165427.aspx
io preferisco il primo.
P.S.
per formattare il codice con il tag CODE:
- seleziona il codice
- clic sul pulsantino [CODE] nella finestra di modifica del messaggio.


Rispondi quotando