[Visual Basic] Horloge Windows

Marsh Posté le 02-09-2001 à 13:14:55

Je cherche la commande ki permet de modifier la date et l'heure de l'horloge windows sous visual basic, merci d'avance!

Marsh Posté le 02-09-2001 à 13:14:55

Marsh Posté le 02-09-2001 à 14:01:39

Attend un peu je te cherche les API !

Marsh Posté le 02-09-2001 à 14:09:03

Tu va sur ce sîte:
www.vbfrance.com/visitelien.asp?Val=59&ValB=L

voici les API qui te faut : Kernel32.dll

Retourne les heures:

GetSystemtime (heure système du PC)
GetLocalTime (heure locale)

permet de changer les heures:

SetLocaltime
SetSystemTime

Tu as aussi www.vbfrance.com
Allez salut et bonne chance

:hello:

Marsh Posté le 02-09-2001 à 17:08:20

Merci,j'ai essayé le lien et j'ai fait un copié collé de l'api mais ca ne marche pô, y a pas un moyen + simple et + direct de changer la date du systeme (parceke c'est surtout ca ke je veux changer et non l'heure.

Marsh Posté le 02-09-2001 à 17:26:25

Colle ce code dans une form

Code :

Private Type SYSTEMTIME
wYear As Integer
wMonth As Integer
wDayOfWeek As Integer
wDay As Integer
wHour As Integer
wMinute As Integer
wSecond As Integer
wMilliseconds As Integer
End Type
Private Declare Function SetSystemTime Lib "kernel32" (lpSystemTime As SYSTEMTIME) As Long
Private Sub Form_Load()
Dim lpSystemTime As SYSTEMTIME
lpSystemTime.wYear = 2000
lpSystemTime.wMonth = 1
lpSystemTime.wDayOfWeek = -1
lpSystemTime.wDay = 24
' Ici tu insère l'heure actuelle ou essayes sans initialiser ces variables...
lpSystemTime.wHour = 23
lpSystemTime.wMinute = 26
lpSystemTime.wSecond = 0
lpSystemTime.wMilliseconds = 0
'set the new time
SetSystemTime lpSystemTime
End Sub

[edtdd]--Message édité par Bendes--[/edtdd]

---------------
Plus un ordinateur possède de RAM, plus vite il peut générer un message d'erreur.

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *