Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
dim mydate, intpos
mydate = "11/23/2006"
intpos = instrrev(mydate,"/")
response.write MID(mydate,1,intpos-1)
mydate = "11/23/2006"
mydate = split(mydate,"/")
adate = DateSerial(mydate(2),mydate(0),mydate(1))
response.write Month(adate)&"/"&Day(adate)
mydate = "11/23/2006"
' An array of all perceived possible delimiters
delims = Array("/","\","-",":",".")
for each thingiput in delims
if instr(mydate,thingiput)>0 then
strdelim=thingiput
exit for
end if
next
mydate = split(mydate,strdelim)
adate = DateSerial(mydate(2),mydate(0),mydate(1))
response.write Month(adate)&"/"&Day(adate)