客户duan服务端判断

aochens

客户duan打开以后 判断某个进程.exe是否存在
如果存在则连接服务duan如果不存在则断开服务duan，还有客户duan自动重连

LEOONL

aochens 发表于 2024-8-30 14:19
我的意思是，客户Duan先打开，进程还没打开。
客户Duan实时检测- -如果检测到进程就连接 如果没检测到进 ...

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

如果 (进程_是否存在 (“1.exe”))
客户1.连接 (“127.0.0.1”, 19730)
启动线程 (&检测断开, , )
启动线程 (&检测连接, , )

子程序名	返回值类型	公开	备 注
检测连接

判断循环首 (真)
如果真 (进程_是否存在 (“1.exe”))
客户1.连接 (“127.0.0.1”, 19730)
启动线程 (&检测断开, , )
跳出循环 ()
延时 (1000)
判断循环尾 ()

子程序名	返回值类型	公开	备 注
检测断开

判断循环首 (真)
如果真 (进程_是否存在 (“1.exe”) ＝ 假)
客户1.断开连接 ()
跳出循环 ()
延时 (1000)
判断循环尾 ()

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> .支持库 EThread<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> .如果 (进程_是否存在 (“1.exe”))<br />     客户1.连接 (“127.0.0.1”, 19730)<br />     启动线程 (&检测断开, , )<br /> .否则<br />     启动线程 (&检测连接, , )<br /> .如果结束<br /> <br /> <br /> .子程序 检测连接<br /> <br /> .判断循环首 (真)<br />     .如果真 (进程_是否存在 (“1.exe”))<br />         客户1.连接 (“127.0.0.1”, 19730)<br />         启动线程 (&检测断开, , )<br />         跳出循环 ()<br />     .如果真结束<br />     延时 (1000)<br /> .判断循环尾 ()<br /> <br /> .子程序 检测断开<br /> <br /> .判断循环首 (真)<br />     .如果真 (进程_是否存在 (“1.exe”) ＝ 假)<br />         客户1.断开连接 ()<br />         跳出循环 ()<br />     .如果真结束<br />     延时 (1000)<br /> .判断循环尾 ()

aochens

LEOONL 发表于 2024-8-30 14:05
你把结束换成断开重连就是了
[e=0].版本 2
.支持库 EThread

然后就是客户Duan打开 检测进程是否存在 不存在就不连接，
在客户Duan打开之后再打开这个进程，自动连接，进程不存在就自动断开。
这是我的意思，只要客户Duan是打开的，就是实时监控！！！

aochens

LEOONL 发表于 2024-8-30 14:05
你把结束换成断开重连就是了
[e=0].版本 2
.支持库 EThread

我的意思是，客户Duan先打开，进程还没打开。
客户Duan实时检测- -如果检测到进程就连接 如果没检测到进程就不连接，如果中途打开了进程就自动连接，中途关闭就自动断开，我是这个意思。

LEOONL

aochens 发表于 2024-8-30 14:01

  

如果 (进程_是否存在 (“1.exe”))
[/quote]
你把结束换成断开重连就是了
[e=0].版本 2

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

如果 (进程_是否存在 (“1.exe”))
客户1.连接 (“127.0.0.1”, 19730)
启动线程 (&断开重连, , )

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> <br /> .如果 (进程_是否存在 (“1.exe”))</blockquote></div><br /> 你把结束换成断开重连就是了<br /> [e=0].版本 2<br /> .支持库 EThread<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> .如果 (进程_是否存在 (“1.exe”))<br />     客户1.连接 (“127.0.0.1”, 19730)<br /> .否则<br />     启动线程 (&断开重连, , )

LEOONL

aochens 发表于 2024-8-30 14:01
[e=3].版本 2

.如果 (进程_是否存在 (“1.exe”))

两种方法我不是都已经写了吗，你复制粘贴用就不可以了

aochens

LEOONL 发表于 2024-8-30 12:34

  

如果 (进程_是否存在 (“1.exe”))
客户1.连接 (“127.0.0.1”, 19730)
结束 ()

.版本 2<br /> <br /> .如果 (进程_是否存在 (“1.exe”))<br />     客户1.连接 (“127.0.0.1”, 19730)<br /> .否则<br />     结束 ()

我的意思是客户Duan打开以后 检测进程1.exe是否存在，
如果存在就连接，如果不存在就不连接，客户Duan不关闭的情况下实时检测 应该怎么写

单字一个亦

  

子程序名	返回值类型	公开	备 注
启动初始化

变量名	类 型	静态	数组	备 注
进程名数组	文本型		0
ID数组	整数型		0
i	整数型
k	整数型

进程_枚举 (进程名数组, ID数组)
计次循环首 (取数组成员数 (进程名数组), i)
如果真 (进程名数组 [i] ＝ “Server.exe”)
k ＝ k ＋ 1
如果真 (k ＞ 1)
进程_结束 ()


计次循环尾 ()
k ＝ 0
计次循环首 (取数组成员数 (进程名数组), i)
如果真 (进程名数组 [i] ＝ “进程.exe”)
k ＝ k ＋ 1

计次循环尾 ()
如果真 (k ＝ 0)
程序_运行Ex (取运行目录 () ＋ “\进程.exe”)

.版本 2<br /> <br /> .子程序 启动初始化<br /> .局部变量 进程名数组, 文本型, , "0"<br /> .局部变量 ID数组, 整数型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 k, 整数型<br /> <br /> <br /> 进程_枚举 (进程名数组, ID数组)<br /> <br /> .计次循环首 (取数组成员数 (进程名数组), i)<br />     .如果真 (进程名数组 <i> ＝ “Server.exe”)<br />         k ＝ k ＋ 1<br />         .如果真 (k ＞ 1)<br />             进程_结束 ()<br />         .如果真结束<br /> <br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> k ＝ 0<br /> <br /> .计次循环首 (取数组成员数 (进程名数组), i)<br />     .如果真 (进程名数组 <i> ＝ “进程.exe”)<br />         k ＝ k ＋ 1<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> <br /> .如果真 (k ＝ 0)<br />     程序_运行Ex (取运行目录 () ＋ “\进程.exe”)

LEOONL

实时监控进程断开

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

启动线程 (&判断进程, , )

子程序名	返回值类型	公开	备 注
判断进程

判断循环首 (真)
如果真 (进程_是否存在 (“1.exe”))
客户1.断开连接 ()
跳出循环 ()
延时 (1000)
判断循环尾 ()

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> .支持库 EThread<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 启动线程 (&判断进程, , )<br /> <br /> .子程序 判断进程<br /> <br /> .判断循环首 (真)<br />     .如果真 (进程_是否存在 (“1.exe”))<br />         客户1.断开连接 ()<br />         跳出循环 ()<br />     .如果真结束<br />     延时 (1000)<br /> .判断循环尾 ()

LEOONL

Desktop.rar (230.58 KB, 下载次数: 4)

2024-8-30 12:34 上传

点击文件名下载附件

LEOONL

aochens 发表于 2024-8-30 14:21
然后就是客户Duan打开 检测进程是否存在 不存在就不连接，
在客户Duan打开之后再打开这个进程，自动连接 ...

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

如果 (进程_是否存在 (“1.exe”))
客户1.连接 (“127.0.0.1”, 19730)
启动线程 (&检测断开, , )
启动线程 (&检测连接, , )

子程序名	返回值类型	公开	备 注
检测连接

判断循环首 (真)
如果真 (进程_是否存在 (“1.exe”))
客户1.连接 (“127.0.0.1”, 19730)
启动线程 (&检测断开, , )
跳出循环 ()
延时 (1000)
判断循环尾 ()

子程序名	返回值类型	公开	备 注
检测断开

判断循环首 (真)
如果真 (进程_是否存在 (“1.exe”) ＝ 假)
客户1.断开连接 ()
启动线程 (&检测连接, , )
跳出循环 ()
延时 (1000)
判断循环尾 ()

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> .支持库 EThread<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> .如果 (进程_是否存在 (“1.exe”))<br />     客户1.连接 (“127.0.0.1”, 19730)<br />     启动线程 (&检测断开, , )<br /> .否则<br />     启动线程 (&检测连接, , )<br /> .如果结束<br /> <br /> <br /> .子程序 检测连接<br /> <br /> .判断循环首 (真)<br />     .如果真 (进程_是否存在 (“1.exe”))<br />         客户1.连接 (“127.0.0.1”, 19730)<br />         启动线程 (&检测断开, , )<br />         跳出循环 ()<br />     .如果真结束<br />     延时 (1000)<br /> .判断循环尾 ()<br /> <br /> .子程序 检测断开<br /> <br /> .判断循环首 (真)<br />     .如果真 (进程_是否存在 (“1.exe”) ＝ 假)<br />         客户1.断开连接 ()<br />         启动线程 (&检测连接, , )<br />         跳出循环 ()<br />     .如果真结束<br />     延时 (1000)<br /> .判断循环尾 ()