<%Set xlApplication = Server.CreateObject(“Excel.Application”) ‘调用excel对象%>
一般没有经过设置的IIS服务器在执行这一句时都会出现错误,返回的错误信息如下:
错误类型:
Server 对象, ASP 0178 (0×80070005)
检查权限时,对 Server.CreateObject 的调用失败。拒绝对此对象的访问。
英文版的错误信息如下:
Error Type:
Server object, ASP 0178 (0×80070005)
The call to Server.CreateObject failed while checking permissions. Access is denied to this object.
这是IIS中没有注册使用MS Excel的组件,所有在调用时会出错。
解决办法如下:
开始->运行->dcomcnfg (打开组件服务)
在DCOM配置中找到”Microsoft Excel 应用程序”(这个名称取决于你调用的Object是什么),
然后右键->属性->安全 在“启动和激活权限”框中点击“编辑”把三个权限都给everyone(window 2000系统) 即可。其实第一个Launch & activate就行了。
因为我用的是XP系统,找不到Everyone,所以我添加了IIS默设用户:IUSER/your user,即 如果找不到该用户可点击“添加”->“高级”,用“立即查找”找到相应的用户。在XP中是在权限选择框中把“本地启动”和“本地激活”允许权限打√。
本文来自CSDN博客,转载请标明出处:http://blog.csdn.net/jtql420603/archive/2006/10/16/1336406.aspx
分享到:
相关推荐
office已安装,但运行Variant::CreateObject("excel.application")仍报错。 目前对一台win10_64电脑,已解决了此问题……
ASP操作EXCEL常见错误 错误一: Microsoft VBscrīpt 运行时错误 错误 '800a01...ActiveX 部件不能创建对象: 'Excel.Application' 错误二: Microsoft VBscrīpt 运行时错误 (0x800A0046) 没有权限: 'CreateObject'
2、把Set rs=Server.CreateObject("ADODB.Recordset")放在页面最顶部,每个都可以调用,把其他多余的删掉 或者:在页面中显式地释放资源: rs.close set rs=nothing conn.close set conn=nothing
程序功能很简单,但因为N不确定性,并且可能随时可能增加,所以只能用CreateObject隐式调用DLL,在网上搜索了很久都没找到可响应隐式调用DLL事件的例程。经过反复摸索终于弄出了个模板。希望对需要的人有帮助。
错误提示: Server 对象 错误 ‘ASP 0178 : 80070005’ Server.CreateObject 访问错误 ../asp.asp,行 123 检查权限时,对 Server.CreateObject 的调用失败。拒绝对此对象的访问。 错误如提示,存在以权限。 解决方法...
检查权限时,对 Server.CreateObject 的调用失败。拒绝对此对象的访问。/helloworld/helloworld.asp, 第 53 行 这里将解决方法,用附件上传贴图: 其中,权限问题1.jpg和权限问题2.jpg,是解决问题的两个方案,二...
ApplicationBlocks是微软开发的一款访问数据库的很好用的程序
Set xlApp = CreateObject("Excel.Application") '创建EXCEL对象 Set xlBook = xlApp.Workbooks.Open("文件名") '打开已经存在的EXCEL工件簿文件 xlApp.Visible = True '设置EXCEL对象可见(或不可见) Set xlSheet ...
oExcel = CreateObject( "Excel.Application" ) 1) 显示当前窗口: oExcel.Visible = True 2) 更改 Excel 标题栏: oExcel.Caption = "应用程序调用 Microsoft Excel" 3) 添加新工作簿: oExcel.WorkBooks.Add 4) ...
(201) Set objExcel = CreateObject("Excel.Application") objExcel.Workbooks.Add ‘创建Excel工作簿 (202) Application.ActivateMicrosoftApp xlMicrosoftWord '开启Word应用程序 (203) Application....
Set xls_app = CreateObject("Excel.Application") Set xls_book = xls_app.Workbooks.Open(文件名)'文件名包含完整路径! Set xls_sheet = xls_book.Worksheets(1)'后面的1是指excel的工作表,1为第一张,以此类推 ...
卸载了office后,装了WPS发现BOM和座标导出都出错了;修改了宏处理文件,WPS与OFFICE两环境下与PADS-layout软件...将: Set xl = CreateObject("Excel.Application") 改成:Set xl = CreateObject("Et.Application")
Set ex = WScript.CreateObject("Excel.Application") ex.Application.DisplayAlerts = False ex.Visible = False For Each f In gf.Files If LCase(so.GetExtensionName(f.Name)) = "xls" Then
Set xlApp = CreateObject("Excel.Application") '创建EXCEL应用类 xlApp.Visible = False '设置EXCEL不可见 Set xlBook = xlApp.Workbooks.Open(App.Path & "\data.xls") '打开EXCEL工作簿 Set xlsheet = ...
目 录 一、VBA语言基础...................................................................................................................1 第一节 标识符....................................................
1.2EXCEL环境中基于应用程序自动化的优点................................................................................1 1.3录制简单的宏....................................................................
Wscript.shell对象用于asp里web访问与桌面程序交互.创建方法: set objname=server.createobject("wscript.shell")
myexcel=createobject('excel.application') &&创建一个对象 myexcel.visible=.t.&&可见 &&bookexcel=myexcel.workbooks.add bookexcel=myexcel.workbooks.open("C:\Documents and Settings\Administrator\桌面\学习...
Set oExcel= CreateObject("Excel.Application") Set oWb = oExcel.Workbooks.Open("E:\其他\新装电话表.xls") Set oSheet = oWb.Sheets("Sheet1") MsgBox oSheet.Range("B2").Value '#提取单元格B2内容 '.....
vbs实现的调用系统命令执行的函数,可以根据用户选择运行指定的程序