Converting a batch file to a VB file

OK, Sirbounty, looks cool!  How do I run it, compile it, make it happen?  You're dealing with a bat guy here.  :)

Well hello Bat Guy. :^)

You can double-click it (name it something.vbs) and it'll utilize the default script engine (typically wscript.exe).
Otherwise, you can launch it 'manually' using
cscript filename.vbs

The difference is that you can utilize
wscript.echo "Some text"

to display text on-screen, like a batch 'echo' would do.
If you use the wscript engine however, wscript.echo will always appear just like a msgbox does...in a 'popup' box (with an OK button).

90% there.  So, looking good.  It popped up the dialog box and opened the folder, but didn't do the first part (zip the config files).  It was very fast.  Like it hit an error and skipped the zip part.  Is there a way to put a pause in there so I can see whats cookin?

Please replace line 3 with this one:
(missing a blank space after the zipfile name...

objShell.Run chr(34) & "C:\Program Files\WinZip\wzzip" & chr(34) & " -r -p " & zipFile & " " & chr(34) & "c:\a-my configs\*.cfg" & chr(34)
                                              

1:

HOLY CRAP THAT'S AWESOME!!  OK, two questions left:  how do I put pauses in there?  How do I get to be 25% as smart as you?

Haha!  I've just had lots of practice.

Well, for 'pauses', I usually use msgbox "Some message".
But for a 'soft' pause or 'wait' period, you can use the sleep method:

wscript.sleep 2500 '2500 equates to milliseconds, so about 2.5 seconds

Is that the time of pause you're looking for?

Based on your excellent instructions, I inserted the following lines:

Msgbox "Please wait while I zip all the configs on your laptop...."
wscript.sleep 2500

Worked great!  The "All done" message actually appeared before the zip job was finished, but that's ok.  They can see that its not done yet, and they can click OK after its finished (unless there's wait command?).

Oh, one more thing.  This is VBscript, right?  And its built into Windows (Macs?)?  If so, going to Amazon right now and order me a book.  Pretty cool!

Uh oh, I screwed up.  I got a naughty message with that one.  I probably did too much editing.  Here's what I did:

Dim objShell : Set objShell = CreateObject("Wscript.Shell")
Msgbox "Please wait while I zip all the configs on your laptop...."
wscript.sleep 2500
zipFile = "c:\zipfolder\email_this_file.zip"
objShell.Run "Start /wait " & chr(34) & "C:\Program Files\WinZip\wzzip" & chr(34) & " -r -p " & zipFile & " " &

chr(34) & "c:\a-my configs\*.cfg" & chr(34)
Msgbox "ALL DONE!!" & vbNewLine & "Now I will open a folder showing you where the zip file is." & vbNewLine &

"Please email this zip file to leechipturner@gmail.com"
objShell.Run "cmd /c start " & Left(zipFile, InstrRev(zipFile,"\"))

Got it!  Figured it out.  Great job!  Thanks!!!

Excellent job, straight through!  REALLY appreciate the help.

just some unnecessary spaces, I think.
I dropped a popup message in there as well (disappears after x seconds so processing can continue if someone walks away before clicking "OK")

Dim objShell : Set objShell = CreateObject("Wscript.Shell")
Result = objShell.Popup ("Please wait while I zip all the configs on your laptop....", 5, "Processing script")
zipFile = "c:\zipfolder\email_this_file.zip"
objShell.Run "Start /wait " & chr(34) & "C:\Program Files\WinZip\wzzip" & chr(34) & " -r -p " & zipFile & " " & chr(34) & "c:\a-my configs\*.cfg" & chr(34)
 
Msgbox "ALL DONE!!" & vbNewLine & "Now I will open a folder showing you where the zip file is." & vbNewLine & "Please email this zip file to leechipturner@gmail.com"
objShell.Run "cmd /c start " & Left(zipFile, InstrRev(zipFile,"\"))
                                              

1:
2:
3:
4:
5:
6:
7:

Glad I could help - thanx for the grade! :^)