+ Rispondi al Thread
Pagina 2 di 2 primaprima 12
Visualizzazione dei risultati da 11 a 17 su 17

Discussione: Importazione file .csv in tabella Access

  1. #11
    L'avatar di gibra
    gibra non è in linea Amanuense
    Luogo
    Breganze (VI)
    Post
    6,087
    OK, ci guardo poi ti so dire.

  2. #12
    L'avatar di gibra
    gibra non è in linea Amanuense
    Luogo
    Breganze (VI)
    Post
    6,087
    Ecco il progetto.

    Avevi sbagliato la definizione di alcuni campi dello SCHEMA.INI
    L'importazione ha avuto successo, vedrai la tabella popolata.
    Però controlla se i dati sono OK (io non ho tempo, siamo in orario di chiusura)

    Ovviamente ho modificato i percorsi del progetto per riuscire ad utilizzarlo nel mio PC.
    File allegati File allegati

  3. #13
    pierovb non è in linea Scolaretto
    Luogo
    Reggio Calabria
    Post
    276
    Niente. Non funziona.
    Sempre lo stesso errore.
    Stasera ci sbatto un pò, sicuramente sbaglio qualcosa. Ti faccio sapere.
    Ciao e grazie

  4. #14
    L'avatar di gibra
    gibra non è in linea Amanuense
    Luogo
    Breganze (VI)
    Post
    6,087
    Cosa hai modificato?
    Come vedi nel db, a me li ha importati senza problemi.
    Io ho solo corretto i percorsi del db e del file, ovviamente dopo aver corretto il codice che crea lo SCHEMA.INI.

    Fammi sapere...

  5. #15
    pierovb non è in linea Scolaretto
    Luogo
    Reggio Calabria
    Post
    276
    Credo di aver capito il problema.
    Se effettuo l'importazione con SCHEMA.INI dove è installato Office 2010 funziona, altrimenti dà errore.
    Che c'entri qualche dll di office?

  6. #16
    L'avatar di gibra
    gibra non è in linea Amanuense
    Luogo
    Breganze (VI)
    Post
    6,087
    Non ne ho idea.
    Io uso Office 2013.

    Al limite, prova ad importare i dati in un recordset, invece che diettamente in una tabella.

    Ad esempio, nell'importazione da VBA in Excel io uso:
    (occorre sempre lo SCHEMA.INI)

    codice:
        sDataPath = ThisWorkbook.Path
        pFile = "dati.txt"
        sConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & sDataPath & _
                ";Extended Properties='Text;HDR=YES;FMT=Delimited'"
    
        Set CN = CreateObject("ADODB.Connection")
        CN.Open sConnectionString
        CN.CursorLocation = adUseClient
        
        Set rs = CreateObject("ADODB.Recordset")
        rs.CursorType = adOpenStatic
        rs.LockType = adLockReadOnly
        
        sql = "SELECT " & <elenco_campi>
        sql = sql & " FROM " & pFile
        Set rs = CN.Execute(sql)
    
        ws.Cells(ur + 1, 1).CopyFromRecordset rs
        ws.Range("B:B").NumberFormat = "h:mm:ss"
        ws.Range("C:F").NumberFormat = "0.0"

  7. #17
    pierovb non è in linea Scolaretto
    Luogo
    Reggio Calabria
    Post
    276
    Chiedo scusa se non mi sono fatto più sentire.
    Ho un problemino di salute e dovrò subire un intervento chirurgico, per cui non mi sono occupato del problema del quale tu, gentilmente
    mi hai dato suggerimenti.
    Se tutto va bene mi farò sentire appena ristabilito.
    Grazie

+ Rispondi al Thread
Pagina 2 di 2 primaprima 12

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi