Archief - vb.net excel file uploaden naar website

Het archief is een bevroren moment uit een vorige versie van dit forum, met andere regels en andere bazen. Deze posts weerspiegelen op geen enkele manier onze huidige ideeën, waarden of wereldbeelden en zijn op sommige plaatsen gecensureerd wegens ontoelaatbaar. Veel zijn in een andere tijdsgeest gemaakt, al dan niet ironisch - zoals in het ironische subforum Off-Topic - en zouden op dit moment niet meer gepost (mogen) worden. Toch bieden we dit archief nog graag aan als informatiedatabank en naslagwerk. Lees er hier meer over of start een gesprek met anderen.
J

JorisB

Legacy Member
Dag iedereen

ik heb voor school een opdracht gekregen dat ik een .xls bestand moet kunnen uploaden naar de server als er om gevraagd wordt en dan moet dit bestand via de code kunnen geopend worden.


Code: 
 If FileUpload1.HasFile Then

            file = FileUpload1.PostedFile.FileName
            FileUpload1.PostedFile.SaveAs(Server.MapPath(".\") & file)
            lblStatus.Text = "File Saved to: " & Server.MapPath(".\") & file
        End If

        Dim xlApp As Excel.Application
        Dim xlWorkBook As Excel.Workbook
        Dim xlWorkSheet As Excel.Worksheet

        xlApp = New Excel.ApplicationClass
        xlWorkBook = xlApp.Workbooks.Open(Server.MapPath(".\") & file)
        xlWorkSheet = xlWorkBook.Worksheets("Informat_Export ")
        xlWorkSheet.Activate()
        xlWorkSheet.Range("D2").Select()
        Dim klas As String = xlWorkSheet.Application.ActiveCell.Text
        xlWorkBook.ActiveChart.Select()

        Dim titularis As String = xlWorkSheet.Application.ActiveCell.Text
        xlWorkBook.Close()
        xlApp.Quit()

Deze code werkt lokaal maar van het moment dat ik deze upload naar de server werkt deze niet meer

thx Joris
O

Obliv`

Legacy Member
Welke fout krijg je?
Waarschijnlijk staat op de server niet de correcte versie van excel.
J

JorisB

Legacy Member
Ik krijg deze foutmelding bij het laden van de pagina

Compilatiefout
Beschrijving: Er is een fout opgetreden bij het compileren van een bron die vereist is om aan deze aanvraag te voldoen. Controleer de volgende details van deze fout en pas waar nodig de broncode aan.

Foutbericht van compiler: BC30002: Type 'Excel.Application' is not defined.

Fout in bron:

Code: 
Regel 55:         End If
Regel 56: 
Regel 57:         Dim xlApp As Excel.Application
Regel 58:         Dim xlWorkBook As Excel.Workbook
Regel 59:         Dim xlWorkSheet As Excel.Worksheet
Het archief is een bevroren moment uit een vorige versie van dit forum, met andere regels en andere bazen. Deze posts weerspiegelen op geen enkele manier onze huidige ideeën, waarden of wereldbeelden en zijn op sommige plaatsen gecensureerd wegens ontoelaatbaar. Veel zijn in een andere tijdsgeest gemaakt, al dan niet ironisch - zoals in het ironische subforum Off-Topic - en zouden op dit moment niet meer gepost (mogen) worden. Toch bieden we dit archief nog graag aan als informatiedatabank en naslagwerk. Lees er hier meer over of start een gesprek met anderen.
Terug
Bovenaan