Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

[VB 8][.NET 2]UN EDITEUR HTML : APERCU DANS UN IE ET UN MOZILLA EMBEDED + IE, FF ET OPÉRA EXTERNE, ...


Information sur la source

Description

Cliquez pour voir la capture en taille normale
Voici un petit programme sans prétention qui mets surtout en valeur un controle ActiveX : MozCtl et MozCtlx.dll, présent dans Mozilla 1.x, qui est en réalité une "copie" partielle du controle IEFRAME (ActiveX utilisé dans le WebBrowser), mais avec un randu Mozila !

Comme pour IE Tab, mon application permet, en mode appercu, de switcher rapidement entre IE et Mozilla (pas FireFox, le vrai mozilla).

J'ai introduit ici le début de la mise en forme avec MSHTML (Bold, Italic, Underline et InsertImage), mais il est clair que ca manque cruellement de diversité ;)

Mais comme c'est l'application externe qui implemente ces fonctions, mon controle permet amplement l'ajout de fonctions (par défaut il gère juste DesingMode sans bold ni rien, TextMode et Preview)

Le Design du controle est éprouvé, mais on peut sans doute faire mieux...

Vous pouvez obtenir aussi :
- Source
- Source générée
- Propriétés du document (Par défaut dans IE + Fait maison pour Mozilla)
- ...
 

Source

  • Public Class MainForm
  • Private Sub ToolStripButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton1.Click
  • Me.HtmlEditor1.HtmlText = "<html><head><title></title></head><body></body></html>"
  • End Sub
  • Private Sub ToolStripButton2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton2.Click
  • Dim OFD As New OpenFileDialog()
  • OFD.Title = "Choisissez le fichier à ouvrir"
  • OFD.CheckFileExists = True
  • OFD.CheckPathExists = True
  • If OFD.ShowDialog() <> Windows.Forms.DialogResult.Cancel Then
  • Me.HtmlEditor1.HtmlText = My.Computer.FileSystem.ReadAllText(OFD.FileName)
  • End If
  • End Sub
  • Private Sub ToolStripButton3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton3.Click
  • Me.HtmlEditor1.DomDocument.execCommand("Bold")
  • End Sub
  • Private Sub ToolStripButton4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton4.Click
  • Me.HtmlEditor1.DomDocument.execCommand("Italic")
  • End Sub
  • Private Sub ToolStripButton5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton5.Click
  • Me.HtmlEditor1.DomDocument.execCommand("Underline")
  • End Sub
  • Private Sub ToolStripButton6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton6.Click
  • Me.HtmlEditor1.DomDocument.execCommand("InsertImage", True)
  • End Sub
  • End Class
Public Class MainForm

    Private Sub ToolStripButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton1.Click
        Me.HtmlEditor1.HtmlText = "<html><head><title></title></head><body></body></html>"
    End Sub

    Private Sub ToolStripButton2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton2.Click
        Dim OFD As New OpenFileDialog()
        OFD.Title = "Choisissez le fichier à ouvrir"
        OFD.CheckFileExists = True
        OFD.CheckPathExists = True
        If OFD.ShowDialog() <> Windows.Forms.DialogResult.Cancel Then
            Me.HtmlEditor1.HtmlText = My.Computer.FileSystem.ReadAllText(OFD.FileName)
        End If
    End Sub

    Private Sub ToolStripButton3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton3.Click
        Me.HtmlEditor1.DomDocument.execCommand("Bold")
    End Sub

    Private Sub ToolStripButton4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton4.Click
        Me.HtmlEditor1.DomDocument.execCommand("Italic")
    End Sub

    Private Sub ToolStripButton5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton5.Click
        Me.HtmlEditor1.DomDocument.execCommand("Underline")
    End Sub

    Private Sub ToolStripButton6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripButton6.Click
        Me.HtmlEditor1.DomDocument.execCommand("InsertImage", True)
    End Sub

End Class

Conclusion

