D
David Huang
Hi, All:
I want to use excel component in the ASP.
My code is that
-----------------------------------------------------------
Dim oExcel As Object
Dim oBook As Object
Dim oSheet As Object
'Start a new workbook in Excel
Set oExcel = CreateObject("Excel.Application")
Set oBook = oExcel.Workbooks.Add
'Add headers to the worksheet on row 1
Set oSheet = oBook.Worksheets(1)
oSheet.Range("A1:C1").Value = Array("ORD0001", "Amount", "Tax")
'oSheet.Range("A2:A100").
oSheet.Range("A1").FormatConditions.Add(xlCellValue, xlEqual,
"ORD0001").Font.Bold = True
'Save the Workbook and Quit Excel
oBook.SaveAs "C:\Book1.xls"
oExcel.Quit
-------------------------------------------------------
But the function FormatConditions seems no use.
So I test this code in Visual Basic 6.0. I find the error is that
oSheet.Range("A1").FormatConditions.Add(xlCellValue, xlEqual,
"ORD0001").Font.Bold = True
Run-time error 5: invalidate procedure call or argument
Then I open the menu Project -> Preference, and add the "Microsoft Excel
10.0 Object Library".
Then the visual basic code could run successfully.
---------------------------------------------------------
My question is that.
How to make the ASP code run ?
How to add the "Microsoft Excel 10.0 Object Library" in asp using the above
code?
Thanks
I want to use excel component in the ASP.
My code is that
-----------------------------------------------------------
Dim oExcel As Object
Dim oBook As Object
Dim oSheet As Object
'Start a new workbook in Excel
Set oExcel = CreateObject("Excel.Application")
Set oBook = oExcel.Workbooks.Add
'Add headers to the worksheet on row 1
Set oSheet = oBook.Worksheets(1)
oSheet.Range("A1:C1").Value = Array("ORD0001", "Amount", "Tax")
'oSheet.Range("A2:A100").
oSheet.Range("A1").FormatConditions.Add(xlCellValue, xlEqual,
"ORD0001").Font.Bold = True
'Save the Workbook and Quit Excel
oBook.SaveAs "C:\Book1.xls"
oExcel.Quit
-------------------------------------------------------
But the function FormatConditions seems no use.
So I test this code in Visual Basic 6.0. I find the error is that
oSheet.Range("A1").FormatConditions.Add(xlCellValue, xlEqual,
"ORD0001").Font.Bold = True
Run-time error 5: invalidate procedure call or argument
Then I open the menu Project -> Preference, and add the "Microsoft Excel
10.0 Object Library".
Then the visual basic code could run successfully.
---------------------------------------------------------
My question is that.
How to make the ASP code run ?
How to add the "Microsoft Excel 10.0 Object Library" in asp using the above
code?
Thanks