Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. quixter

    Help with VB script issue

    Jges, that seems to work perfectly, greatly appreciated!!! Hopefully I'm not speaking to soon this time, but I tested it upside down and all around this time. PHV, thanks as well.
  2. quixter

    Help with VB script issue

    Tallahasse is part of the file name. That is the issue. I need the script to stop if it does not find files. Currently it hangs on the file move if there are no files.
  3. quixter

    Help with VB script issue

    Yea, realize its hard without having the entire code. It was after we moved the word "next" to before the file move that brought up this issue. It fixed the multiple file issue which I thought for sure put this to rest. So the issue is actually with the file move part... I believe, right? next...
  4. quixter

    Help with VB script issue

    Hi Jges, I see what you did there, I may learn some of this stuff yet. I want to make sure I understood where to place that. Main Sub Main Dim bWaitOnReturn: bWaitOnReturn = True Dim sPassphrase: sPassphrase = "revrunner1" Dim files: files = ListDir("C:\Brian\*.pgp") if files.count = 0...
  5. quixter

    Help with VB script issue

    PHV, Really appreciate the input and your time. You developers are a tuff bunch, I give all the credit in the owrld, this is really frustrating when you fix one thing and break another in the process. Anyways, I tried both ways and it's not throwing an error, but it's not processing the files...
  6. quixter

    Help with VB script issue

    If I write it as: Main Set objFSO = CreateObject("Scripting.FileSystemObject") If Not objFSO.FileExists("C:\Brian\*.pgp") Then Exit Sub Sub Main Dim bWaitOnReturn: bWaitOnReturn = True It tells me I have an invalid exit statement.
  7. quixter

    Help with VB script issue

    OK an error popped up today. I didnt test this the other day because it wasn't giving me this issue before. the script now fails if there are no files. I Believe I need to use the following as the first call: Set objFSO = CreateObject("Scripting.FileSystemObject") If...
  8. quixter

    Help with VB script issue

    It worked once I moved the word next after the following line, Thanks Greatly appreciated the help. oWiSH_Shell.Run sCommand_Text, iWindowStyle, bWaitOnReturn next
  9. quixter

    Help with VB script issue

    Thanks, may not get a chance to try that until Tuesday, but it seems like that would certainly do it.
  10. quixter

    Help with VB script issue

    I have a script that I have pieced together to help my team out. The script decrypts files in a folder. Names the files, keeping original name and extension as .txt. Then archives them to another folder. The issue I'm having is if there are multiple files the script completes one file (decrypts...

Part and Inventory Search

Back
Top