تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كود تغيير تاريخ الجهاز
#1
اريد كود تغيير تاريخ الجهاز لوسمحتم
الرد }}}
تم الشكر بواسطة: اسامه الهرماوي
#2
http://stackoverflow.com/questions/28590...-date-time
PHP كود :
Private Sub ChangeDate()
   
Dim d As DateTime
   d 
"22:30:00"

   
Try
      
Microsoft.VisualBasic.TimeOfDay 'Your time...
      Microsoft.VisualBasic.DateString = New Date(1978, 4, 28) '
The date...
   Catch 
ex As Exception
      
'You might have to run as Administrator...?
   End Try

End Sub 
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات
الرد }}}
تم الشكر بواسطة:
#3
شكرا اخي
لكن الكود لم ينجح اخي الكريم
اريد الكود عند الظغط على الزر يقوم بظبط التاريخ احدده انا وشكرا
الرد }}}
تم الشكر بواسطة:
#4
العفو ما سوينا شي

لكن الكود يقوم بهذه المهمة بضغطة زر فعلاً

آه ممكن تحتاج تعمل
Clear solution
وبعدين نفذ الكود بهذا الشكل
PHP كود :
Public Class Form1
    
Private Sub ChangeDate()
        
Dim d As DateTime
        d 
"15:27:00"
        
Microsoft.VisualBasic.TimeOfDay d
        Microsoft
.VisualBasic.DateString = New Date("2016""09""18")
    
End Sub
    
Private Sub Button1_Click(sender As System.ObjectAs System.EventArgsHandles Button1.Click
        Call ChangeDate
()
    
End Sub
End 
Class 
جرب ورد لي النتيجة
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات
الرد }}}
تم الشكر بواسطة:
#5
الفكرة في الكود التالي ............ أتمني إنها تنجح معك خاصة انني لم اجرب الكود لاني ليس لدي فيجوال استوديو حاليا

PHP كود :
   Private Sub ChangeSystemDate(dateTimeString As String)
 
       Dim dt As DateTime DateTime.ParseExact(dateTimeString"ddMMyyyy"System.Globalization.CultureInfo.InvariantCulture)
 
       Using currentProcess As New Process
            Dim pi 
As ProcessStartInfo = New ProcessStartInfo
            pi
.Arguments "/c date " dt
            pi
.FileName "cmd"
 
           pi.RedirectStandardOutput True
            pi
.UseShellExecute False
            pi
.CreateNoWindow True
            currentProcess
.StartInfo pi
            Try
                currentProcess
.Start()
 
           Catch ex As Exception
                MessageBox
.Show("Can not change system date")
 
           End Try
 
       End Using

    End Sub 

ملحوظة: : يجب مراعاة نوع Culture الموجودة في جهاز الكمبيوتر

الاستخدام

PHP كود :
Dim year As Integer 2015
        Dim month 
As Integer 10
        Dim day 
As Integer 12
        Dim dateTimeString 
As String CStr(day) & CStr(month) & CStr(year)
 
       ChangeSystemDate(dateTimeString
الرد }}}
تم الشكر بواسطة:
#6
اشكرك اخي
لم ينجح

(18-09-16, 04:09 PM)أبو عمر كتب : العفو ما سوينا شي

لكن الكود يقوم بهذه المهمة  بضغطة زر فعلاً

آه ممكن تحتاج تعمل
Clear solution
وبعدين نفذ الكود بهذا الشكل
PHP كود :
Public Class Form1
    Private Sub ChangeDate
()
 
       Dim d As DateTime
        d 
"15:27:00"
 
       Microsoft.VisualBasic.TimeOfDay d
        Microsoft
.VisualBasic.DateString = New Date("2016""09""18")
 
   End Sub
    Private Sub Button1_Click
(sender As System.ObjectAs System.EventArgsHandles Button1.Click
        Call ChangeDate
()
 
   End Sub
End 
Class 
جرب ورد لي النتيجة

يوجد خطا هنا
  Microsoft.VisualBasic.TimeOfDay = d


الملفات المرفقة صورة/صور
   
الرد }}}
تم الشكر بواسطة:
#7
اين انتم احبتي
الرد }}}
تم الشكر بواسطة:
#8
Confused

.zip   change_date.zip (الحجم : 66.75 ك ب / التحميلات : 158)
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات
الرد }}}
تم الشكر بواسطة:
#9
(19-09-16, 10:47 PM)أبو عمر كتب : Confused
اين المشكل هنا


الملفات المرفقة صورة/صور
   
الرد }}}
تم الشكر بواسطة:
#10
المشكل الامان عندك
قفل المشروع وشغل الفيجول كمسؤول Run as administrator
وبعدين شغل المشروع
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تغيير على كود الحفظ محمد خيري 6 147 منذ 45 دقيقة مضت
آخر رد: محمد خيري
  [VB.NET] معرفة بيانات الجهاز محمد بوقزاحة 1 309 21-02-24, 11:44 PM
آخر رد: AHMED213
  تغيير اسم حقل او تغيير نوع البيان atefkhalf2004 5 292 31-01-24, 04:09 PM
آخر رد: atefkhalf2004
  [VB.NET] معرفة بيانات الجهاز محمد بوقزاحة 7 676 12-01-24, 07:31 PM
آخر رد: Kamil
  غير مسجل على الجهاز المحلي 'Microsoft.ace.oledb.12.0' ان الموفر Adel27213 2 380 30-11-23, 09:19 PM
آخر رد: Adel27213
  [سؤال] اريد تغيير اسم حقل ضمن جدول بقاعدة بيانات اكسس mh66 1 358 08-11-23, 08:16 AM
آخر رد: justforit
  كيف اجعل البرنامج في بداية الشهر ينفذ حدث معين بالاصح اريد البرنامج في تاريخ واحد من Adel27213 3 484 05-11-23, 01:45 AM
آخر رد: justforit
  كيفية جمع قيمة على تاريخ معين واستنتاج تاريخ أخر Ahmed.vb 1 317 02-11-23, 03:52 AM
آخر رد: Taha Okla
  كود تغيير قيمة تكست بوكس فى تاريخ معين Ahmed.vb 2 906 11-10-23, 10:35 PM
آخر رد: aljzazy
  عندما اقوم بالاستعلام عن تاريخ معين بواسطة SELECT لايقوم بتحديد نفس تاريخ اليوم moh61 1 403 13-08-23, 01:06 PM
آخر رد: تركي الحلواني

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


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