VBScript to Move files with particular extension

Question

I currently have a VBscript that scans a folder for files and moves the files to particular folders depending on key words in the file name.

I need currently the scr

Answer 1

before the extension put a * that will find all files with that externsion. Example: oFSO.MoveFile (PATH\*.EXTERNSION)