تقييم الموضوع :
  • 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 
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات
الرد
تم الشكر بواسطة:
#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 
جرب ورد لي النتيجة
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات
الرد
تم الشكر بواسطة:
#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 ك ب / التحميلات : 75)
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات
الرد
تم الشكر بواسطة:
#9
(19-09-16, 10:47 PM)أبو عمر كتب : Confused
اين المشكل هنا


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] فولدرات الجهاز محمد اسماعيل 5 90 22-06-19, 12:59 AM
آخر رد: محمد اسماعيل
Information [سؤال] كيفية جعل المشروع يحفظ الملفات في مجلد بالحاسوب مهما تغيير مكان تنصيب المشروع الرائد 3 108 09-06-19, 05:21 AM
آخر رد: ابراهيم ايبو
  مشكله في تغيير مقاسات البرنامج عند نقله علي اللاب توب Emam emam 6 253 19-05-19, 12:10 AM
آخر رد: elgokr
  [سؤال] إجراء عمليات على تاريخ بتنسيق مختلف عن تنسيق الجهاز السندبااد 5 188 26-04-19, 12:41 PM
آخر رد: elgokr
  [VB.NET] سحب مجموعة صور بالاسكانر وحفظها في ملف PDF على الجهاز محمد المصري 7 968 15-04-19, 12:37 AM
آخر رد: khairallah
  سؤال حول عمل فولدر يومى تلقائى واسم الفولدر هو تاريخ انشائة Lathe1 3 204 22-03-19, 04:22 PM
آخر رد: asemshahen5
  مشكلة فى تثبيت الكريستال ريبورت يقف ويظهر رسالة خطاء ولا يقوم بالتثبيت على الجهاز hedra samir 1 147 22-03-19, 02:59 PM
آخر رد: 5000
  [سؤال] بخصوص تاريخ سداد اشتراك لسه مبتدئ 3 180 25-02-19, 11:12 AM
آخر رد: elgokr
  زيادة ونقص اداة التاريخ عند تغيير تاريخ اداة التاريخ الاخري atefkhalf2004 4 269 24-02-19, 04:50 PM
آخر رد: حريف برمجة
  تغيير الليست بكس بالداتاجريد فيو محمد خيري 5 243 15-02-19, 09:09 PM
آخر رد: princelovelorn

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


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