Foxtable(狐表)用户栏目专家坐堂 → 能否打开第三方软件


  共有6768人关注过本帖树形打印复制链接

主题:能否打开第三方软件

帅哥哟,离线,有人找我吗?
有点甜
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/8/30 8:48:00 [显示全部帖子]


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/8/30 10:20:00 [显示全部帖子]

以下是引用jseteary在2018/8/30 9:19:00的发言:
请老师指点,就是如何用foxtable管理第三方软件,主要就是打开,运行,操作等

 

打开参考 http://www.foxtable.com/webhelp/scr/0353.htm

 

操作参考 http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=77745&skin=0

 

控制外部窗口操作是很麻烦的,你看不懂的话,你做不到。


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/8/30 18:19:00 [显示全部帖子]

1、拷贝【全局代码】的代码过去

 

http://www.foxtable.com/webhelp/scr/1842.htm

 

2、用spylite获取对应控件的值,动态设置值,动态点确定。请自行看懂上面帮助文档的代码。

 

 

下载信息  [文件大小:251.9 KB  下载次数:42]
图片点击可在新窗口打开查看点击浏览该文件:spylite24.zip


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/8/30 20:49:00 [显示全部帖子]

1、看懂

 

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=77745&skin=0

 

 

2、拷贝【全局代码】的代码到你自己的项目里去啊

 

3、如果这个都不理解,不建议你做这个功能,后面的你更不会


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/9/4 11:11:00 [显示全部帖子]

以下是引用jseteary在2018/9/4 11:06:00的发言:
甜老师,我把你实例 测试了,可以完成,但是,我的就实现不了

 

不同的软件,有不同的写法。前提是你要理解代码的意思,你才能继续的。

 

1、用所给的工具查看你第三方控件的文本框、按钮的值,然后替换例子里面的值。

 

2、然后不断测试。


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/9/4 11:32:00 [显示全部帖子]

看之前给你的例子,你理解每一句代码的意思了没有?特别是 findwindow 之类的,意思是查找到对应的窗口、文本框之类的,然后再做后面的操作。


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/9/4 11:34:00 [显示全部帖子]

以下是引用jseteary在2018/9/4 11:25:00的发言:
我读出的窗口类名都是Edit?
怎么回事?

 

有一些窗口,是无法控制的,有可能你这个第三方控件不能控制。


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/9/4 16:21:00 [显示全部帖子]

以下是引用jseteary在2018/9/4 16:06:00的发言:

图片点击可在新窗口打开查看此主题相关图片如下:qq图片20180904160457.png


第二行,sourcesafe密码怎么让写入,语句不会写,请帮助一下,谢谢甜老师

 

查到第二行的文本框的【值】是什么了没有?和第一行一样,设置值进去。


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/9/4 17:10:00 [显示全部帖子]

那你就尝试根据Edit查找设置值,看行不行。

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/9/4 17:24:00 [显示全部帖子]

执行下面代码,弹出什么?
 
Dim hwnd As IntPtr = FindWindow(Nothing, "登录到 Visual SourceSafe 数据库")
If hwnd <> IntPtr.Zero Then
    msgbox("找到窗口")
    Dim lbl As IntPtr = FindWindowEx(hwnd, 0, "Edit", "")
    If lbl <> IntPtr.Zero Then
        msgbox("找到文本框")
        SendMessage(lbl, &H000C, 0, "yinmx")       
        Dim lbl1 As IntPtr = FindWindowEx(hwnd, lbl, "Edit", "")
        If lbl1 <> IntPtr.Zero Then
            msgbox("找到文本框")
            SendMessage(lbl, &H000C, 0, "7570546")           
        End If
    End If
End If
msgbox(123)

 回到顶部
总数 16 1 2 下一页