vbs脚本：MoveFile

Rem :  ===========  将文件 file 移动到文件夹 folder 中，相当于剪切操作
Rem :  ===========  file必须存在
Rem :  ===========  folder必须存在且属性不能为只读
Rem :  ===========  foler中不能存在与file同名的文件或文件夹
Sub MoveFile( file, folder )
	Dim f1, f2
	f1 = file
	f2 = folder
	If Right(f1,1) = "