vbscript - random date time generation using VB script -
how generate date along time randomly between start date , end date using vb script. have take input user example: startdate:15/09/2013 9:00:00 enddate 21/09/2013 15:00:00
output : random date :17/09/2013 12:00:00
add random number of seconds less difference between dates in seconds startdate:
dim startdate : startdate = #15/09/2013 9:00:00# dim enddate : enddate = #21/09/2013 15:00:01# dim secdiff : secdiff = datediff("s", startdate, enddate) wscript.echo startdate, enddate, secdiff dim n n = 1 20 wscript.echo dateadd("s", fix(secdiff * rnd()), startdate) next
output (german locale):
15.09.2013 09:00:00 21.09.2013 15:00:01 540001 19.09.2013 18:49:56 18.09.2013 17:00:49 18.09.2013 23:55:40 17.09.2013 04:26:04 17.09.2013 06:17:32 20.09.2013 05:12:40 ...
Comments
Post a Comment