تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كود تغيير تاريخ الجهاز
#1
اريد كود تغيير تاريخ الجهاز لوسمحتم
[صورة مرفقة: 000.gif]
الرد }}}}
تم الشكر بواسطة:
#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 
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 رَبِّ اغْفِرْ لِي وَلِوَالِدَيَّ
Heart
الرد }}}}
تم الشكر بواسطة:
#3
شكرا اخي
لكن الكود لم ينجح اخي الكريم
اريد الكود عند الظغط على الزر يقوم بظبط التاريخ احدده انا وشكرا
[صورة مرفقة: 000.gif]
الرد }}}}
تم الشكر بواسطة:
#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 
جرب ورد لي النتيجة
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 رَبِّ اغْفِرْ لِي وَلِوَالِدَيَّ
Heart
الرد }}}}
تم الشكر بواسطة:
#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


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

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


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] كيف استدعي ملف وورد بالفجوال بيسك وإضافة تاريخ وبيانات عليه عبقرينو 1 46 20-09-17, 06:08 PM
آخر رد: Rabeea Qbaha
  [VB.NET] فعل حدث قبل تاريخ محدد بيومين Acces سعود الشامان 4 144 11-08-17, 12:44 AM
آخر رد: سعود الشامان
  [مشروع] أستفسار في تغيير اللون الخلفيه طـلال 3 115 10-08-17, 04:01 AM
آخر رد: أبو نوره
  عرض أحدث تاريخ كرم ابوهشام 8 186 30-07-17, 10:38 PM
آخر رد: HASAN6.0
Exclamation إن الموفر 'Microsoft.ACE.OLEDB.12.0' غير مسجل على الجهاز المحلي. سعود الشامان 4 185 29-07-17, 01:23 AM
آخر رد: سعود الشامان
  اريد كود تغيير الحروف العربية الى الانجليزية والعكس Mina Botros 2 103 26-07-17, 12:00 AM
آخر رد: Mina Botros
  [سؤال] هل ممكن احد فئه حسب سنوات من تاريخ معين.. Marwan9990 5 173 10-07-17, 11:54 PM
آخر رد: Marwan9990
Thumbs Up [سؤال] طريقة تغيير شكل ال progress bar وطريقة التحميل Mina Botros 3 155 04-07-17, 11:29 AM
آخر رد: silverlight
  اظهار تاريخ بعد اسبوع من تاريخ اليوم تناسيم 3 179 12-06-17, 02:24 PM
آخر رد: Amir_alzubidy
  [VB.NET] عرض البيانات بشرط ( تاريخ اليوم) محمد بوقزاحة 2 194 09-06-17, 02:30 AM
آخر رد: محمد بوقزاحة

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


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