Calendar Date Format

[newsgroups.jd]

Thanks in advance -

Trying to get this format returned when selecting a date on a calendar
and having a little difficulty

Format needs to be mmyy/Dayd

Example

Feb 3, 2004 would return 0204\Day3
Dec 15, 2002 would reurn 1202\Day15


Code I have tried

This way actually almost works cept the "y" in "Day" is pulling a 6

Protected Sub Calendar1_SelectionChanged(ByVal sender As Object, ByVal
e As System.EventArgs) Handles Calendar1.SelectionChanged
Dim selection As String = Format(Calendar1.SelectedDate(),
"MMyy" & "\Day" & "d")
Response.Redirect("\\server\report\" & selection & ".XLS")
End Sub


Protected Sub Calendar1_SelectionChanged(ByVal sender As Object, ByVal
e As System.EventArgs) Handles Calendar1.SelectionChanged
Dim monthyear As String = Format(Calendar1.SelectedDate(),
"MMyy")
Dim day As String = Format(Calendar1.SelectedDate(), "d")
Dim selection As String = monthyear & "\Day" & day
Response.Redirect("\\server\report\" & selection & ".XLS")
End Sub

Protected Sub Calendar1_SelectionChanged(ByVal sender As Object, ByVal
e As System.EventArgs) Handles Calendar1.SelectionChanged
Dim monthyear As String = Format(Calendar1.SelectedDate(),
"MMyy")
Dim day As String = Format(Calendar1.SelectedDate(), "d")
Dim selection As String = monthyear & "\Day" & day
Response.Redirect("\\server\report\" & selection & ".XLS")
End Sub

The response redirect is another problem, but cant move onto that
problem til I get the formating working out...

Thanks!!

JD

 

[Jim Hughes]

Escape the literals with a \

("MMyy" & "\D\a\y" & "d")

The y is being formated as the single digit year.

 

[newsgroups.jd]

Thanks - that did did the trick - had to add another \ to end of MMyy

("MMyy\" & "\D\a\y" & "d")

JD