مشكل در نمايش تاريخ

[karim orooji]

با سلام به دوستان گلم
اين كدي است كه من در سايتم استفاده ميكنم


Public Function setdaytext(ByVal day As String) As String
Select Case day
Case "Saturday"
Return "شنبه"
Case "Sunday"
Return "یک شنبه"
Case "Monday"
Return "دوشنبه"
Case "Tuesday"
Return "سه شنبه"
Case "Wednesday"
Return "چهار شنبه"
Case "Thursday"
Return "پنج شنبه"
Case "Friday"
Return "جمعه"
End Select
Return ""
End Function
Public Function setmonthtext(ByVal month As String) As String
Select Case month
Case "1"
Return "فروردین"
Case "2"
Return "اردیبهشت"
Case "3"
Return "خرداد"
Case "4"
Return "تیر"
Case "5"
Return "مرداد"
Case "6"
Return "شهریور"
Case "7"
Return "مهر"
Case "8"
Return "آبان"
Case "9"
Return "آذر"
Case "10"
Return "دی"
Case "11"
Return "بهمن"
Case "12"
Return "اسفند"
End Select
Return ""
End Function
Label8.Text = " امروز : " + dayy + " " + day & " " & month & " " & sal & " ساعت" & pc.GetHour(Date.Now).ToString() & ":" & pc.GetMinute(Date.Now).ToString()

ولي مشكل داره مثلا الان ساعت 24:10 هستش اينطوري براي من نمايش ميده
امروز : شنبه 13 فروردین 1390 ساعت14:37 :اشتباه:

اينم ادرس ساييه ميتونيد خودتون نگاش كنيد (http://barnameh.somee.com)

[karim orooji]

انگار با ساعت سيستم خودم
درست 2 ساعت اختلاف داره

يعني ميشه اين اختلاف ساعت از سرور(هاست) باشه