| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 830 人关注过本帖, 1 人收藏
标题:请教:找不到ET.APPLICATIO类定义
取消只看楼主 加入收藏
zhousr
Rank: 2
等 级:论坛游民
威 望:1
帖 子:260
专家分:47
注 册:2019-3-8
结帖率:94.44%
收藏(1)
已结贴  问题点数:20 回复次数:4 
请教:找不到ET.APPLICATIO类定义

本机已安装WPS,安装目录中有et.exe文件。运行  wps=Createobject("et.application") 时,提示找不到et.aoolication类定义。
这是什么原因?WPS可能是P.j的,已经激活,与这有关吗?
搜索更多相关主题的帖子: 定义 找不到 提示 激活 安装 
2023-05-24 13:42
zhousr
Rank: 2
等 级:论坛游民
威 望:1
帖 子:260
专家分:47
注 册:2019-3-8
收藏
得分:0 
有你们真好,改成ket入行了
2023-05-24 17:14
zhousr
Rank: 2
等 级:论坛游民
威 望:1
帖 子:260
专家分:47
注 册:2019-3-8
收藏
得分:0 
已经打开一个文件,要判断一下,如果是WPS文件,就将其另存为.XLSX,再将这个XLSX文件打开。第一次用WPS,老是搞不定,很不好意思地向各位求个代码
我的不成功的代码如下:
DECLARE long IsWindowVisible IN user32 long
Wps=Createobject("ket.application")
*Wps=getobject(,"ket.application")
wps.Visible = 1
DO WHILE IsWindowVisible(wps.hWnd)!= 0
    M_File=wps.activesheet.name   &&获取文件名
    Wps.Workbooks.SaveAs(&lj\usertable\M_File.xlsx)
    Wps.Workbooks.Open(&lj\usertable\M_File.xlsx)
ENDDO
谢谢!
2023-05-24 17:39
zhousr
Rank: 2
等 级:论坛游民
威 望:1
帖 子:260
专家分:47
注 册:2019-3-8
收藏
得分:0 
谢谢csyx!我先试试
2023-05-25 09:30
zhousr
Rank: 2
等 级:论坛游民
威 望:1
帖 子:260
专家分:47
注 册:2019-3-8
收藏
得分:0 
现在很多政府部门配国产电脑,只能用国产系统,用WPS,所有.EXE都用不了。没办法,只好增加对WPS文件的支持。
2023-05-26 14:33
快速回复:请教:找不到ET.APPLICATIO类定义
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.022668 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved