Visual Basic, VB6, VB.NET, VB 2005, VB CodeS-SourceS

CodeS-SourceS est hébergé par Frontier.fr

Cliquez ici pour mettre ce site au démarrage de votre navigateur

AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

begin process at 2009 07 10 02:21:15

ET C'EST PARTI POUR SILVERLIGHT 3 ! par broux

[REFACTORING] TéLéCHARGEZ RESHARPER V5 PREVIEW POUR VISUAL STUDIO 2010 par tja

DéSACTIVER L'AUTOCOMPLéTION DANS OPENOFFICE CALC par MadMatt

ON A éTé TECHCRUNCHé ! par Nix

GOOGLE OS par Bidou

PROBLEME VB6 par xanasx

SALUT par hachem100

RE : ECHEC SUPPRESSION LIGNE SOUS CONDITION DE LA PREMIERE CELLULE par pile_poil

RE : TRI AVEC RELATIONS par LIBRE_MAX

+ de logiciels à télécharger

1 467 608 membres
28 nouveaux aujourd'hui
15 053 membres club

Trouver une ressource

Trouvez une ressource parmi 40 107 codes, 1 304 668 messages d'aide etc...

Recherche: dans [ Dernières recherches ]

Filtre:Tous les codes.NET uniquementExclure .NET

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 !

VALIDATION XML

Information sur la source

Catégorie :Fichier / Disque Niveau : Débutant Date de création : 17/01/2003 Date de mise à jour : 17/01/2003 18:37:23 Vu / téléchargé: 8 028 / 1 635

Auteur : TheSaib

Ecrire un message privé

Note :

10,00 / 10

Commentaire sur cette source (2)

Ajouter un commentaire et/ou une note

Description

Cliquez pour voir la capture en taille normale

Simple outil de validation de Documents XML .

Source

Dim docXML As DOMDocument 'New doc XML
Set docXML = New DOMDocument 'Nouvelle instance d'un doc XML
cd.Filter = "*.xml|*.xml" 'filtre de la dlg
cd.DialogTitle = "Choisisser l'XML a valider"
cd.ShowOpen 'Boite de dlg Ouvrie
If cd.FileName <> "" Then 'Si un fichier a été choisi'
docXML.validateOnParse = True 'Validaiton du parseur sur le fichier
If docXML.Load(cd.FileName) Then
txtErr.Text = "::Fichier Validé"
Else
txtErr.Text = "Le fichier n'est pas conforme a son DTD" & vbCrLf
With docXML.parseError
txtErr.Text = txtErr.Text & vbCrLf _
& "Erreur " & .errorCode & ":" & .reason & vbCrLf _
& "Fichier : " & .url & vbCrLf _
& "Ligne : " & .Line & vbCrLf _
& "Charactere : " & .linepos & vbCrLf & vbCrLf _
& "Extrait : " & .srcText & vbCrLf
End With
End If
End If

Dim docXML As DOMDocument 'New doc XML
Set docXML = New DOMDocument 'Nouvelle instance d'un doc XML
cd.Filter = "*.xml|*.xml" 'filtre de la dlg
cd.DialogTitle = "Choisisser l'XML a valider"
cd.ShowOpen 'Boite de dlg Ouvrie
If cd.FileName <> "" Then 'Si un fichier a été choisi'
    docXML.validateOnParse = True 'Validaiton du parseur sur le fichier
    
    If docXML.Load(cd.FileName) Then
        txtErr.Text = "::Fichier Validé"
    Else
        txtErr.Text = "Le fichier n'est pas conforme a son DTD" & vbCrLf
        With docXML.parseError
            txtErr.Text = txtErr.Text & vbCrLf _
             & "Erreur " & .errorCode & ":" & .reason & vbCrLf _
             & "Fichier : " & .url & vbCrLf _
             & "Ligne : " & .Line & vbCrLf _
             & "Charactere : " & .linepos & vbCrLf & vbCrLf _
             & "Extrait : " & .srcText & vbCrLf
        End With
    End If
End If

Conclusion

Allez voir le zip vous vous ferait moins chier a deviner les controls
N'oubliez pas la reference a microsoft XML 2.0

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 !

frmMain.frm 2 239 octets
mssccprj.scc170 octets
prjValideXML.vbp 779 octets
prjValideXML.vbw 51 octets
ValideXML.exe20 480 octets
vssver.scc64 octets

Télécharger le zip

Sources du même auteur

JOYSTICK , MANETTE GESTION EXEMPLE

PUISSANCE DE 2 : CALCUL

ADRESSE IP PAR L'API WINSOCK

CREATION DE FORM PAR API

MARRE DES JEUX HANOI SANS LES SOLUTIONS :)

Toutes les sources de TheSaib

Sources de la même categorie

CRYPTAGE DÉCRYPTAGE DE FICHIER PAR MOT DE PASSE par auban

CLASSE POUR CONNECTER/DÉCONNECTER UN LECTEUR RÉSEAU par radcur

MOTEUR DE RECHERCHE DE FICHIERS par johndave

PARSEUR XML par cyrilremy

EXTRACTION DES FICHIERS IMG DE GTA 3 (VICE CITY ET SAN ANDRE... par gta126

Toutes les sources de la catégorie Fichier / Disque

Commentaires et avis

Commentaire de RockmanX le 15/12/2003 21:11:14

J'utilise un schéma et pas un DTD mais ton pog ne renvoit aucune erreur si je mets une string au lieu d'une date...
C'est normal?

Commentaire de ZedMaTrix le 31/08/2007 08:43:29

Code intéressant !

Par contre, je rejoint un peu RockmanX:
Moi je désirerai utiliser un schéma XSD pour valider mes XML.

J'avais trouvé sur le site de Microsoft une doc qui expliquait comment faire ... mais je n'ai jamais réussi ( sans avoir eu de temps pour beaucoup chercher ) à faire fonctionner la validation...

Quelqu'un aurai des infos voire un code source ?

En tout cas, jolie boulot. Simple et efficace.