Avatar billede scarface335 Nybegynder
20. november 2007 - 12:55 Der er 8 kommentarer og
1 løsning

Læs Excel xls fil og gem som semikolon fil

Jeg skal have lavet en lille consol application, som læser en xls fil og gemmer den som csv. eller bare Læser den så kan jeg selv lave csv filen ved ast løbe dataene igennem. Håber nogen kan hjælpe eller komme med nyttige tips.

På forhånd Tak !
Avatar billede neoman Novice
20. november 2007 - 13:01 #1
Du kan læse en xls fil og gemme indholdet i en DataTable. Nu er koden i VB men det burde være nemt at skrive om:

      Dim myCon As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Websites\Roster\Uploads\;Extended Properties='text;HDR=Yes;FMT=Delimited'")
Dim myTable As New DataTable     
Dim myCommand As New OleDb.OleDbCommand("SELECT * FROM " + "myData.csv", myCon)
        Dim myAdapter As New OleDb.OleDbDataAdapter(myCommand)
        myCon.Open()
        myAdapter.Fill(MyTable)
        myCon.Close()
Avatar billede neoman Novice
20. november 2007 - 13:12 #2
Oopz - wrong code : den kode læser en csv fil.

For at læse excel:
        Dim cn As System.Data.OleDb.OleDbConnection
        Dim cmd As System.Data.OleDb.OleDbDataAdapter
        ds = New System.Data.DataSet()

        cn = New System.Data.OleDb.OleDbConnection("provider=Microsoft.Jet.OLEDB.4.0;" & _
            "data source=C:\myData.XLS;Extended Properties=Excel 8.0;")

        ' Select the data from Sheet1 of the workbook.
        cmd = New System.Data.OleDb.OleDbDataAdapter("select * from [Sheet1$]", cn)

        cn.Open()
        cmd.Fill(ds)
        cn.Close()
Avatar billede scarface335 Nybegynder
20. november 2007 - 13:14 #3
Nu er jeg temlig dårlig til VB, så hvordan henter jeg så dataene ud fra my Table og gemmer som en SemiKolon separeret fil
Avatar billede scarface335 Nybegynder
20. november 2007 - 13:16 #4
Eller fra cmd, dit nye eksempel
Avatar billede neoman Novice
20. november 2007 - 13:18 #5
skriv det om til c# eller brug en translator som denne http://www.carlosag.net/Tools/CodeTranslator/Default.aspx
Avatar billede neoman Novice
20. november 2007 - 13:21 #6
og hvis du ikke ved hvordan man tilgår data i en datatable (eller dataset) så kig f.eks. her:
http://msdn2.microsoft.com/en-us/library/t31h6yhs(VS.80).aspx
og specifikt her: http://msdn2.microsoft.com/en-us/library/kcs3hdk5(VS.80).aspx hvor der er et eksempel
Avatar billede scarface335 Nybegynder
20. november 2007 - 14:06 #7
Super Translator, sådan en troede jeg ikke fandtes. Smid et svar og du skal få dine fuldtfortjente Point :-)

Tusind Tak :-)
Avatar billede neoman Novice
20. november 2007 - 14:10 #8
:P
Avatar billede scarface335 Nybegynder
20. november 2007 - 15:11 #9
Er det muligt at få den til at læse alle felter som teksstrenge uanset hvad der står der i.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester