利用死循环巧妙实现,回车对话框不关闭

本代码段展示了一个使用消息框进行用户交互的循环逻辑。当指定条件不满足时,程序会显示一个警告消息,询问用户是否继续搜索商品。如果用户选择取消,则退出循环。

bool flag = true;

while (true)
{
if (!flag) { break; }

if (MessageBox.Show("商品检索失败,没有该条件商品!", "系统提示", MessageBoxButtons.OKCancel, MessageBoxIcon.Warning, MessageBoxDefaultButton.Button2) == DialogResult.OK)
{
flag = false;
}
}

在Xshell中使用VBScript实现无限循环发送回车指令的自动化操作,可以通过编一个简单的脚本文件来完成。该脚本将利用Xshell提供的VBScript接口,持续向终端发送回车键(`Enter`),从而实现自动化交互[^1]。 以下是一个基本的VBScript示例代码,用于在Xshell中循环发送回车键: ```vbscript ' VBScript: Loop to send Enter key infinitely Sub Main Dim session Set session = Session ' 获取当前会话对象 If session.Connected Then Do While True session.SendString Chr(13) ' 发送回车符 Delay 1 ' 延迟1秒,防止过快发送影响系统响应;可根据需要调整或删除 Loop Else MsgBox "未连接到任何会话!" End If End Sub Sub Delay(seconds) Dim startTime startTime = Timer Do While Timer - startTime < seconds WScript.Sleep 100 ' 避免CPU占用过高 DoEvents Loop End Sub ``` ### 使用方法: 1. 打开Xshell,确保已经建立了一个有效的SSH连接。 2. 点击菜单栏中的 **“工具”** > **“脚本”** > **“运行脚本”**。 3. 将上述脚本保存为 `.vbs` 文件,例如 `loop_enter.vbs`。 4. 在Xshell中加载并运行该脚本。 5. 脚本开始执行后,将会每隔一秒发送一回车指令。若要去掉延迟,可以删除或注释掉 `Delay 1` 这一行。 ### 注意事项: - 由于是无限循环,除非手动停止脚本(通过任务管理器或Xshell内置的脚本控制),否则脚本将持续运行。 - 若目标主机对频繁输入有响应限制或安全机制,请谨慎使用此脚本,避免触发锁定或其他异常行为。 - 可以通过修改 `Delay` 函数中的参数来调整两回车之间的间隔时间。 ---
评论
成就一亿技术人!
拼手气红包6.0元
还能输入1000个字符
 
红包 添加红包
表情包 插入表情
 条评论被折叠 查看
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值