vbs notepad输入中文字符
2024-08-29 08:42:02
结合网上的写法，总结了一下
Set wshobj=WScript.CreateObject("WScript.Shell")
#code就是想输入的中文或中英文的结合
code="仔仔"
WScript.sleep 2000
wshobj.Run "cmd.exe /c echo " & code & "| clip.exe", vbHide
app=wshobj.Run("C:\windows\notepad.exe")
WScript.sleep 1000
wshobj.AppActivate app
#将code粘贴出来
wshobj.SendKeys "^v"
#保存文档
wshobj.SendKeys "^s"
WScript.sleep 2000
#输入文件名
wshobj.SendKeys "birth"
wshobj.SendKeys "{Enter}"
WScript.sleep 2000
wshobj.SendKeys "%s"
WScript.sleep 1000
wshobj.SendKeys "%{f4}"
最新文章
- 在centos7上安装ClamAV杀毒，并杀毒（centos随机英文10字母）成功
- mysql添加一个用户
- C# 个人常用代码积累
- push to deploy
- bzoj1015 星球大战
- X60的BIOS白名单-黑苹果之路
- UVALive 6692 Lucky Number （思路 + 枚举）
- php邮件发送 phpmailer
- java反射机制(工厂模式)
- NIO原理剖析与Netty初步----浅谈高性能服务器开发（一）
- Pyhon进阶9---类的继承
- 查看Windows电脑上.NET Framework版本的方法（找了好久的方法）
- 成员变量传参,jion方法的使用
- 批量Excel数据导入Oracle数据库 导入excel错误：外部表不是预期的格式 解决方案
- CentOS7 添加开机启动项
- NOIP2018 货币系统
- vue项目启动
- 获取URL中的链接（可中文也可英文）
- Windows下配置Apache+PHP跑Wordpress拾遗
- 如何：为 IIS 7.0 配置 <system.webServer> 节