Travail sur date en minutes et registre
Soyez le premier à donner votre avis sur cette source.
Snippet vu 4 856 fois - Téléchargée 48 fois
Contenu du snippet
sert a changer une valeur dword dans le registre qui et la difference de temps en minutes ecoule par rapport a une date de reference puis execute le programme voule
j'ai mis ca la car ca peut servir a d'autre
c'est mon premier programme alors soyer indulgents merci
Source / Exemple :
Private Sub Command1_Click()
Dim Maintenant As Date
Dim sngRslt As Single
Maintenant = Now
sngRslt = Minute(Maintenant) / 60
sngRslt = sngRslt + Hour(Maintenant)
temps = (-1440 * DateDiff("d", Date, "date de reference")) + sngRslt * 60
Dim tx As String
tx = temps
Set wshshell = CreateObject("WScript.Shell")
wshshell.RegWrite "chemin dans le registre", tx, "REG_DWORD"
Shell "chemin de l'application", vbNormalFocus
Close: End
End Sub
Conclusion :
j'ai mis ca la car ca peut servir a d'autre
c'est mon premier programme alors soyer indulgents merci
A voir également
- Travail sur date en minutes et registre
- 161 minutes en heures - Forum Visual Basic
- Secondes en minutes ✓ - Forum PHP
- 101 minutes en heure - Forum C / C++ / C++.NET
- 164 minutes en heures - Forum Delphi / Pascal
- Date en lettre ✓ - Forum Visual Basic 6
4 août 2002 à 09:17
Mais a fonction explique aussi comment utiliser les script pour écrire dans le registre ... pour un premier programme c'est deja pas mal ! :)
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.