[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
czjt1234

Rank: 5Rank: 5

帖子
934 
积分
1398 
技术
101  
捐助
0  
注册时间
2010-4-30 
1楼 跳转到 »
发表于 2022-12-1 12:28 | 显示全部帖子
需要粘贴ip ？
不能把ip作为参数传递吗
或者 | > 什么的

QQ 20147578

TOP

czjt1234

Rank: 5Rank: 5

帖子
934 
积分
1398 
技术
101  
捐助
0  
注册时间
2010-4-30 
2楼
发表于 2022-12-1 19:34 | 显示全部帖子
本帖最后由 czjt1234 于 2022-12-1 19:35 编辑

用vbs


  1. Dim oWshShell

  2. 

  3. Set oWshShell = CreateObject("WScript.Shell")

  4. oWshShell.AppActivate "cmd.exe"    '激活指定窗口

  5. Wsh.Sleep 100

  6. oWshShell.SendKeys "^V"            '发送 ctrl + v

  7. oWshShell.SendKeys "{ENTER}"       '发送回车键
复制代码



先查找完全匹配的标题栏
找不到就匹配标题栏左起或右起的字符串
但不会匹配标题栏中间的字符串

例如激活指定窗口 "abc"
可以匹配标题栏www.abc或abc.com
但不会匹配www.abc.com
1

评分人数


QQ 20147578

TOP

czjt1234

Rank: 5Rank: 5

帖子
934 
积分
1398 
技术
101  
捐助
0  
注册时间
2010-4-30 
3楼
发表于 2022-12-2 20:15 | 显示全部帖子
直接发送密码可以吗

oWshShell.SendKeys "abcdefg1234567"
1

评分人数


QQ 20147578

TOP

czjt1234

Rank: 5Rank: 5

帖子
934 
积分
1398 
技术
101  
捐助
0  
注册时间
2010-4-30 
4楼
发表于 2022-12-2 20:34 | 显示全部帖子 
  1. Dim oWshShell, s

  2. Set oWshShell = CreateObject("WScript.Shell")

  3. oWshShell.AppActivate "cmd.exe"    '激活指定窗口

  4. Wsh.Sleep 3000                     '延时3秒

  5. s =  CreateObject("htmlfile").parentWindow.clipboardData.getData("text")

  6. oWshShell.SendKeys s
复制代码
1

评分人数


QQ 20147578

TOP

czjt1234

Rank: 5Rank: 5

帖子
934 
积分
1398 
技术
101  
捐助
0  
注册时间
2010-4-30 
5楼
发表于 2022-12-3 07:49 | 显示全部帖子
回复 16# yyz219


   我自己的电脑，win7x64，测试通过才发上来的，可以粘贴剪贴板的字符串

QQ 20147578

TOP

返回列表