Mettre en forme un fichier à l'aide de VB6

Bonjour à tous.

Aujourd'hui gros problème... 

 J'ai une application en vb6 qui récolte des données dans une base access et qui les dispose dans un fichier openoffice.texte.

 De ce côté là, tout marche très bien.

Seulement voilà, je souhaiterais que mon vb me mette également le texte en forme dans mon fichier final (mettre certaine partie en gras, changer la police de caractère à d'autres....)

Ma connection est la suivante :

'Déclaration des variables de connection
  Dim con As New ADODB.Connection
  Set con = New ADODB.Connection

'Connection a la base de données
  con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\MaBase.mdb"
    
'Declaration de la variable de recorset
 Dim res As New ADODB.Recordset
 Set res = New ADODB.Recordset

'Ouverture de la connection à la base de données
con.Open

'Requete a effectuer sur la base : On demande tous les enregistrements contenus dans la table MaTable
  res.Open "select * from MaTable", con, adOpenDynamic, adLockOptimistic

'Ouverture du fichier OpenOffice
Open "C:\result.sxw" For Output As #1

N.B : la Table MaTable contient entre autres le champ MonChamp. J'ai simplifié ici afin de ne pas afficher dans tout le forum les quelques 30 champs de ma table...

'On écrit dans le fichier le contenu du champ MonChamp que l'on a obtenu parmi les résultats de la requête 'res'
Print #1, "Le contenu du champ est : " & res!MonChamps

'On referme le fichier
Close #1

'On referme la connection à la base
 con.Close

 Où et comment puis ajouter un code qui me permette de mettre par exemple en gras et souligné la partie 'Le contenu du champ est' ?

Merci à tous d'avance.

Que le VB soit avec vous !!!

Nico.

Salut,

je ne pourais pas t'aider mais par contre te filer cetaines pistes. D'abord tu ne pourra pas mettre des attributs dans un simple fichier texte, il faut au minimum que ton fichier soit au format Rtf. Pour ça tu peux utiliser le control RichTextBox. Il te permetta de sauvegarder ton texte au format Rtf. Tu pourra aussi par le biais de ce control insérer des séquences Rtf pour mettre des attributs. Mais c'est là que mes compétences s'arrètent, car je ne connais pas les séquences Rtf pour tel ou tel attribut. Je pense qu'en faisant une recherche sur Internet tu pourra les trouver, ou bien qu'une âme charitable lisant ce forum pourra t'aider.

Aie c'est pour OpenOffice j'avais pas vu. Je suis pas sûr que OpenOffice connaîsse le Rtf. Par contre je crois que le format natif de OpenOffice est le Xml, et là tu dois pouvoir plus facilement trouver les séquences Xml  (qui sont des séquences Ascii  bornées à la manière du Html).

Connais tu le code ASCII pour mettre en gras un texte ?

Merci.

Nico.



Que le VB soit avec vous...

Non désolé. Mais écoute fait ceci: si tu as openOffice créé un texte simple avec les attributs qui t'intérressent et ensuite sauvegarde le au format Xml. En réouvrant ce texte avec WordPad par exemple, tu pourras voir clairement quels sont les séquences.

J'ai fait comme tu m'as dit. Malheureusement lorsque j'ouvre mon fichier xml dans wordpad (ou dans blocs notes), il n'y a que des lignes de caractères sans cohérence. Même en faisant une recherche de texte dans le fichier ne parvient pas à retrouver mon texte initial. Pourtant j'avais pris un texte simple : 'bonjour' inscrit en gras...

As tu une autre idée ou une solution pour rendre les caractères lisibles ?

Merci.

Nico.

 

 

Que le VB soit avec vous...

Quelqu'un aurait il une autre idée, s'il vous plait ?

 

Merci.

 

C'est assez urgent..........

 

Que le VB soit avec vous...