Dim oFSO, oArgs, oFile
Dim cOldFile, cNewName

SET oFSO  = CREATEOBJECT( "Scripting.FileSystemObject" )
SET oArgs = Wscript.Arguments

cOldFile = oArgs( 0 )
cNewName = oArgs( 1 )

SET oFile = oFSO.GetFile( cOldFile )
oFile.Name = cNewName

Something like that should work, although you may want to make sure the file exists first. First parameter is full path and file name, second parameter is the new file name. Good luck. By the way, this was modified from what George already posted, thanks George.
jfh