超级厉害的VBS定时提醒脚本 Remind.vbs

'/*=========================================================================   
' * Intro       定时提醒,格式:时间|提示语,具体使用方法可以参考例子   
' * FileName    Remind.vbs   
' * Author      yongfa365   
' * Version     v1.0   
' * WEB         http://www.yongfa365.com   
' * Email       yongfa365[at]qq.com   
' * FirstWrite  http://www.yongfa365.com/Item/Remind.vbs.html   
' * MadeTime    2008-06-18 19:26:32   
' * LastModify  2008-06-18 19:26:32   
' *==========================================================================*/

tx = True  
used = ""  
t = ""

'■■■■■■■■■■■■■■可修改区域开始■■■■■■■■■■■■■■   
t = t & "|" & "10:00:00|hello,hi,是美女不!"  
t = t & "|" & "11:30:00|美女,快吃饭了!"  
t = t & "|" & "14:00:00|困不困?困了就休息会,注意关门,小心被偷窥哦,哇嘎嘎"  
t = t & "|" & "16:30:00|想帅哥了吧,笑一笑^-^"  
t = t & "|" & "17:30:00|好像要下班了哦。"  
t = t & "|" & "18:00:00|帅哥还没回家?快提醒下"  
t = t & "|" & "22:30:00|哥哥,备份当前数据,时间要到了。"  
'■■■■■■■■■■■■■■可修改区域结束■■■■■■■■■■■■■■

t = Right(t, Len(t) -1)

Do While tx   
    WScript.Sleep 10000'10秒种检测一次   
    tixing()   
Loop

Function tixing()   
    t2 = Split(t, "|")   
    For i = LBound(t2) To UBound(t2) step 2   
        txsj = CDate(Date & " " & t2(i))   
        If DateAdd("n", -1, Now) <= txsj And DateAdd("n", 1, Now) >= txsj And InStr(used, t2(i)) = 0 Then  
        '时间相差一分钟且没提醒过的的话提醒   
            MsgBox t2(i + 1)   
            used = used & t2(i)'提醒过的记录一下   
        End If  
    Next  
End Function

(0)

相关推荐

  • 超级厉害的VBS定时提醒脚本 Remind.vbs

    '/*=========================================================================    ' * Intro       定时提醒,格式:时间|提示语,具体使用方法可以参考例子    ' * FileName    Remind.vbs    ' * Author      yongfa365    ' * Version     v1.0    ' * WEB         http://www.yongfa365.com

  • vbs实现的定时提醒你休息的脚本

    复制代码 代码如下: set WshShell = WScript.CreateObject("WScript.Shell") '对话框标题 alerttitle = "定时提醒" '提醒内容,vbnewline为换行符 alerttext =  vbnewline & vbnewline & "休息一下,活动一下胳膊,脖子,腰部." & vbnewline & vbnewline & vbnewline 

  • ubuntu中实现定时弹窗的提醒脚本

    简单的弹窗效果 首先是上网查了ubuntu中的弹窗命令,发现notify-send这个命令就能满足要求了 notify-send ["该休息一下啦"] "喝水!伸懒腰!动一动!" 弹窗效果 弹窗效果有了,然后应该是一个定时弹窗的功能 一.cron命令实现定时弹窗 想到的是cron命令,google了很多教程,都没有成功 在/etc/crontab 中加入了 * * * * * root notify-send ["该休息一下啦"] "喝

  • 教你用Java Swing做一个定时提醒工具

    前言 因为上下班的时候,老是忘记打卡(其实这不是重点,因为可以补卡嘛),重点是下班走的时候总是忘记关空调(谁最后走忘记关空调,罚100...) 我一开始的做法是,在主机上贴个便签,写上关空调三个大字,坐在电脑旁,只要你眼睛稍微一瞥,就是看到.可是依旧是该忘还得忘,那么明显一个便签贴在那,走的时候死活看不到,我有什么办法! 然后我就想做个弹窗提醒,一到下班的点,就弹窗提醒,然后就关空调,下班就关,总不会忘了吧.刚好那两天因为项目需要,我写了个vbs脚本,用vbs启动jar和exe程序这些.就想用v

  • 八个超级好用的Python自动化脚本(小结)

    目录 1.自动化阅读网页新闻 2.自动化数据探索 3.自动发送多封邮件 4.将 PDF 转换为音频文件 5.从列表中播放随机音乐 6.智能天气信息 7.长网址变短网址 8.清理下载文件夹 每天你都可能会执行许多重复的任务,例如阅读新闻.发邮件.查看天气.打开书签.清理文件夹等等,使用自动化脚本,就无需手动一次又一次地完成这些任务,非常方便.而在某种程度上,Python 就是自动化的代名词. 1.自动化阅读网页新闻 这个脚本能够实现从网页中抓取文本,然后自动化语音朗读,当你想听新闻的时候,这是个不

  • vbs定时发送邮件的方法与代码

    '用VBS写个脚本,然后用WINDOWS平台下的计划任务来调用,每天定时群发邮件.  '代码如下:  下载地址 http://www.51tiao.com/info.vbs 复制代码 代码如下: Dim connstr,conn  Dim sql,rs,msg Sub OpenDB()      ConnStr = "DSN=51tiao.Com;UID=sa;PWD=;"      If Not IsObject(Conn) Then          Set conn = Crea

  • 按键精灵 脚本-学习VBS的一个不错的教程

    今天我就从总体上对VBS进行介绍,希望能给大家一个直观的印象.另外,讲解与按键官网的按键精灵教程(李悦制作)相结合,帮大家看懂这个东东. 一.概述 要让计算机做事情就必须由人给它指令.原来的指令很复杂,都是些0011001之类的东西,后来逐渐简化,指令也更接近于人类的语言.VBS(Microsoft(R) Visual Basic(R) Scripting)也是高级语言的一种,和其他高级语言相比,它有简单易学的特点,是电脑初学者涉足编程领域的良好入口. 如果说从低级语言进化到高级语言是人类控制计

  • js实现的定时关闭页面或定时提醒效果代码

    v\:*{behavior:url(#default#vml)} v\:oval,#oDiv{position=absolute;width=200;height=200} #stay{position=absolute;top=70;left=59;color=RED;padding=6;font=900 20/1.3} #input input{border-left=0;border-right=0} Cool Clock 9?'':'_')+per+'%'" style=position

  • VBS相册生成脚本[

    此脚本的功能为将一个目录中的jpg,gif,png格式的图片生成Html相册,页面上的图像只是改变显示大小,并没有生成缩略图.用到的技术:Scripting.FileSystemObject,Adodb.Stream.其中得到图片长宽用了秋水无恨的Adodb.Stream取得图像的高宽 复制代码 代码如下: '/////////////////////////////////////////////// 'VBS相册生成脚本,使用方法:将此文件放在sendto目录中(在运行中输入直接sendto

  • Android基于广播事件机制实现简单定时提醒功能代码

    本文实例讲述了Android基于广播事件机制实现简单定时提醒功能代码.分享给大家供大家参考,具体如下: 1.Android广播事件机制 Android的广播事件处理类似于普通的事件处理.不同之处在于,后者是靠点击按钮这样的组件行为来触发,而前者是通过构建Intent对象,使用sentBroadcast()方法来发起一个系统级别的事件广播来传递信息.广播事件的接收是通过定义一个继承Broadcast Receiver的类实现的,继承该类后覆盖其onReceive()方法,在该方法中响应事件.And

随机推荐