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


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


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [VB.NET] مشكلة في كود تغيير لغة البرنامج ay.alhaj 13 243 09-10-18, 08:52 PM
آخر رد: ay.alhaj
  [سؤال] عدم تغيير قيمة NumericUpdown Simo1991 7 103 09-10-18, 12:21 PM
آخر رد: Simo1991
Smile [VB.NET] تغيير شكل الفورم Mahmoud Nasser 7 459 30-09-18, 02:36 PM
آخر رد: mustafa husaieen
  [VB.NET] استفسار :- بخصوص تغيير اسم ال Button بعد الضغط dubai.eig 10 265 17-09-18, 10:53 AM
آخر رد: dubai.eig
  [سؤال] تغيير السكاين من الكومبوبكس العيدروس 14 383 14-09-18, 11:46 PM
آخر رد: العيدروس
Exclamation [سؤال] تغيير الماك ادرس DK-x 4 142 13-09-18, 03:22 PM
آخر رد: DK-x
  تغيير أسم ملف DOX.1 2 128 11-09-18, 01:49 AM
آخر رد: elgokr
  كود تغيير التاريخ vb آسير بلآ قيود 1 136 08-09-18, 08:07 AM
آخر رد: elgokr
Sad [VB.NET] يا جماعة اريد كود تنبيه تاريخ انتهاء صلاحية لمادة قبل 30 يوم khalilfox 24 1,213 13-08-18, 05:44 AM
آخر رد: elgokr
  [VB.NET] استفسار :- بخصوص قراءة الصوت من الجهاز dubai.eig 0 126 11-08-18, 06:17 PM
آخر رد: dubai.eig

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


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