代码如下:Dim oWord As Object
Dim oDoc As Object
Set oWord = CreateObject("Word.Application")
Set oDoc = oWord.Documents.Open("e:\test\Mydoc.doc") '这一句出错了,
Set oDoc = Nothing
Set oWord = noting
Dim oDoc As Object
Set oWord = CreateObject("Word.Application")
Set oDoc = oWord.Documents.Open("e:\test\Mydoc.doc") '这一句出错了,
Set oDoc = Nothing
Set oWord = noting
解决方案 »
- 求助!!我想用VB读取保存在剪切版中的Excel
- int 與 Integer
- 高分请求急救:关于用vb读写excel文件的问题
- ado怎么样在数据库中添加一条记录
- 如何在VB中实现类似SQL-SERVER 中DTS的功能,实现选表数据导入导出
- 有关datacombo??求助
- 想分别提取一个时间型变量中的小时,分钟,秒 应该怎么做?
- 我想做一个只要发现ie就关掉的程序,请朋友们给点思路。谢谢!呵呵
- 我要把sqlserver中的表导出到access中 在vb中编程实现 只需知道表名 不必考虑表结构 请问该如何处理
- 如何根据文件地址批量复制文件到指定位置?
- 初级问题,请高手帮忙
- 各位好友,帮个忙吧..谢谢
我的目的是想让带有宏的Word模板,在服务器上打开,并执行宏(这个宏必须在服务器上执行,因为宏包含访问数据库,这个数据库必须在服务器上才有访问权限),在服务器上生成一个新的Word文档,浏览器直接调用Word文档察看。我是想用Asp + Com,但是理论上可以,实际好像出错了,Com的代码如上。或者谁还能提出其他的实现方式吗?
错误是com里异常退出,忽略错误的话,文档被锁定了,无法打开。
每个参数都要设置属性''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
例子如下:
'以下为部门的属性'上级部门ID
Public Property Let SuperID(ByVal vData As Long)
mvarSuperID = vData
End Property
Public Property Get SuperID() As Long
SuperID = mvarSuperID
End Property'本部门的ID
Public Property Let ID(ByVal vData As Long)
mvarID = vData
End Property
Public Property Get ID() As Long
ID = mvarID
End Property