تقييم الموضوع :
  • 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

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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  ازاى أطبق كود max على حقل تكست new_programer 4 422 04-02-25, 09:57 PM
آخر رد: aliday03
  طريقة عمل اداه Numeric up down الي ساعة والتحكم بها Mostafa201255411 1 283 28-08-24, 04:26 PM
آخر رد: Taha Okla
  من فضلكم المساعدة:mdf ازاى اتصل به على نفس الجهاز dr.programming 7 1,491 16-05-22, 01:07 PM
آخر رد: DR.YASER
  ازاى احفظ الكود masport tv 1 1,268 21-07-21, 12:48 AM
آخر رد: ميدو الفنان
  مشكله عدم ارجاع قيمه feras.mohy 4 1,610 28-03-21, 06:59 PM
آخر رد: feras.mohy
  من فضلكم استعلم هنا ازاى مرفق مثال محمد فوزى محمد 2 1,292 12-03-21, 08:29 AM
آخر رد: محمد فوزى محمد
  اخفاء صف في الداتا جريد بناء علي قيمه makky 1 1,584 22-10-20, 09:37 AM
آخر رد: mmali127
  [سؤال] محتاج احول كود من بايثون الي فيجوال اليوم السابع 4 1,611 29-09-20, 11:32 PM
آخر رد: اليوم السابع
  [VB.NET] مساعدة في تلوين صف معين في الداتا قريد فيو حسب قيمه نصية العطر الرايق 8 2,644 09-08-20, 01:13 AM
آخر رد: العطر الرايق
  مساعدة عاجلة و يرفع للسادة مشرفى و مديرى المنتدى : ازاى أشغل برنامجى على لاب توب xprogrammer 4 1,927 27-07-20, 11:14 AM
آخر رد: محمد كريّم

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


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