iCurrent to Double Digits

[msnews.microsoft.com]

Hey Guys,

I was wondering if any of you could help me out with converting a single
digit (ie: 1, 2, 3, etc) to double digits (ie: 01, 02, 03, etc).

I am trying to convert the date in DD/MM/YYYY format so it is always
displayed as 01/01/2004 instead of 1/1/2004.

The script I am trying to embed this into has similar attributes to the
Calendar on this site located at http://www.asp101.com/samples/calendar.asp
and the objects that require to be double digits are iCurrent and
Month(dDate).

Thanks Heaps!!!

[Evertjan.]

msnews.microsoft.com wrote on 24 aug 2004 in
microsoft.public.inetserver.asp.general:

I was wondering if any of you could help me out with converting a
single digit (ie: 1, 2, 3, etc) to double digits (ie: 01, 02, 03,
etc).

I am trying to convert the date in DD/MM/YYYY format so it is always
displayed as 01/01/2004 instead of 1/1/2004.

The script I am trying to embed this into has similar attributes to
the Calendar on this site located at
http://www.asp101.com/samples/calendar.asp and the objects that
require to be double digits are iCurrent and Month(dDate).

There are many ways to Rome, as the ancient said.
I presume you want vbscript.

<script type="text/vbscript">

Set Response = document '' IE as test environment

function two(x) '' expecting x<=0
two = "" & x
if x<10 then two = "0" & two
end function

function convert(x) '' x=(d)d/(m)m/yyyy [or (m)m/(d)d/yyyy]
a = split(x,"/")
a(0) = two(a(0))
a(1) = two(a(1))
convert = join(a,"/")
end function

Response.write convert("1/1/2004")

</script>
--
Evertjan.
The Netherlands.
(Please change the x'es to dots in my emailaddress)

[PJ Laurenson]

Ok, cool.
So how do I apply that and let it work in the function as follows:

If iCurrent = Day(dDate) Then
Response.Write vbTab & vbTab & "<td background=""mv_today.gif""><b>" &
iCurrent & "</b></td>" & vbCrLf
Else
Response.Write vbTab & vbTab & "<td><a href=""./calendar.asp?date=" &
iCurrent & "/" & Month(dDate) & "/" & Year(dDate) & """>" & iCurrent &
"</a></td>" & vbCrLf
End If

Thanks,

PJ

"Evertjan." <ex**************@interxnl.net> wrote in message
news:Xn********************@194.109.133.29...

msnews.microsoft.com wrote on 24 aug 2004 in
microsoft.public.inetserver.asp.general:

I was wondering if any of you could help me out with converting a
single digit (ie: 1, 2, 3, etc) to double digits (ie: 01, 02, 03,
etc).

I am trying to convert the date in DD/MM/YYYY format so it is always
displayed as 01/01/2004 instead of 1/1/2004.

The script I am trying to embed this into has similar attributes to
the Calendar on this site located at
http://www.asp101.com/samples/calendar.asp and the objects that
require to be double digits are iCurrent and Month(dDate).

There are many ways to Rome, as the ancient said.
I presume you want vbscript.

<script type="text/vbscript">

Set Response = document '' IE as test environment

function two(x) '' expecting x<=0
two = "" & x
if x<10 then two = "0" & two
end function

function convert(x) '' x=(d)d/(m)m/yyyy [or (m)m/(d)d/yyyy]
a = split(x,"/")
a(0) = two(a(0))
a(1) = two(a(1))
convert = join(a,"/")
end function

Response.write convert("1/1/2004")

</script>
--
Evertjan.
The Netherlands.
(Please change the x'es to dots in my emailaddress)

[Evertjan.]

PJ Laurenson wrote on 24 aug 2004 in
microsoft.public.inetserver.asp.general:

"Evertjan." <ex**************@interxnl.net> wrote in message [...]

<script type="text/vbscript">

Set Response = document '' IE as test environment

function two(x) '' expecting x<=0
two = "" & x
if x<10 then two = "0" & two
end function

function convert(x) '' x=(d)d/(m)m/yyyy [or (m)m/(d)d/yyyy]
a = split(x,"/")
a(0) = two(a(0))
a(1) = two(a(1))
convert = join(a,"/")
end function

Response.write convert("1/1/2004")

</script>

[please do not toppost on usenet]
Ok, cool.
So how do I apply that and let it work in the function as follows:

If iCurrent = Day(dDate) Then
Response.Write vbTab & vbTab & "<td background=""mv_today.gif""><b>" &
iCurrent & "</b></td>" & vbCrLf
Else
Response.Write vbTab & vbTab & "<td><a href=""./calendar.asp?date=" &
iCurrent & "/" & Month(dDate) & "/" & Year(dDate) & """>" & iCurrent &
"</a></td>" & vbCrLf
End If

you would need only the Two() function:

.... & two(iCurrent) & "/" & two(Month(dDate)) & ....

btw: PJ, if you had analyzed my code for yourself, you could have found
that out without asking. This is not a criticism, but an inducement to
analyze. And analyze you must, if you are using otherman's code.

====================

some hints:

But why changing the date format in this page as you could do it after
submission in calendar.asp?

Why the ./ which does not add a thing?

Why send the date down to and up from the client and not keep it in a
session variable serverside?

--
Evertjan.
The Netherlands.
(Please change the x'es to dots in my emailaddress)