为编程爱好者分享易语言教程源码的资源网
三叶资源网易语言免费公开课
三叶资源网官方③群:33301895 三叶资源网解压密码 C全站文字广告,诚邀与您合作 三叶资源网培训教程视频 花呗变现,花呗变现
三叶资源网官方③群:33301895 三叶资源网访问导航 B全站文字广告,诚邀与您合作 三叶资源网培训教程视频 花呗变现,花呗变现

网站首页 按键精灵相关 按键精灵Q语言 正文

按键精灵半自动向十二星座邮箱发邮件脚本源码

三叶资源网 2018-12-05 按键精灵Q语言 29 ℃ 0 评论
FreeYun网络验证

首先是弹出提示窗口,点击enter键继续,出现输入框,输入数字,若数字大于12提示错误,根据输入的数字指定相应星座邮箱发送空白邮件,获得相应星座邮票。 

打开网易邮箱,最大化,运行脚本。 

我喜爱脚本和一切有创意的东西,欢迎大家和我交流任何有趣的东东。 ^_^ 

脚本附件:xiexin.bmp, 123.bmp

运行环境:分辨率:1280x1024 色深:32位 操作系统:Windows XP 按键精灵版本:7.00.4148

@高磊制作     2009-04-25

Delay 1000  
MsgBox "请确认是163网易邮箱,并且最大化于当前,若没有请设置好再点击本窗口的 确定"  
Delay 1000  
msgbox("请不要随意移动鼠标,停止请按F12")  
Delay 1000  
Rem dim v  
dim v  
v=inputbox("请输入月份数字:","发邮件")  
Delay 1000  
If v>12 or v<1  
    v=inputbox("月份输入错误,请重输:","发邮件")  
EndIf   
If v="1"  
    v="yi"  
EndIf   
If v="2"  
    v="er"  
EndIf   
If v="3"  
    v="san"  
EndIf   
If v="4"  
    v="si"  
EndIf   
If v="5"  
    v="wu"  
EndIf   
If v="6"  
    v="liu"  
EndIf   
If v="7"  
    v="qi"  
EndIf   
If v="8"  
    v="ba"  
EndIf   
If v="9"  
    v="jiu"  
EndIf   
If v="10"  
    v="shi"  
EndIf   
If v="11"  
    v="shiyi"  
EndIf   
If v="12"  
    v="shier"  
EndIf   
VBSCall FindColorEx(0,0,1024,768,"6161A0",0,0.9,intX,intY)  
Delay 1000  
If intX>0 and intY>0  
    MoveTo intX,intY  
Else   
    MoveTo 140,214  
EndIf   
Delay 1000  
LeftClick 1  
Delay 2000  
SayString v  
SayString "yuexingzuo@126.com"  
Delay 1000  
MoveR 113,10  
LeftClick 1  
Delay 1000  
KeyPress 13,1  
Delay 2000  
Goto dim v


Tags:按键精灵

来源:三叶资源网,欢迎分享,公众号:iisanye,(三叶资源网官方③群:33301895

本文暂时没有评论,来添加一个吧(●'◡'●)

欢迎 发表评论:

百度站内搜索
交流QQ群:33301895
三叶资源网官方③群:33301895
加群全凭信仰,群里有的资源网站也会有。
群里只是能及时交流,群主会尽力解答一些会的问题。
设置付费入群,只是为了过滤一些小号无意义广告。
所以不必要为了1块钱加群又退出
群主在群内发的红包都够你抢回来还有的多,更何况还能交流学习。
网站分类
随机tag
Shell外壳编程变现JS改写雷电模拟器引流多线程刺激战场抖音脚本因特网服务支持库超文本浏览框支持库支持库按键精灵安卓版彗星小助手薅羊毛大漠插件引流软件源码http访问喊麦黑月插件sqlite3
最新评论