تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] ازاى احول قيمه numeric الى datetime
#1
السلام عليكم ورحمه الله وبركاته

عندى قاعده بيانات sql 2005 عليها بيانات وبصمات مستخدمين نازله من على اجهزه البصمه
الجول اسمه 
EVENT_LOG

فيها مجموعه من ال columns 
nUserID  :  ده فيه ارقام الموظفين 

nDateTime : ده فيه البصمات بتاعه الموظفين 

ولكن البصمات مش مكتوبه بصيغه تاريخ مكتوبه بصيغه ارقام مثلا : 540378875 , 540378875

السؤال هنا ازاى اقدر احول القيم دى واخليها على صيغه datetime 
واقدر اعرضها فى datagridview 

وشكرا على المساعده
الرد }}}
تم الشكر بواسطة:
#2
سلام

احتمال كبير يكون هو هذا الكود
كود :
' http://www.unixtimestamp.com/

'http://stackoverflow.com/questions/13108574/converting-datetime-to-number-of-seconds-in-vb-net

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    MsgBox(FromUnix(540378875, True))
End Sub


Public Function FromUnix(ByVal seconds As Integer, ByVal local As Boolean) As DateTime
    Dim dt = Epoch.AddSeconds(seconds)
    If local Then dt = dt.ToLocalTime
    Return dt
End Function
Public Function ToUnix(ByVal dt As DateTime) As Integer
    If dt.Kind = DateTimeKind.Local Then dt = dt.ToUniversalTime
    Return CInt((dt - Epoch).TotalSeconds)
End Function
Public ReadOnly Property Epoch() As DateTime
    Get
        Return New DateTime(1970, 1, 1, 0, 0, 0, DateTimeKind.Utc)
    End Get
End Property

موفقين
متغيب
الرد }}}
تم الشكر بواسطة:
#3
جزالك الله خيرا على المساعده

لكن اعذرنى انا مش عارف برده ازاى اطبق الكود ده على انا محتاجه

انا مبتدا لسه فى الفيجوال دوت نت
الرد }}}
تم الشكر بواسطة:
#4
هل من مساعده
الرد }}}
تم الشكر بواسطة:
#5
التحويل الي تاريخ ليس بمشكلة لكن و بشكل مبدئي عليك اولا ان تفهم Pattern او الصيغة أو النمط الذي تم استخدامه لإدخال البيانات فهذا سيحدد بشكل كبير الكيفية التي سوف تستخدمها لتحويل هذا النمط او هذه الصيغة الي تاريخ

علي سبيل المثال الصيغة الخاصة بك هي عبارة عن 9 ارقام و نعم هي تبدو لك ارقاما ولكن حين تتعامل معها لتحويلها الي تاريخ ستتعامل معها علي انها String و ليس أرقاما

غالبا ShortDateString الصيغة او النمط الخاص به عبارة عن 8 ارقام فقط علي سبيل المثال لو اعتبرنا الرقم الرقم 20151206 يمثل صيغة للتاريخ هنا ستجد أن الاربعة ارقام الأولي من اليسار تمثل السنة و الرقمان التاليان من اليسار ايضا يمثلان الشهر و الرقمان الأخيران يمثلان اليوم و بالتالي من المفترض ان الشكل النهائي لمثل هذا الرقم و عند تحويله الي تاريخ سيكون عبارة عن 06/12/2015

لذلك و لكي يتم حل مشكلتك بشكل دقيق عليك ان توضح لنا الصيفة او النمط الذي تم استخدامه
الرد }}}
تم الشكر بواسطة:
#6
try this
Dim d As Date = Date.FromOADate(41498)
either using date or dateTime

Rolleyes Smile Rolleyes
{‏‏ يَرْفَعِ اللَّهُ الَّذِينَ آمَنُوا مِنكُمْ وَالَّذِينَ أُوتُوا الْعِلْمَ دَرَجَاتٍ‏ }

 " Mohamed M. Bedair     -     " Abu Anas
Genius Live , Egypt
الرد }}}
تم الشكر بواسطة:
#7
الاستاذ silverlight

القيمه التى تم ادخال بها البيانات هى int
اذا كان هذا قصدك
الرد }}}
تم الشكر بواسطة:
#8
سلام

الارقام التي ذكرتها ومنها 540378875 هي عباره عن نوع اسمه unix time
وطريقتها انها تحسب عدد الثوان من تاريخ من بدايه يوم 1 يناير 1970

جرب تضع الرقم اللي ذكرتك حضرتك في هذا الموقع http://www.unixtimestamp.com
وبتلاقيه يحوله الى 02/15/1987 @ 9:14am على اعتبار التوقيت هو جرينتش UTC

جرب هذا الاستعلام كتجربه لترى النتيجه
- انا جربته ونجح في التحويل قبل عرض البيانات في الداتاجريد
كود :
SELECT [nUserID],
       DATEADD(S, [nDateTime], '1970-01-01') AS [nDateTime]
FROM   [EVENT_LOG]

واذا بدك تضيف فارق التوقيت عدل الرقم 3 لفارق التوقيت اللي بتريد
كود :
SELECT [nUserID],
       DATEADD(HOUR, 3, (DATEADD(S, [nDateTime], '1970-01-01'))) AS [nDateTime]
FROM   [EVENT_LOG]

http://stackoverflow.com/questions/29042...sql-server

موفقين
متغيب
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  من فضلكم المساعدة:mdf ازاى اتصل به على نفس الجهاز dr.programming 7 1,153 16-05-22, 01:07 PM
آخر رد: DR.YASER
  ازاى احفظ الكود masport tv 1 1,032 21-07-21, 12:48 AM
آخر رد: ميدو الفنان
  مشكله عدم ارجاع قيمه feras.mohy 4 1,359 28-03-21, 06:59 PM
آخر رد: feras.mohy
  من فضلكم استعلم هنا ازاى مرفق مثال محمد فوزى محمد 2 1,052 12-03-21, 08:29 AM
آخر رد: محمد فوزى محمد
  اخفاء صف في الداتا جريد بناء علي قيمه makky 1 1,332 22-10-20, 09:37 AM
آخر رد: mmali127
  [سؤال] محتاج احول كود من بايثون الي فيجوال اليوم السابع 4 1,349 29-09-20, 11:32 PM
آخر رد: اليوم السابع
  [VB.NET] مساعدة في تلوين صف معين في الداتا قريد فيو حسب قيمه نصية العطر الرايق 8 2,234 09-08-20, 01:13 AM
آخر رد: العطر الرايق
  مساعدة عاجلة و يرفع للسادة مشرفى و مديرى المنتدى : ازاى أشغل برنامجى على لاب توب xprogrammer 4 1,641 27-07-20, 11:14 AM
آخر رد: محمد كريّم
  [سؤال] منين او ازاى اجيب الكود الخاص بالصورة دى mostafa nada 1 1,100 13-07-20, 10:16 PM
آخر رد: DR.YASER
  [سؤال] ? Numeric Textbox منه 2 1,347 10-06-20, 12:39 AM
آخر رد: سعود

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم