繁体   English   中英

如何使用经典ASP打开现有的Excel文件

[英]How can i open an existing Excel file using the classic asp

我有一个紧急要求,我需要从驻留在系统上的现有Excel文件中打开一些特定的Excel工作表。 我想知道如何使用Classic ASP来完成。 我尝试在互联网上搜索,但找不到任何特定内容。 需要一些建议... :)

我希望这是有道理的

我尝试下面的代码,但都徒劳。

<html> 
<body bgcolor="white" text="black"> 

        <%Dim xlObject, xlBook,wks Set xlObject = CreateObject("Excel.Application") xlObject.visible = False 
        Set xlBook = xlObject.Workbooks.open("C:\\Users\\Administrator\\Desktop\\Final Help file 11june13.xls") 
        Set wks = xlObject.ActiveWorkBook.Worksheets(1) 
        response.Write("permbajtja e qelizes eshte: "&wks.Cells(3,1)) 
        xlBook.Close xlObject.Quit 
        Set wks = Nothing 
        Set xlBook = Nothing 
        Set xlObject = Nothing %> 
    </form>
</body> 
</html>

例如,如何将Excel文件显示到Web浏览器中,这是C#中的一个简单示例。 您打算用纯ASP还是用ASP.NET编写它?

public static void ConvertExcelFile(String excelFile)
{
        Microsoft.Office.Interop.Excel.Application excel = null;
        Microsoft.Office.Interop.Excel.Workbook xls = null;
        try
        {
            excel = new Microsoft.Office.Interop.Excel.Application();
            object missing = Type.Missing;
            object trueObject = true;
            excel.Visible = false;
            excel.DisplayAlerts = false;
            xls = excel.Workbooks.Open(excelFile, missing, trueObject, missing,

                    missing, missing, missing, missing, missing, missing, missing, missing,

                    missing, missing, missing);
            object format = Microsoft.Office.Interop.Excel.XlFileFormat.xlHtml;
            IEnumerator wsEnumerator=excel.ActiveWorkbook.Worksheets.GetEnumerator();
            int i = 1;
            while (wsEnumerator.MoveNext())
            {
                Microsoft.Office.Interop.Excel.Worksheet wsCurrent =
                (Microsoft.Office.Interop.Excel.Worksheet)wsEnumerator.Current;
                String outputFile =excelFile + "." + i.ToString() + ".html";
                wsCurrent.SaveAs(outputFile, format, missing, missing, missing,
                missing, missing, missing, missing, missing);
                ++i;
            }
            excel.Quit();
        }
        catch (Exception ex)
        {
            MessageBox.Show("Error accessing Excel document.\n\n" +
            ex.Message);
        }
    }

可以在以下位置找到它: http : //bytes.com/topic/c-sharp/answers/477965-excel-files-html-using-c

暂无
暂无

声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.

 
粤ICP备18138465号  © 2020-2024 STACKOOM.COM