|
 Trouver une ressource
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 !
 COLORISATION SYNTAXIQUE DE CODE VB6 (HTML)
 Information sur la source
 Description
Bonjour, Je sais que certaines sources existent sur le site, pour le faire... mais je voulais faire ma version, que je puisse facilement intégrer dans mes projets. elle colorie : - les chaines de caractères - les numériques - les numéros des lignes - les étiquettes (destinations des GoTo) - les commentaires - les mots clés - une liste de mos clé 'perso' Il s'agit d'un module de classe qui enrichit un code source VB de balises de formatage HTML. Le but ? pouvoir exporter du code VB6 coloré, vers le presse papier, des fichiers de documentation, etc. J'ai tenté de faire quelque chose de rapide... et de personnalisable Le zip inclu une feuille de test, qui permet de vous montrer la mise en oeuvre de la classe CSyntaxHighlighter. le but de cette feuille n'est nullement d'être un visionneur de code source... c'est juste, une DEMO ^^
 Source
- Public Sub ColorizeFile(ByRef vsFilePath As String)
- Dim ConvertVB6ToHTML As String
- Dim sContent As String
- Dim iFile As Integer
-
- '# Pas top de mettre cela ici, coté perfs...
- '# c'est juste pour que les changements du fichier custom.txt
- '# soit pris en compte au prochain coloriage.
- moSyntax.AddCustomKeywords App.Path & "\custom.txt"
-
- iFile = FreeFile
- Open vsFilePath For Input Lock Write As #iFile
- sContent = Input(LOF(iFile), #iFile)
- Close #iFile
-
- CcWeb.Document.body.innerHTML = moSyntax.Convert(sContent)
- End Sub
Public Sub ColorizeFile(ByRef vsFilePath As String)
Dim ConvertVB6ToHTML As String
Dim sContent As String
Dim iFile As Integer
'# Pas top de mettre cela ici, coté perfs...
'# c'est juste pour que les changements du fichier custom.txt
'# soit pris en compte au prochain coloriage.
moSyntax.AddCustomKeywords App.Path & "\custom.txt"
iFile = FreeFile
Open vsFilePath For Input Lock Write As #iFile
sContent = Input(LOF(iFile), #iFile)
Close #iFile
CcWeb.Document.body.innerHTML = moSyntax.Convert(sContent)
End Sub
 Conclusion
J'ai tenté d'être exhaustif, merci de me signaler les syntaxes / mots clé qui ne seraient pas colorés... ca ne concerne pas le fichier Custom qui n'est là qu'a titre d'exemple... libre a vous de l'enrichir comme bon vous semblera. voici comment cela fonctionne : le but est d'établir une cartographie du code a convertir. on isole les commentaires, les chaines de caractère, etc. ensuite, on parcoure le tableau qui sert pour la carte, et on ajoute les balises HTML adéquates...
 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
 Historique
- 12 février 2007 15:40:18 :
- gestion des caractères accentués
- 12 février 2007 16:09:48 :
- gestion du esset allemand
- 12 février 2007 16:11:47 :
- gestion du esset allemand
- 12 février 2007 16:15:09 :
- Ajout des mots clé Implements, Event et RaiseEvent
- 13 février 2007 00:51:53 :
- Ajout de mots-clés (merci Violent_Ken)
Encore plus rapide : modification du remplacement des caractères spéciaux, mais surtout un test dans la fonction ColorizeWords
- 13 février 2007 06:46:50 :
- description
- 13 février 2007 13:52:39 :
- Ajout des mots Stop et Local (merci Violent_Ken) J'ai également ajouté deux propriétés a la classe (HTML_Header et HTML_Footer)
- 14 février 2007 09:25:13 :
- soucis d'upload
- 14 février 2007 11:20:12 :
- les mots clés se trouvent dans le fichier Keywords.txt
- 14 février 2007 14:18:54 :
- Ajout de commentaires dans le code. impact des modifications due aux ajustement pour le Forum de VbFrance
- 20 février 2007 15:27:36 :
- J'ai remanié pas mal l'algorithme général, et j'ai ajouté quelques options (colorier les nombres, les labels, séparer les procédures...)
- 12 mars 2007 09:11:51 :
- gestion des éléments d'enumerations entre crochets
- 12 mars 2007 09:17:45 :
- soucis d'upload
- 12 mars 2007 09:37:12 :
- Upload es tu là ?
- 21 mars 2007 15:45:47 :
- bug si le dernier element est un numérique (bien vu, jrivet)
- 03 avril 2007 14:38:55 :
- gestion du î (et de quelques autre caractères accentués). Merci jrivet
- 03 juillet 2007 09:59:14 :
- colorisation des numéros de lignes
 Sources du même auteur
 Sources de la même categorie
Sources en rapport avec celle ci
 Commentaires et avis
 Discussions en rapport avec ce code source dans le forum
VB6 ---->> Mail au format HTML [ par AlAiN ]
s'il vous plait, est il possible d'envoyer des mail au format html avec vb6, pour les mails au format text, le composant mapi fonctionne, mais je cher
remplir formulaire avec vb6 [ par danone ]
Bonjour,Je recherche le moyen à partir de VB6 de remplir un formulaire qui se trouvesur une page HTML par exemple celle du site des pages blanches sur
VB6+HTML+OUTLOOK EXPRESS [ par Paje ]
Bonjour à tousJe cherche un composant similaire à celui qui ce trouve dans Outlook Express à savoir :Lorsque je tape le corps d'un message, si j'ai co
activex et html [ par fvhq ]
je souhaiterai développer un axtive x de défilement de texte en VB6 et l'intégrer dans du code htmlquelqu'un aurait il un exemple de développement en
Colorier la syntaxe [ par zibou ]
Bonjour,Je cherche un code source qui colorit la syntaxe HTML, alors si vous en avez un svp vous savez koi faire.Cordialement Samir Ghoualem----------
créer mail html avec mapi sous vb6 [ par pmvb ]
Bonjour,Je suis à la recherche d'une information pour créer des mails au format html en utilisant mapi avec vb6.Faut-il utiliser msgtype, et si oui, s
Problème d'insertion HTML dans VB6 [ par morpheus83z ]
Salut !Voilà, je débute avec VB6. Pour le moment je génère un fichier PHP de cette façon :Option ExplicitPrivate Sub GenereWeb()Open "c:\admin.php" Fo
du html ET vB6 [ par ghannem ]
En fait moi je veux que je recupere les scripts a partir d'un document html.apres je veux vraiment selectionner uniquement les scripts qui ont ete app
syntaxe de requetes access sous vb6 [ par mierkool ]
voila, je voudrais savoir la syntaxe de requetes access sous vb6 :les selects: moi j'ecris ca comme ca : select * from client where nom = " + varnomle
demande de syntaxe pour récupérer mes données d'un fichier.xls sur mon projet sur VB6 [ par tom067 ]
Salut, moi c'est Tomje suis automaticien pour machine industrielle et je me suis lancer à titre privé dans la prog visualbasic.J'ai exploit&
|
 Téléchargements
Logiciels à télécharger sur le même thème :
|