Quote:
Originally posted by jrahma
any one knows how can convert from Gregorian date to the islamic Hijri date using ASP 3.0?
Many Thanks,
Jassim Rahma
|
dear jassim,
u can use this
vb code or send me email to give u my dll file
mileto:awafaei@softnetcorp.com
Function ConvertDateString(ByRef StringIn As String, ByRef OldCalendar As Integer, ByVal NewCalendar As Integer, ByRef NewFormat As String) As String
Dim SavedCal As Integer
Dim d As Date
Dim s As String
SavedCal = Calendar
Calendar = OldCalendar
If IsDate(StringIn) Then
d = CDate(StringIn)
Calendar = NewCalendar
s = CStr(d)
ConvertDateString = Format(s, NewFormat)
ConvertDateString = s
Else
ConvertDateString = ""
End If
Calendar = SavedCal
End Function