Foxtable(狐表)用户栏目专家坐堂 → 关闭Foxtable软件更新提示


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

主题:关闭Foxtable软件更新提示

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


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

你指哪里的提示?foxtable版本的提示?

 

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

 


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


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

以下是引用ryubo888在2018/9/10 14:46:00的发言:
是关闭foxtable版本更新的提示

 

截图说明什么提示。如果foxtable最新版的提示,是无法关闭的。


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


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

全局代码

 

<DllImport("user32.dll", EntryPoint := "FindWindow", SetLastError := True)> _
Public Function FindWindow(lpClassName As String, lpWindowName As String) As IntPtr
End Function

<DllImport("user32.dll", EntryPoint := "FindWindowEx", SetLastError := True)> _
Public Function FindWindowEx(hwndParent As IntPtr, hwndChildAfter As UInteger, lpszClass As String, lpszWindow As String) As IntPtr
End Function

<DllImport("user32.dll", EntryPoint := "SendMessage", SetLastError := True, CharSet := CharSet.Auto)> _
Public Function SendMessage(hwnd As IntPtr, wMsg As UInteger, wParam As IntPtr, lParam As Integer) As Integer
End Function

Public Sub CloseWin(winTitle As String, buttonTitle As String)
Dim hwnd As IntPtr = FindWindow(Nothing, winTitle)
If hwnd <> IntPtr.Zero Then
    'Dim hwndText As IntPtr = FindWindowEx(hwnd, 0, Nothing, "请设置浏览器的安全级别.启用activeX脚本!")
    'If hwndText <> IntPtr.Zero Then
    Dim hwndSure As IntPtr = FindWindowEx(hwnd, 0, "Button", buttonTitle)
    If hwnd <> IntPtr.Zero Then
        SendMessage(hwndSure, &Hf5, 0, 0)
        '按她
    End If
    'End If
End If
End Sub

 

调用代码,你可以做一个定时器,定时执行

 

CloseWin("提示", "否(&N)")


 回到顶部