createobject,CreateObject coreldraw

http://www.itjxue.com  2023-01-14 01:32  来源:未知  点击次数: 

vba createobject函数 报错

excel VBA createobject("Excel.Application")– 服务器执行失败(来自HRESULT的异常:0x80080005

CreateObject(Excel.Application)出错解决方法

使用excel VBA createobject("Excel.Application")

我收到以下错误:

服务器执行失败(来自HRESULT的异常:0x80080005

在我的本地机器上工作正常. 在客户电脑不正常

尝试过以下方法

** 1)运行dcomcnfg打开组件服务

2)展开组件服务“ – ”电脑“ – ”我的电脑“ – ” DCOM配置“

3)找到“Microsoft Excel应用程序”.

4)打开属性对话框的权限

5)点击“安全”标签,

6)“启动和激活权限,配置权限,添加权限 – 在管理员用户(此用户),交互式用户和启动用户下运行身份

7).启动和激活权限访问权限配置权限=添加完全控制的IIS_IUSRS网络服务**

关于VB中CreateObject 函数

1、CreateObject函数简介:创建并返回一个对 ActiveX 对象的引用。

2、CreateObject函数语法 :CreateObject(class,[servername]) ;

3、CreateObject参数简介 :

class必需的;

Variant (String). 要创建的应用程序名称和类;

servername可选的;

Variant (String). 要在其上创建对象的网络服务器名称。

4、CreateObject函数应用 :

每个支持自动化的应用程序都至少提供一种对象类型。例如,一个字处理应用程序可能会提供 Application 对象,Document 对象,以及 Toolbar 对象。 要创建 ActiveX 对象,只需将 CreateObject 返回的对象赋给一个对象变量: ’声明一个对象变量来存放该对象’的引用。Dim as Object 采用后期绑定方式。

Dim ExcelSheet As Object

Set ExcelSheet = CreateObject("Excel.Sheet")

WScript.CreateObject

'你这是一个VBScript脚本代码,下面我解释的内容是针对下一行的代码

'通过WScript对象的CreateObject(创建对象)方法创建一个"本地 Windows 外壳程序"对象Ws

set Ws = WScript.CreateObject("WScript.Shell")

'利用Ws对象的运行程序方法,运行sc config w32time start= auto这条命令,该命令调用Sc程序,SC是用来与Windows的服务程序通信的,在这里是设置W32time(时间)服务为自动启动,这样就可以校准计算机时间,就后的0表示run方法是否等待执行命令完再执行下一行,0表示不等待(下同).

ws.run "sc config w32time start= auto",0

'运行Net命令,该命令是与网络有关的命令,Net Stop 表示停止某项服务,在这里,是停止W32time(时间)服务

ws.run "net stop w32time",0

'这句是启动w32time服务,Net start表示启动某项服务

ws.run "net start w32time",0

'net time 是Net命令的另一个选项,表示查询或设置计算机时间,在这个命令后面有/set就是设置时间,/y表示yes即不提示,直接认为要设置, \\192.168.1.222 表示的是该IP地址指定的计算机,整个连起来就是将自己的计算机时间设置为与192.168.1.222相同

另外运行net time时,必须先启动w32time服务,所以前面的几行是确保w32time已启动.

ws.run "net time \\192.168.1.222 /set /y",0

在使用ASP时,用CreateObject创建对象所需提供的文件放在哪里?

创建对象的一般为dll文件,放在系统目录,一般需要用regsvr32注册,如果没有在系统目录,那么使用regsvr32注册时需要带上路径

(责任编辑:IT教学网)

更多

相关Oracle文章

推荐Oracle文章