[ Last edited by mhymhymhy on 2009-4-23 at 03:14 ]作者: MYS 时间: 2009-4-22 13:03 单纯的批命令做不到,不过可以用C或QB写一个小程序,第一次运行时把日期写到某个文件中,以后每次运行时读入日期与现在日期比较,发现差距大于30天就把自己与批文件删除。作者: yishanju 时间: 2009-4-22 14:01 第一次运行就往计划任务里加一个删除自身的计划,这是办法之一
或者往注册表记录第一次运行的时间,每次运行都对比一下时间。作者: sady2009 时间: 2009-4-22 21:48 可以这样。不知是否可行
if not exist tmp type %outime%>tmp
然后利用tmp的创建时间来作第一次运行参照时间。
%outime%为到期时间.
获取dir/TC tmp 和 %outime% 中的间作比较
到期启动自毁代码
[ Last edited by sady2009 on 2009-4-22 at 21:55 ]作者: freeants001 时间: 2009-4-22 23:55 %date%,%time% 与 %~t0 比较作者: ZJHJ 时间: 2009-4-23 11:26 用批处理写没有问题啊 ,不过没有上面说的那么简单。作为学习,自己多看多研究
多试。
goto: eof
:datetosecs
setlocal ENABLEEXTENSIONS
set yy=%1&set mm=%2&set dd=%3&set hh=%4&set nn=%5&set ss=%6
if 1%yy% LSS 200 if 1%yy% LSS 170 (set yy=20%yy%) else (set yy=19%yy%)
set /a dd=100%dd%%%100,mm=100%mm%%%100
set /a z=14-mm,z/=12,y=yy+4800-z,m=mm+12*z-3,j=153*m+2
set /a j=j/5+dd+y*365+y/4-y/100+y/400-2472633
if 1%hh% LSS 20 set hh=0%hh%
if {%nn:~2,1%} EQU {p} if "%hh%" NEQ "12" set hh=1%hh%&set/a hh-=88
if {%nn:~2,1%} EQU {a} if "%hh%" EQU "12" set hh=00
if {%nn:~2,1%} GEQ {a} set nn=%nn:~0,2%
set /a hh=100%hh%%%100,nn=100%nn%%%100,ss=100%ss%%%100
set /a j=j*86400+hh*3600+nn*60+ss
endlocal&set %7=%j%&goto :EOF
:SecsToDate
set /a i=%1,ss=i%%60,i/=60,nn=i%%60,i/=60,hh=i%%24,dd=i/24,i/=24
set /a a=i+2472632,b=4*a+3,b/=146097,c=-b*146097,c/=4,c+=a
set /a d=4*c+3,d/=1461,e=-1461*d,e/=4,e+=c,m=5*e+2,m/=153,dd=153*m+2,dd/=5
set /a dd=-dd+e+1,mm=-m/10,mm*=12,mm+=m+3,yy=b*100+d-4800+m/10
(if %mm% LSS 10 set mm=0%mm%)&(if %dd% LSS 10 set dd=0%dd%)
(if %hh% LSS 10 set hh=0%hh%)&(if %nn% LSS 10 set nn=0%nn%)
if %ss% LSS 10 set ss=0%ss%
endlocal&set %7=%ss%&set %6=%nn%&set %5=%hh%&^
set %4=%dd%&set %3=%mm%&set %2=%yy%&goto :EOF作者: ZJHJ 时间: 2009-4-24 01:27 没有防止日期倒改功能作者: Hanyeguxing 时间: 2009-4-25 09:39 这个问题很郁闷人,因为有两个可能:
1,如果别人能看懂这个批处理,那么无论用什么方法,只要删除此批处理的相关部分就可以了。。。
2,如果别人看不懂,那么我觉得3楼的办法简单,使用at或Schtasks创建一个任务计划,并在创建之前先检测是否已存在该计划就可以。