Question : Comment est-ce que je peux enlever toutes les étiquettes de et les commentaires à l'intérieur de eux ?

Je veux enlever toutes les étiquettes de comprenant le contenu à l'intérieur de elles dans une classe file.

So si je veux enlever tout le suivant avec un operation


blablabla


How peux je faire ceci ? class= de

Réponse : Comment est-ce que je peux enlever toutes les étiquettes de et les commentaires à l'intérieur de eux ?

a fait une erreur dans le manuscrit, voici le fonctionnement un :
1 :
2 :
3 :
4 :
5 :
6 :
7 :
8 :
9 :
10 :
11 :
12 :
13 :
14 :
15 :
16 :
17 :
18 :
19 :
20 :
21 :
22 :
23 :
24 :
25 :
26 :
27 :
28 :
29 :
30 :
31 :
32 :
33 :
34 :
35 :
36 :
37 :
38 :
39 :
40 :
41 :
42 :
43 :
44 :
const CLASSES_FILES_FOLDER = « c:\temp\files »

placer le fso = le createobject (« scripting.filesystemobject »)
Placer l'objFolder = le fso.GetFolder (CLASSES_FILES_FOLDER)
Pour chacun objFile dans objFolder.Files
	marque = ""
	choisir le cas fso.GetExtensionName (objFile)
		enfermer le « Cs » : marque = »/« 
		cas « vb » : marque = » ''' « 
	extrémité choisie
	
	si "" <> symbolique alors
		RemoveSummary objFile.Path, marque
	finir si
 Après

 
 RemoveSummary secondaire (nom de fichier, marque)
	
	objSrcFile réglé = fso.OpenTextFile (nom de fichier, 1)
	données = ""
	allumette = faux
	Faire jusqu'à objSrcFile.AtEndOfStream
		strLine = objSrcFile.Readline
		s'InStr (strLine, marque et «  ") > 0  puis
			l'allumette = rectifient
		autrement 
			si l'allumette = rectifient alors
				s'InStr (strLine, marque) = 0 puis
					allumette = faux
					données = données et strLine et vbNewLine
				finir si
			autrement
				données = données et strLine et vbNewLine
			finir si
		finir si
	Boucle
	
	objSrcFile.Close
	
	objOutFile réglé = fso.CreateTextFile (nom de fichier, 2)
	données d'objOutFile.Write
	objOutFile.Close
 sous-marin d'extrémité
Autres solutions  
  •  MS Excel 2007 et pdf - l'exportation vers le pdf prend de longues heures !
  •  Dans le Perl, comment j'ajoute une valeur à la liste, puis le contrôle pour voir si la valeur existent avant d'ajouter une nouvelle valeur
  •  Comment fais j'initialiser de la HP BL460c G6 de san et de la HP XP 240000
  •  Comment fais j'employer une clef de permis de volume sur un ordinateur de HP avec du CD de restauration
  •  Emplacement primaire de deux SCCM dans l'annuaire actif
  •  L'initiateur et la HP D2D de l'iSCSI R2 du serveur 2008 de Windows GERCENT l'issue
  •  Stocker le dossier dans le mysql using connector.net et le champ de goutte
  •  Carte vidéo d'USB - bit 32 sur le matériel travaillant au niveau du bit 64 ?
  •  asp.net que j'essaye de convertir une forme de HTML en forme d'aspx ou ? ce qui jamais. Aide du besoin sur la façon dont à à elle.
  •  Winzip 12 issues de secours du travail ?
  •  
    programming4us programming4us