Convertion VSD en HTML

Dernière réponse : 1 Avril 2010 13:22 dans Programmation

gto-69_55

1 Avril 2010 13:00:19

Bonjour à tous!!!

Je viens de créer un petit script permettant de convertir un fichier VSD en HTML. Pour le moment, il est capable de convertir chaque page du fichier VSD en HTML. Est-il possible de convertir l'ensemble du fichier VSD (qui contient plusieurs pages) dans un même fichier HTML?

Merci beaucoup.

Autres pages sur : convertion vsd html

| Etre averti des réponses
| Alerter

Répondre à gto-69_55

Lassé par la pub ? Créez un compte

zeb

Expert Programmation

1 Avril 2010 13:11:17

Bonjour,

Mais de quoi parles-tu ? En recoupant tout ça, je devine que tu as fais une macro en VBA/Visio pour pondre une page Web. C'est bien ça ?

Et bien si tu sais faire pour une page, mets le tout dans une boucle For et itère sur le nombre de pages :spamafote:

| Alerter

Répondre à zeb

gto-69_55

1 Avril 2010 13:15:29

J'ai effectué un export sur chaque page de mon document VISIO mais je ne vois pas comment effectué un export sur l'ensemble du fichier VISIO.

| Alerter

Répondre à gto-69_55

zeb

Expert Programmation

1 Avril 2010 13:16:28

Code ?

(Entre balise [code], conformément au règlement)

| Alerter

Répondre à zeb

gto-69_55

1 Avril 2010 13:19:26

Voici mon code:

Set AppVisio = WScript.CreateObject("visio.Application")

AppVisio.Visible = False

 
Set Wb = AppVisio.Documents.open (ifname)

Set Pgs = AppVisio.ActiveDocument.Pages

 
For iPgs = 1 To Pgs.Count

        Set PgObj = Pgs(iPgs)

        PgName = PgObj.Name

        filename = AppVisio.ActiveDocument.Path & PgName & ".html"

        PgObj.Export filename

Next