Ecrire la date et l'heure dans un fichier

Contenu du snippet

IL permet d'ecrire dans un fichier texte la date et l'heure a la quelle on démare windows

Source / Exemple :


'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

A voir également

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.

Du même auteur (cs_BIG.F)