无忧启动论坛

标题: 【已解决】求vbs代码（点击软件X按钮）。谢谢 [打印本页]

作者: yyz2191958 时间: 2023-12-28 11:21
标题: 【已解决】求vbs代码（点击软件X按钮）。谢谢
本帖最后由 yyz2191958 于 2023-12-28 12:12 编辑

已解决：
模拟个alt加f4即可

==============================================================
原来的问题：
有一些软件启动后，要点 “X按钮” 才最小化到托盘（Textify.exe————就是这样），这样有一些不方便。
求vbs代码（点击软件X按钮————不是结束进程）。
【我以前在 “霏凡论坛” 发过（在....Textify....的帖子里面。），现在 “霏凡论坛” 打不开了】
=======================================================
下面的代码我已经有了（也可以实现免点X按钮，但我就是想要：点击软件X按钮代码）：
'【重新启动 “抓文字Textify.exe”】
On Error Resume Next
Set FSO = CreateObject("Scripting.FileSystemObject")
FSO.DeleteFile(FSO.GetSpecialFolder(0) & "\shelliconcache")
Set FSO = Nothing
Set Pros = GetObject("winmgmts:\\.\root\cimv2").ExecQuery ("Select * from Win32_Process Where Name = '抓文字Textify.exe'")
For Each Pro in Pros
Pro.Terminate
Next
'【刷新托盘图标】
CreateObject("WScript.Shell").Run "D:\1绿色软件\刷新托盘图标.exe",0
'【启动 “抓文字Textify.exe”】
CreateObject("WScript.Shell").Run "抓文字Textify.exe",0

2.png (11.77 KB, 下载次数: 58)