[TSX47] Impression programme sous TSX47

Forum traitant des automates industriels de marque Schneider - Telemecanique
Répondre
kedeb
Code sa première boucle
Code sa première boucle
Messages : 11
Enregistré le : 25 juin 2022, 12:43

[TSX47] Impression programme sous TSX47

Message par kedeb »

Bonjour,

Je souhaite imprimer mon programme que j'ai réussi à extraire de l'émulateur ( via disquette ). mon problème vient du fichier que je récupère, c'est un fichier .DOC et quand je l'ouvre je vois des caractères spéciaux et non pas les lignes ou les contacts du programme.
mais si je passe par une très vieille version de Word ( sur une vieille console :lol: ) j'arrive à l'ouvrir en codage MS DOS et je l'ai nickel, mais ça me fait faire énormément de manipulation j'aimerais savoir si il y a une manière plus récente et rapide dans la conversion de ce fichier ou l'impression même :)

cordialement,
MiGaNuTs
Mi homme - Mi automate
Mi homme - Mi automate
Messages : 1572
Enregistré le : 12 nov. 2015, 21:02
Localisation : 45 - Loiret
Contact :

Re: [TSX47] Impression programme sous TSX47

Message par MiGaNuTs »

Notepad++

Ensuite le bon jeu de caractères est quelquepart par la.
2022-07-15 21_25_15-Greenshot.png
kedeb
Code sa première boucle
Code sa première boucle
Messages : 11
Enregistré le : 25 juin 2022, 12:43

Re: [TSX47] Impression programme sous TSX47

Message par kedeb »

j'ai bien installé notepad++ et j'ai trouvé le bon encodage c'est OEM 863 : français.

as tu une astuce pour pouvoir bien le mettre en page pour l'impression car si je l'imprime dans cette état, tout s'imprime à la suite sans respecter mes numéro de page et je me retrouve avec des morceaux de programme sur deux page différentes pour le même label.
Avatar du membre
itasoft
Mi homme - Mi automate
Mi homme - Mi automate
Messages : 7803
Enregistré le : 20 oct. 2015, 10:15
Localisation : Lyon
Contact :

Re: [TSX47] Impression programme sous TSX47

Message par itasoft »

Slts,
Le renommer *.TXT l’ouvrir avec WordPad type document texte MS-DOS (.txt)
Ça doit reconduire la mise en page
Automaticien privé (de tout)
itasoft@free.fr
kedeb
Code sa première boucle
Code sa première boucle
Messages : 11
Enregistré le : 25 juin 2022, 12:43

Re: [TSX47] Impression programme sous TSX47

Message par kedeb »

bonsoir,

alors j'ai bien réussi à le convertir avec notepad++ et l'ouvrir avec wordpad mais je dois faire la mise en page de la toutes les pages du programmes, en sachant que pour celui que je veux imprimer j'ai 250 pages, ça reste long et fastidieux.
sur une ancienne console de l'atelier, si on ouvre le .doc avec un microsoft word ( je ne sais pas quel année ) il convertie et rien qu'en réglant sur la première page ça se reproduit sur toutes les autres sans aucun problème.

cordialement,
Avatar du membre
itasoft
Mi homme - Mi automate
Mi homme - Mi automate
Messages : 7803
Enregistré le : 20 oct. 2015, 10:15
Localisation : Lyon
Contact :

Re: [TSX47] Impression programme sous TSX47

Message par itasoft »

slts, il ne faut pas le passer par notepad++ mais:
renommer le fichier d'origine .DOC en .TXT l’ouvrir avec WordPad type document texte MS-DOS (.txt)
Ça doit reconduire la mise en page
Automaticien privé (de tout)
itasoft@free.fr
kedeb
Code sa première boucle
Code sa première boucle
Messages : 11
Enregistré le : 25 juin 2022, 12:43

Re: [TSX47] Impression programme sous TSX47

Message par kedeb »

slts,

quand je passe que par Wordpad pour la conversion en txt type MS-DOS, j'ai toujours mes caractères spéciaux il ne les convertie pas.

je garde au final le même document juste les caractères spéciaux qui change.

cordialement,
Avatar du membre
itasoft
Mi homme - Mi automate
Mi homme - Mi automate
Messages : 7803
Enregistré le : 20 oct. 2015, 10:15
Localisation : Lyon
Contact :

Re: [TSX47] Impression programme sous TSX47

Message par itasoft »

slts,
c'est pas possible, m'envoyer par mail le fichier .DOC d'origine pour faire un test.
itasoft@free.fr
Automaticien privé (de tout)
itasoft@free.fr
Avatar du membre
JC87
Mi homme - Mi automate
Mi homme - Mi automate
Messages : 2230
Enregistré le : 20 oct. 2015, 13:00
Localisation : Nouvelle Aquitaine

Re: [TSX47] Impression programme sous TSX47

Message par JC87 »

Bonjour,

Avec un MS Word récent je n'ai plus de problème mais à une époque ou je bossais dans une boutique qui n'avait pas les licences Microsoft j'utilisais Libre office avec la police MS line Draw en taille 9 et les listings sortaient impeccables. Cette police peut s'installer à part si elle n'est pas présente sur le PC.

JC
"On veut faire du zéro défaut mais on a zéro bonhomme et zéro budget, et bien à la fin on a zéro résultat..."
Avatar du membre
itasoft
Mi homme - Mi automate
Mi homme - Mi automate
Messages : 7803
Enregistré le : 20 oct. 2015, 10:15
Localisation : Lyon
Contact :

Re: [TSX47] Impression programme sous TSX47

Message par itasoft »

Slts,
Le pb est que dans tous les cas, ya pas la pagination pour l'impression sur papier, reste que la solution de l’ouvrir sous Word puis avec une macro qui va mettre les saut de pages au bon endroit et enregistrer sous type Document Word
Procedure :
-Avec Word Ouvrir le fichier d’origine généré sous XTEL bocaux.doc
-Utiliser le codage Arabe (DOS)
-Faire Fichiers/Mise en page Haut=1,5 CM Bas=1,5 CM
-Créer et Exécuter la macro ci dessous
Sub Macro1()
Dim pa As Paragraph
For Each pa In ActiveDocument.Paragraphs
If InStr(pa.Range.Text, "Telemecanique") > 0 Then pa.Range.InsertBreak Type:=wdPageBreak
Next pa
End Sub

-Visualiser le résultat avec l'aperçu
-Enregistrer sous bocaux_word.doc Type de fichier Document Word (*.doc)
Automaticien privé (de tout)
itasoft@free.fr
Répondre