Amelioration code

Question

Bonjour le forum 

J' ai ce code qui écrit dans un fichier log le bon déroulement de la sauvegarde. J' aurais voulu l' optimiser 
au niveau de la taille de la police
Type de police
épaisseur police
Pas d' intervalle entre les lognes 
Suppression caractere bizarre

Ci joint le code
CreateFileLog()

    Dim strDest As String
 
    Dim LogFile As String
    Dim FileNumber As Integer
    strDest = CurrentProject.path & "\Log\ReportZip.log"      
    FileNumber = FreeFile    ' Lit le numéro de fichier inutilisé
    LogFile = "strDBPath\Log\ReportZip.log"
    Open CurrentProject.path & "\Log\ReportZip.log" For Append As #FileNumber
    Print #FileNumber, "Fin du traitement de la  sauvegarde  le : " & Now()
    Print #FileNumber, vbLf
   ' Print #FileNumber, "-----------------------------"
    Close #FileNumber
End Sub

Merci d' avance pour toute aide 
barada

ucfoutu · Answer

Bonjour,

Il serait bon (ce n'est pas un luxe) que tu utilises les balises code, lorsque tu présentes ici un bout de code.
Un fichier texte (.txt) ne contient que tu texte sans mise en forme. A ne pas confondre avec ce que tu vois lorsque tu l'ouvres par le blocnotes.
Precise ce que tu entends par :
Pas d' intervalle entre les lognes
Suppression caractere bizarre 

D'où sortent ces caractères "bizarres", d'ailleurs ?
Et les retours à la ligne doivent s'exprimer par un vbcrlf et non un vblf
____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient

cgandco · Answer

Bonjour,

Pourquoi ne pas insérer des balises htlm dans ton code, nommer ton fichier ReportZip.log.htm et ouvrir ton fichier avec un navigateur.

Bonne journée



Faites simple, aussi simple que possible, mais pas simpliste.
                                              A. Einstein.

cs_barada · Answer

Bonsoir le forum 
merci de m' avoir répondu. 
1)Le caractere est une sorte de petit carré dans le fichier
2)J' ai un intervalle entre les lignes, un saut de ligne
3) je vais faire la corrcetion du retour à la ligne

Pour cgandco
Je ne peux pas insrer des balises htlm dans mon code car je ne connais pas le htlm. As tu un code à me transmettre ?

Je continue de creuser pour l' amélioration du code

barada

cgandco · Answer

Oui pas de problème, voila déja un petit exemple pour commencer This is a heading This is a heading This is a heading This paragraph is in Arial, size 5, and in red text color. et sur http://www.startyourdev.com/HTML/Introduction.html ou sur http://www.w3schools.com/html/ Bonne Journée Faites simple, aussi simple que possible, mais pas simpliste. A. Einstein.

ucfoutu · Answer

Ces "petits carrés", c'est toi-même, qui les ajoutes ! (ton vblf) !
L'instruction Print (c'est dit dans ton aide) ajoute vdéjà seule un retour à la ligne.
Open CurrentProject.path & "\Log\ReportZip.log" For Append As #FileNumber
  Print #FileNumber, "Fin du traitement de la sauvegarde le : " & Now()
Close #FileNumber 
____________________
Réponse exacte ? => "REPONSE ACCEPTEE" pour faciliter les recherches d'autres forumeurs.
Pas d'aide en ligne installée ? ==> ne comptez pas sur moi pour simplement vous dire ce qu'elle contient

Amelioration code

5 réponses

Votre réponse

Discussions similaires