导航
  • 主页
  • C#综合技术
  • C#互联网桌面应用
  • AppLauncher
  • WinForm
  • WPF
  • 问答

Set oXL = CreateObject("Excel.Application")为何会出错??

jonsonzxw 2003-04-03 10:47:19
Sub Button1_onclick

Select Case Select1.selectedIndex

Case 0 ' Use Automation.
Dim sHTML
sHTML = window.parent.frames("bottom").document.forms(0).children("DataGrid1").outerhtml
Dim oXL, oBook
Set oXL = CreateObject("Excel.Application")
Set oBook = oXL.Workbooks.Add
oBook.HTMLProject.HTMLProjectItems("Sheet1").Text = sHTML
oBook.HTMLProject.RefreshDocument
oXL.Visible = true
oXL.UserControl = true
......

程序执行到Set oXL = CreateObject("Excel.Application")会出错:

出错提示:Active部件不能创建对象:Excel.Application

请问如何处理,我的电脑上装了EXCEL程序的
...全文
54 点赞 收藏 5
写回复
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
cer 2003-06-28
我也遇到的,有没有大侠知啊
回复
jonsonzxw 2003-04-03
没人知道如何解决吗?目前知道造成这种原因的有安全访问的级别设置,但修改后仍然无效.另外还有一种原因是:

This error also occurs when the component is not installed correctly. As a result, the component cannot create the object.

那如何才能表示我是正确安装了的呢,请高手指点
回复
jonsonzxw 2003-04-03
这是客户端脚本程序,vbscript

<script language="vbscript">
Sub Button1_onclick

Select Case Select1.selectedIndex

Case 0 ' Use Automation.
Dim sHTML
sHTML = window.parent.frames("bottom").document.forms(0).children("DataGrid1").outerhtml
Dim oXL, oBook
Set oXL = CreateObject("Excel.Application")
Set oBook = oXL.Workbooks.Add
oBook.HTMLProject.HTMLProjectItems("Sheet1").Text = sHTML
oBook.HTMLProject.RefreshDocument
oXL.Visible = true
oXL.UserControl = true

.......
End Select
End Sub
</script>
回复
huxin1012 2003-04-03
添加引用了吗?
回复
jonsonzxw 2003-04-03
up
回复
发动态
发帖子
C#
创建于2007-09-28

10.4w+

社区成员

.NET技术 C#
申请成为版主
社区公告

全世界最好的语言,没有之一.