您的位置：程序门 -> vb -> 基础类



100分求够问题 vb高手来看看啊


[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]


100分求够问题 vb高手来看看啊[已结贴,结贴人:hexiaoer520]
发表于：2007-04-18 21:01:32 楼主
引用microsoft   word   9.0

dim   word   as   object
dim   wdapp   as   word.application
dim   wddoc   as   word.document

private   sub   command1_click（)
      set   wdapp   =   createobject（ "word.application ")
              set   wddoc   =   wdapp.documents.open（app.path   &   "\1.doc ")   '打开word文件
              wdapp.visible   =   false                                                           'word是否显示
               
        activedocument.range（0,   1).select               '光标移到最前

'         wddoc.close:   set   wddoc   =   nothing
        wdapp.documents.close:
        wdapp.quit:   set   wdapp   =   nothing               '关闭后释放内存
end   sub

以上代码
第1次按的时候可以用   在按一次的话
就会提示       "远程服务器不存在或不能使用 "
请问要怎么解决这个问题   谢谢回复``~

发表于：2007-04-18 21:16:021楼 得分:20
是不是你第一次关的时候对方问你是否保存，但是看不到对话框呢？
wdapp.documents.save
wdapp.documents.close
  wdapp.quit:   set   wdapp   =   nothing              
这样看看

你设置一个断点，看看哪里出问题了
发表于：2007-04-18 21:26:442楼 得分:0
应该是你第一次启动了word服务，没有关闭
发表于：2007-04-18 22:01:553楼 得分:0
wdapp.documents.save
wdapp.documents.close
  wdapp.quit:   set   wdapp   =   nothing               是正解，主要是没有保存
发表于：2007-04-18 22:16:214楼 得分:0
这个问题在调用word   2000和excel   2000时都可能出现,彻底的解决办法是:
在set   wdapp   =   nothing              
之后,枚举系统进程,找到word或excel进程后,用terminateprocess强行关闭
发表于：2007-04-18 23:54:135楼 得分:0
应该是没有关闭造成的。
发表于：2007-04-19 00:12:276楼 得分:0
没关闭之前的对象
发表于：2007-04-19 08:34:447楼 得分:0
在引用word或excel时，尽管对对象进行了释放，可在系统进程中还是有word或excel进程在运行。解决办法只有强行将该进行结束掉。
发表于：2007-04-19 16:44:058楼 得分:0
wdapp.documents.save
wdapp.quit:   set   wdapp   =   nothing
已经改成这样还是存在问题
第1次运行好了``进程里也没东西存在
在按一次的话就会提示       "远程服务器不存在或不能使用 "
无助中``求助ing
发表于：2007-04-19 18:53:379楼 得分:0
dim   word   as   object
dim   wdapp   as   word.application
dim   wddoc   as   word.document

private   sub   command1_click（)
      set   wdapp   =   createobject（ "word.application ")
              set   wddoc   =   wdapp.documents.open（app.path   &   "\1.doc ")   '打开word文件
              wdapp.visible   =   false                                                           'word是否显示
               
        wdoc.range（0,   1).select               '光标移到最前
-----修改后调试通过

'         wddoc.close:   set   wddoc   =   nothing
        wdapp.documents.close:
        wdapp.quit:   set   wdapp   =   nothing               '关闭后释放内存
end   sub
发表于：2007-04-19 18:54:3610楼 得分:0
在调用word、excel时，不要用active...，否则都会出现一样的错误的。
发表于：2007-04-19 19:16:1111楼 得分:0
不行啊`以为我下面还要运行
一系列的vba（word里面的)代码
第1次可以
第2次当碰到   换行命令的时候   "远程服务器不存在或不能使用 "
发表于：2007-04-19 19:23:0412楼 得分:80
你一定还是用了activedocument!自己找找看！！！
发表于：2007-04-19 20:07:5513楼 得分:0
楼主在窗体加载后   加载word,然后关闭窗口的时候   释放word.不要安一下按钮加载释放一次,这样的话会浪费系统资源.特别是按钮经常按的情况下.

相关文章
其他资讯

快速检索
分类导航标签a

最新资讯
热门点击