我当时是在调用/"server.createObject(/"excel.application/")/"的时候发生的错误:
"
伺服器物件 錯誤 'ASP 0178 : 80070005'
Server.CreateObject 存取錯誤 /asp_excel/toExcel3.asp, 列10
當檢查使用權限時 Server.CreateObject 的呼叫失敗。拒絕存取此物件
"。
后来是这样解决的: 开始->运行->dcomcnfg
元件服務->找到DCOM設定 ->找到"Microsoft Excel 应用程序"
然后右键->Properties->security把三个权限都给everyone即可, 其实第一个Launch & activate即可
我当时是在调用/"server.createObject(/"excel.application/")/"的时候发生的错误:" 伺服器物件 錯誤 ASP 0178 : 80070005 Server.CreateObject 存取錯誤 /asp_excel/toExcel3.asp, 列10 當檢查使用權限時 Server.CreateObject 的呼叫失敗。拒絕存取此物件"。后来是这样解决
2.输入:dcomcnfg,点击确定
3.我这里的顺序是按照 组件服务>计算机>我的电脑>DCOM配置>“找到
Microsoft
Excel
Application
” 可以直接在DOMC配置里按Mi来快速检索.这样找起来会快些.
4.找到后 右键"
Microsoft
Excel
Application
" 点击“属性”
“/”应用程序中的服务器
错误
。
--------------------------------------------------------------------------------
拒绝访问。, ProgID: "ex
解决办法:
1.在运行中输入:regedit,进入注册表编辑器,查看HKEY_LOCAL_MACHINE\Software\
Microsoft
\Office下是否有
excel
、word等其他的注册表,若没有进行第二步。
2.查看HKEY_CLASSES_ROOT\AppID\下是否有{00020812-0000-0000-C000-000000000046},这个是
excel
注册键,若没有则DCOM配置是找不到
Microsoft
Excel
Appliction的。(这个取决于每个...
错误
类型:
Server
对象,
ASP
0178 (0x
80070005
)
检查权限时,对
Server
.
Create
Object
的
调用
失败。拒绝对此对象的访问。
参考网上的方法,摸索以下步骤:
管理工具-->组件服务-->计算机-->我的电脑-->DCOM配置
1.选择
Microsoft
Excel
应用程序 -->属性
标识:选择交互式用户
安全:启动和激活权限-->自定义,
4. 点击"插入"按钮,
Excel
会将选定的图片文件插入到选定的单元格中。
如果你希望在
Excel
中通过URL插入图片,那么你可能需要使用
Excel
的VBA宏编程来实现。下面是一个简单的VBA代码示例,可以将URL转换为图片并插入到
Excel
中:
```vba
Sub InsertPictureFromURL()
Dim picURL As String
Dim picData() As Byte
Dim tempFilePath As String
Dim tempFileName As String
' 图片的URL
picURL = "https://ir.ozone.ru/s3/multimedia-7/wc350/6494414143.jpg"
' 创建HTTP请求对象
Set httpReq =
Create
Object
("MSXML2.XMLHTTP")
' 发送HTTP请求获取图片数据
With httpReq
.Open "GET", picURL, False
.Send
picData = .responseBody
End With
' 保存图片数据到本地临时文件
tempFilePath = Environ("TEMP") & "\"
tempFileName = "temp.jpg"
Open tempFilePath & tempFileName For Binary Access Write As #1
Put #1, 1, picData
Close #1
' 插入图片到
Excel
With ActiveSheet.Pictures.Insert(tempFilePath & tempFileName)
.Left = Range("A1").Left ' 设置图片左上角的位置
.Top = Range("A1").Top
.ShapeRange.Lock
Asp
ectRatio = msoFalse ' 可以调整图片大小
End With
' 删除临时文件
Kill tempFilePath & tempFileName
End Sub
你可以按下Alt+F11打开
Excel
的VBA编辑器,将上述代码粘贴到"模块"中,然后运行`InsertPictureFromURL`宏,它将会在
Excel
的当前活动工作表中插入图片。请注意,这段代码将会在
Excel
的A1单元格的左上角插入图片。
希望以上信息对你有所帮助!