problema importazione tabella excel in visual studio 2008

pantera

Nuovo Utente
Salve a tutti, sono nuovo in questo ambiente di programmazione.

Devo importare un foglio excell in un database creato in visual studio.
Ho già creato la struttura e popolato tramite access, però vorrei creare qualcosa che lo si possa fare con visual studio 2008, sezione visual basic.

Poichè il nome del file cambia sempre, dovrei creare un form con una selezione del file e poi caricarlo nel database.

Se mi potete spiegare passo passo come fare ve ne sarei grato.
 

pantera

Nuovo Utente
Sono riuscito a creare qualche rigo di codice, ma mi da un errore:

Codice:
Dim xls, cn, rs

        cn = CreateObject("ADODB.Connection")
        cn.Open("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\database1.accdb")

        rs = CreateObject("ADODB.Recordset")
        rs.Open("output(1)")

        xls = CreateObject("Excel.Application")
        With xls.Workbooks.Open("c:\Sagest\output(1).xls")
            .Activate()
            With .Worksheets("output_1_")
                For i = 1 To .Usedrange.Rows.Count
                    rs.Addnew()
                    rs.Fields("N# contratto").Value = .Cells(i, 1)
                    rs.Fields("Cliente").Value = .Cells(i, 2)
                    rs.Fields("Tipo Cliente").Value = .Cells(i, 3)
                    rs.Fields("Tipologia Offerta").Value = .Cells(i, 4)
                    rs.Fields("Stato").Value = .Cells(i, 5)
                    rs.Fields("Tipo Offerta").Value = .Cells(i, 6)
                    rs.Fields("Codice Incaricato").Value = .Cells(i, 7)
                    rs.Fields("Creata il").Value = .Cells(i, 8)
                    rs.Fields("Creata da").Value = .Cells(i, 9)
                    rs.Fields("Data adesione").Value = .Cells(i, 10)
                    rs.Fields("Causale Ann#/Sosp").Value = .Cells(i, 11)
                    
                    rs.Update()
                Next
            End With
            .Close(False)
        End With
        xls.Quit()
        xls = Nothing

        rs.Close()
        rs = Nothing

        cn.Close()
        cn = Nothing

        MsgBox("Fatto!")

Arrivato alla riga rs.addNew() mi da errore

Chi mi può aiutare?
 
Discussioni simili
Autore Titolo Forum Risposte Data
M Problema importazione 3d su photoshop Photoshop 0
M Problema con l'importazione file csv PHP 3
S Problema importazione tabelle WP CMS (Content Management System) 0
I Sto progettando nuovi siti utilizzando bootstrap e devo dire funziona bene, l'unico problema e la maschera -moz- HTML e CSS 0
K Problema form update PHP 2
O problema con dvr dahua xvr5116 IP Cam e Videosorveglianza 0
S Problema nel ciclare un json Javascript 0
G Problema con Xampp Web Server 1
andrea barletta Problema con miniature comandi Photoshop 0
I problema con alice Posta Elettronica 0
K Problema Inner join PHP 1
F firefox problema http Linux e Software 0
N Problema con position absolute e overflow HTML e CSS 4
E Problema jquery Success jQuery 2
L Problema con inner join PHP 11
K [php] Problema con inner join PHP 4
E problema selezione sfumata Photoshop 2
K [PHP] Problema con variabili concatenate. PHP 1
A Problema filtro fluidifica Photoshop Photoshop 1
H Problema Bordi Scontorno Photoshop 1
O problema con query PHP 4
R Problema installazione Realtek WiFi USB rtl8821 Reti LAN e Wireless 0
I problema con 2 account Posta Elettronica 1
L problema collegamento file css con html HTML e CSS 1
Y Problema percorso file in rete PHP 1
N Problema SEO "L'URL non si trova su Google" SEO e Posizionamento 4
E Problema accesso a file con app sviluppata con MIT APP INVENTOR 2 Sviluppo app per Android 0
P Problema acquisizione clienti Webdesign e Grafica 1
F NetBeans problema creazione progetto Java Windows e Software 0
M Problema con Try Catch PHP 0
C problema seo + cerco esperto SEO e Posizionamento 11
Sergio Unia Problema con gli eventi del mouse su una data table: Javascript 2
T PROBLEMA CON SESSIONI PHP 3
A Problema, non so, di scale() o transform, oppure altro? HTML e CSS 0
T ALTRO PROBLEMA CON ARRAY PHP PHP 1
R problema con else PHP 0
T PROBLEMA CON ARRAY PHP 8
L problema con query select PHP 2
R Problema query con ricerca id numerico PHP 2
F Problema con risposta PHP 0
S problema con recupero dati tabella mysql PHP 2
Z Problema con il mio tp-l i nk Reti LAN e Wireless 1
I PROBLEMA: Sostituzione sito XAMPP E-Commerce 0
T problema data 30/11/-1 PHP 0
L Problema RAM con Tomcat 8 Apache 0
napuleone problema con sort e asort PHP 4
Y Problema incolonnamento tabella PHP 7
S problema salvataggio immagini Photoshop 0
Z Problema con INT MySQL PHP 1
Z Problema database MySQL con XAMPP PHP 0

Discussioni simili