?
Solved

Status bar

Posted on 2005-05-17
6
Medium Priority
?
242 Views
Last Modified: 2010-04-17
I have the following script that reports on a specific file version.  I would like to add a status bar that shows the progress as it adds the output to a txt file.  How might I go about doing that?

WScript.Echo "Server name" & vbTab & "File Version"

Const ForReading = 1
Const ForWriting = 2

Set objDictionary = CreateObject("Scripting.Dictionary")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objTextFile = objFSO.OpenTextFile("C:\servers.txt", ForReading)
Set objReportFile = objFSO.OpenTextFile("C:\report.txt", ForWriting)

i = 0
Do Until objTextFile.AtEndOfStream
   strNextLine = objTextFile.Readline
   objDictionary.Add i, strNextLine
   i = i + 1
Loop
For Each objItem in objDictionary
   Set objFSO = CreateObject("Scripting.FileSystemObject")
   objReportFile.WriteLine objDictionary.Item(objItem) & vbTab & objFSO.GetFileVersion _
("\\"& objDictionary.Item(objItem) & "\C$\Program Files\application\file.exe")                  

Next

Thanks
0
Comment
Question by:mchristo63
  • 2
4 Comments
 
LVL 22

Accepted Solution

by:
cookre earned 2000 total points
ID: 14023615
0
 
LVL 2

Expert Comment

by:Mohammad Aamir Qureshi
ID: 14034451
what about Progress bar if u use progress bar i will help u
0
 

Author Comment

by:mchristo63
ID: 14035279
what?
0
 

Author Comment

by:mchristo63
ID: 14035301
How can i insert that script into my script?
0

Featured Post

Independent Software Vendors: 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!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

In this post we will learn different types of Android Layout and some basics of an Android App.
Today, the web development industry is booming, and many people consider it to be their vocation. The question you may be asking yourself is – how do I become a web developer?
Six Sigma Control Plans
Loops Section Overview

578 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question