deemas
asked on
Gregorian Date to Hijri Date
Hi,
one of my table having a date/Time field (Gerigorian), How can i convert that in to Hijri (Arabic) Date in Form and Report Without changing the Tables' date format. My DataBase is in Access XP.
Thanks in advance
one of my table having a date/Time field (Gerigorian), How can i convert that in to Hijri (Arabic) Date in Form and Report Without changing the Tables' date format. My DataBase is in Access XP.
Thanks in advance
if your posting twice, r u gonna award twice the points?
*********** THIS IS A DUPLICATE QUESTION ***********
Experts please don't add a comment..................
Questionner,
Please post a zero points question at:
https://www.experts-exchange.com/Community_Support/
With the link (URL-address) of this Q asking for a refund and delete !
Thanks !
Nic;o)
Experts please don't add a comment..................
Questionner,
Please post a zero points question at:
https://www.experts-exchange.com/Community_Support/
With the link (URL-address) of this Q asking for a refund and delete !
Thanks !
Nic;o)
note, this question is not being deleted
but the other question is
a recap of last post of other question (which is about to be closed)
what is the hijran date for today?
To only way is to convert it, the only way I can think of is with a function
in Forms, before you populate the field (or have another readonly field) which converts it
with regards to report, you probably need to do something similar
what did you use the validate the date conversion?
but the other question is
a recap of last post of other question (which is about to be closed)
what is the hijran date for today?
To only way is to convert it, the only way I can think of is with a function
in Forms, before you populate the field (or have another readonly field) which converts it
with regards to report, you probably need to do something similar
what did you use the validate the date conversion?
ASKER
today is 09/02/1425.
I canot understand your final question. Please
I canot understand your final question. Please
how are you displaying the hijri date?
in a form, you have a date, before you set that value in the textbox, you can convert it
or have a read only textbox (or caption) field which holds the equivalent hijri date - this way you see both gregorian and hijri
this code here
Dim sDate
Call VariantChangeTypeEx(sDate, Now(), 1025, &H8, vbString)
MsgBox "From " & Now() & " I got " & sDate
I got from 30/03/2004 to 09/02/1425
if you put this code in a function
e.g.
public function ConvertToHijri(byval sDate as date) as string
Dim sDate
Call VariantChangeTypeEx(sDate, sDate, 1025, &H8, vbString)
ConvertToHijri = sDate
end function
then in the form, call
txtDate.value = ConvertToHijri(field.Grego rianDate)
in a form, you have a date, before you set that value in the textbox, you can convert it
or have a read only textbox (or caption) field which holds the equivalent hijri date - this way you see both gregorian and hijri
this code here
Dim sDate
Call VariantChangeTypeEx(sDate,
MsgBox "From " & Now() & " I got " & sDate
I got from 30/03/2004 to 09/02/1425
if you put this code in a function
e.g.
public function ConvertToHijri(byval sDate as date) as string
Dim sDate
Call VariantChangeTypeEx(sDate,
ConvertToHijri = sDate
end function
then in the form, call
txtDate.value = ConvertToHijri(field.Grego
ASKER
Please give me some time
I am in middle of preparing important Management Report.
I will check, and come back to you.
I am in middle of preparing important Management Report.
I will check, and come back to you.
ASKER
i am getting a compile error "Duplication declaration in current scope",
By the way sdate is the date gregorian date you are refering?
By the way sdate is the date gregorian date you are refering?
ASKER
i am getting a compile error "Duplication declaration in current scope",
By the way sdate is the date gregorian date you are refering?
Public Function ConvertToHijri(ByVal sDate As Date) As String
Dim sDate
Call VariantChangeTypeEx(sDate, sDate, 1025, &H8, vbString)
ConvertToHijri = sDate
End Function
By the way sdate is the date gregorian date you are refering?
Public Function ConvertToHijri(ByVal sDate As Date) As String
Dim sDate
Call VariantChangeTypeEx(sDate,
ConvertToHijri = sDate
End Function
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
Thanks a lot ,
you deserve for full Points,
Can you please explian me syntex of this fuction, and also is it possible to change the Hijri to Gregorian.
you deserve for full Points,
Can you please explian me syntex of this fuction, and also is it possible to change the Hijri to Gregorian.
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/automat/htm/chap7_8h14.asp
Unfortunately I do not know all the parameters for the different flags
I think the gregorian is &H40
so if you pass in a hijri date, and put &H40 instead of &H8, see what you get
(maybe create another function, same type of thing except called ConvertToGregorian)
Unfortunately I do not know all the parameters for the different flags
I think the gregorian is &H40
so if you pass in a hijri date, and put &H40 instead of &H8, see what you get
(maybe create another function, same type of thing except called ConvertToGregorian)