关于FSO的一个问题

'/////////////////////////服务器验证开始/////////////////////////////////////////////
'获取上传上去的文件的扩展名
fpath=Server.mappath("../"&FileName) '图片物理路径
Set KFSO= CreateObject("Scripting.FileSystemObject")

'fkuo=trim(kfso.GetExtensionName(fpath)) '得到扩展名

fkuo=mid(fpath,instr(fpath,".")+1,len(fpath)-instr(fpath,".")) '得到扩展名

kzms="jpg|gif|bmp|jpeg"
if instr(kzms,lcase(fkuo))=0 then
KFSO.DeleteFile(fpath)
end if

set kfso=nothing
'/////////////////////////服务器验证结束/////////////////////////////////////////////

这个是一个上传组件的验证部分。功能是当文件已经上传到服务器上后，FSO读取这个文件的扩展名，如果不是GIF JPG的图片，就直接把这个文件删掉。

本来一直在购买的一个虚拟主机里使用正常的.但是现在转到一台单独的服务器上后,,就传什么删什么了。似乎是读取文件扩展名失败的样子.

具体原因还请高人指教。.分我会追加的....
补充一下:服务器上的文件夹选项里。..显示文件扩展名和不显示扩展名都试了。...还是删..

关于FSO的一个问题 关于asp内置组件FSO的问题~~~ ASP 关于FSO问题 FSO代码的问题 vb fso的问题 asp的fso问题 关于asp 中的fso问题 VBS编程问题，关于fso文件操作的~急急 asp的fso的问题 Win2003的FSO读写问题