|
代码贴上 不可以向记事本发送文字
#import "dm.dmsoft" dm
空间 绑定窗口
功能 逻辑型 开始_点击()
整型 wnd,flag
wnd = dm.FindWindow("Notepad", "1.txt - 记事本")
if(wnd == 0)//未找到指定窗口
help.messagebox("未找到窗口")
else//找到窗口
help.messagebox("找到窗口")
flag = dm.BindWindow(wnd,"normal","normal","normal",0)
if(flag == 1)//绑定成功
dm.SendString(wnd,"我是来测试的")
else
help.messagebox("绑定窗口失败")
endif
endif
返回 真
功能结束
空间结束
|
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
|