Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 55
  • Last Modified:

How to get a new file without the comments using VBS?? (comments starts with # in each line)

I have a configuration file with a lot of comments (#)
I want to create a new file but without the comments

Example:

Original file:
#this is a test
#this is for apache configuration

RESTART = YES
MODE = ON

New file:
RESTART = YES
MODE = ON
0
acunaara
Asked:
acunaara
2 Solutions
 
MacroShadowCommented:
Try this:
strFileName = "C:\Temp\OriginalTextFile.txt"

Set oFso = CreateObject("Scripting.FileSystemObject")
Set oFile = oFso.OpenTextFile(strFileName)

Do Until oFile.AtEndOfStream
    If Left(oFile.ReadLine, 1) <> "#" Then
        strTemp = strTemp & oFile.ReadLine & VbCrlf
    End If
Loop

oFile.Close

oFile = "C:Temp\StrippedTextFile.txt"
Set Set oFile = objFSO.CreateTextFile(oFile, True)
objFile.Write strTemp
objFile.Close

Open in new window

0
 
Bill PrewCommented:
No need for a script for this, just use the FINDSTR command, for example:

findstr /v /r /c:"^[ ]*#" in.txt > out.txt

Open in new window


~bp
0
 
acunaaraAuthor Commented:
Thanks
0

Featured Post

Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Tackle projects and never again get stuck behind a technical roadblock.
Join Now