Vbscript list all PDF files in folder and subfolders

by

You’ll want to use the GetExtensionName method on the FileSystemObject object.

Set x = CreateObject("scripting.filesystemobject")
WScript.Echo x.GetExtensionName("foo.pdf")

In your example, try using this

For Each objFile in colFiles
    If UCase(objFSO.GetExtensionName(objFile.name)) = "PDF" Then
        Wscript.Echo objFile.Name
    End If
Next

More Related Contents:

  1. Recursively access subfolder files inside a folder
  2. Getting current directory in VBScript
  3. Is it possible to embed and execute VBScript within a batch file without using a temporary file?
  4. Getting a list of all subdirectories in the current directory
  5. Directory-tree listing in Python
  6. About using Double quotes in Vbscript
  7. VBScript — Using error handling
  8. Hide command prompt window when using Exec()
  9. Cannot use parentheses when calling a Sub Error 800A0414 VBS
  10. How do I run a VBScript in 32-bit mode on a 64-bit machine?
  11. Download a file with VBS
  12. VBscript code to capture stdout, without showing console window
  13. ByRef and ByVal in VBScript
  14. Run Command Line & Command From VBS
  15. Breaking a String Across Multiple Lines
  16. ADODB.Parameters error ‘800a0e7c’ Parameter object is improperly defined. Inconsistent or incomplete information was provided
  17. VBScript to send email without running Outlook
  18. How to set delay in vbscript
  19. How to identify between ok and cancel button in inputbox
  20. Use clipboard from VBScript
  21. List all files and directories in a directory + subdirectories
  22. How do I include a common file in VBScript (similar to C #include)?
  23. How can I show a message box with two buttons?
  24. How can I convert a VBScript to an executable (EXE) file? [closed]
  25. VBS with Space in File Path
  26. Creating and writing lines to a file
  27. Iterate through folders, then subfolders and print filenames with path to text file
  28. How can I use the common Save As dialog from VBScript?
  29. Create a folder in Outlook: error 800A0401 – Expected End of Statement
  30. Run a vbscript from another vbscript

Leave a Comment