Vous aurez sans doute besoin d'installer le composant ActiveX MozCtl avant de pouvoir utiliser le programme.
L'installateur se trouve à l'adresse suivante : http://www.iol.ie/~locka/mozilla/MozillaControl177.exe

Fremy
 

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip

Commentaires et avis

signaler à un administrateur
Commentaire de FREMYCOMPANY le 03/02/2007 17:19:38

J'ai modifié et amélioré le programme pour lui donner un look plus "Visual Web Editor", mais je ne crois pas que je le posterai ici, car j'estime, après essais, que IE modifie un peu trop le code tapé manuellement à mon gout, et donc c'est un peu dommage... Par contre si ca intéresse qqun, je veux bien le poster tout de même.

Il comprend :
- DOM Viewer / Editor
- HTML Element PropertyGrid
- Select By xxx (DOM EDITOR)
- Menu Insert, Début de gestion des templates, ...

signaler à un administrateur
Commentaire de Paul07 le 01/03/2007 21:17:29

Salut Fremy, ton prog m'interesse enormement car justement je me suis lançé dans un éditeur html en wysiwyg mais ça coince.

J'accepterais volontier ton prog avec la mise à jour.

Cordialement,
Paul.

signaler à un administrateur
Commentaire de titinoirblanc le 03/04/2008 17:57:56

Je viens de trouver celui de PITAP. (http://pitap.com/shop/product_info.php?cPath=4&products_id=38)
C'est un controle gratuit pour .net

Mais savez vous comment je peu ajouter l'apercu avec mozila comme le tiens ?

signaler à un administrateur
Commentaire de FREMYCOMPANY le 04/04/2008 14:05:22

Renseigne toi là dessus : http://www.iol.ie/~locka/mozilla/control.htm

signaler à un administrateur
Commentaire de snak27 le 22/04/2008 17:05:14

Salut,

C'est très simple comme code et pas franchement innovant
mais c'est pas mal aussi non ^^

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

Enregistrer la source d'une page IE [ par Fred ] je voudrai enregistrer le code source d'une page qui s'affiche avec IE dans un point texte sur ma machine.Comment faire ????J'en ai vraiment besoinMer la source d'une page HTML chargée [ par lotfi ] je voudrais savoir comment faire pour faire lire a notepad (par ex) une page html chargée dans un control d' internet explorer inseré dans une applica Lire la source d'un page html générée par PHP !!! y'arrive pô !! [ par Doms ] Bonjour à tous,Je n'arrive pas à récupérer le code source d'une page html générée en PHP. En fait, toute la partie du code qui est du pur PHP, entre l Help me! Source HTML d'un webrowser? [ par MEGATRIX ] comment connaitre la source html d'une page web que qui serai chargé dans un webrowser?merci@++Megatrix Code source HTML [ par goth ] 'lut,g une url (généré et valide).je voudrais savoir comment récupré en vb le code source de cette page(le html koi) (pour analyse)Si vous avez une id Recupérer le source d'une page html [ par ZBob ] Hello, Je voudrais récupérer le source d'une page html en ligne mais je ne dispose de la licence du controle Inet (version initiation oblige), quelqu' Récupérer code source html afficher dans IE ??? [ par Feneko ] Voila, dans mon script j'execute une requète Html avec des variables :Set oIE = WScript.CreateObject("InternetExplorer.Application")oIE.Navigate "http EDITEUR HTML [ par kronprinz ] Je monte présentement un Éditeur HTML et j'ai quelques problèmes.- J'ai un rich text box pour le code. Admettons que je veuille mettre un texte en gra EDITEUR HTML !!!! AIDEZ-MOI QQN !!! [ par kronprinz ] Je monte présentement un Éditeur HTML et j'ai quelques problèmes.- J'ai un rich text box pour le code. Admettons que je veuille mettre un texte en gra source d'une page html a extraire ? [ par pilotex2003 ] Voila j'essaye d'extraire la source de la page :http://www.boursorama.com/cours.phtml?code=13330&choix_bourse=pays%3D33Cependant j'arrive seu


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :

Comparez les prix Nouvelle version

Photothèque Nouveau !



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,562 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.