80010105 - Server Automation Error


  • Hi,

    We have a VB6 application which will open the excel sheet, format and print it. It is working fine in windows XP and windows 2000 server. But getting run-time when the same code is executed in Windows 2008 server(64-bit machine). Error message is, 


    Automation Error

    Server threw an Exception"

    Error throws when executing the below BOLDED code.

        'If Excel not already loaded, create a new instance of Excel
        If mobjExcelReport.MyExcelApp Is Nothing Then
            Set mobjExcelReport.MyExcelApp = CreateObject("Excel.Application")
        End If

        'Load Todays Excel doc
        Set mobjExcelReport.MyExcelWorkbook = mobjExcelReport.MyExcelApp.Workbooks.Open(sTargetPath & "\" & sTargetFileName, , , , "abcdef")

    Both the windows 2000 server and windows 2008 server has Excel8.0 library.

    Any idea on this error would help.

    Krishna Prakash
    13 ธันวาคม 2554 12:24