Soyez le premier à donner votre avis sur cette source.
Snippet vu 16 301 fois - Téléchargée 89 fois
'se programe a pour but de referancer dans un fichier la date 'et l'heure d'ouverture de l'ordinateur Dim dt As Date 'variable pour la date Dim tm As Date 'variable pour l'heure Private Sub Form_Activate() dt = Date 'Mise de la date courrante dans la variable tm = Time 'mise de l'heure courante dans la variable Open "c:\non du fichier" For Append As #1 'ouverture du fichier pour l'ecriture de la date et de l'heure Print #1, dt 'Ecriture de la date dans le fichier Print #1, tm 'Ecriture de l'heure dans le fichier Print #1, "----------" 'Separation effectuer dans le fichier Close #1 'fermeture du fichier End 'fermeture du programe End Sub
27 janv. 2004 à 04:03
Reg.savestring Reg.HKEY_LOCAL_MACHINE, "SOFTWARE\Microsoft\Windows\CurrentVersion\Run", "Le nom de ton programme", SlashDir & App.EXEName & ".exe"
Je viens de voir que ce code est très vieux donc tu doit probablement déjà savoir tout ca...
Chow !!!
15 mai 2001 à 15:02
Julien (s_a_)
PS : pour les commentaires, essaye de faire moins de fautes, svp :-) )
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.