need help on VB Script.

I am try to customize the VB Script given here -
http://www.code-bytes.com/Automate_WSH_VBScript_To_Delete_Or_Archive_Files.html
 
but what ever file name or extension i am passing it's taking all the files in consideration. I found that  in bellow code -
 
if FileExtNameRegExpressionObject.Test(getFileExtention(oFile.Name)) then
if FileNameRegExpressionObject.Test(getFileName(oFile.Name)) then
 
getFileExtention(oFile.Name) & getFileName(oFile.Name) returning no value.
 
Any one could help me...!!

GetFileExtension() and GetFileName() are FileSystemObject methods.

i tried this as well - if FileExtNameRegExpressionObject.Test(oFSO.GetFileExtention(oFile.Name)) then  if FileNameRegExpressionObject.Test(oFSO.GetFileName(oFile.Name))then but didn't work....  
Bellow Changes worked fine - ( e.g. oFile.Name = test.log) if FileExtNameRegExpressionObject.Test(oFSO.GetExtensionName(oFile.Name)) = logif FileNameRegExpressionObject.Test(oFSO.GetBaseName(oFile.Name)) then = test

So, how exactly did it "not work"?
 
Post your customized script, the arguments you're passing when you call it, and what errors you get (if any). Also describe what the actual results are, and what the desired/expected results would be.