ASPupload上传代码在美国出错

各位朋友好!

国内服务器上运行正常的一小段上传代码,现在搬到美国主机出问题了。代码如下：

Set upload = Server.CreateObject("persits.upload.1")  '创建Upload对象  
count=Upload.save()       '将上传的文件保存至服务器内存,count是获得上传的文件数
yao=upload.form("yaoqiu")       '获取上传表单中文本域的值

if count<1 then     '判断是否上传了文件，如果上传文件域的值为空，则

  rs.addnew
  rs("yaoqiu")=yao
  rs("itemren")=session("username")
  rs("itemtime")=now()
  rs.update
  response.write"<script>alert('提交成功！');window.location.href='itemlist.asp';</script>"

else

Set file1 = Upload.Files("file1")     '创建file对象并获取上传表单中文件域的值
houzhui=file1.Ext                    '获取上传文件的后缀
if houzhui =".gif" or houzhui=".jpg" or houzhui=".png" or houzhui=".psd" or houzhui=".rar" or houzhui=".doc" or houzhui=".txt" then   
newname = year(now()) & month(now()) & day(now()) & hour(now()) & minute(now()) & second(now())  '重命名上传的文件

file1.SaveVirtual("upload") & "\" & newname & houzhui   ‘保存文件


错误提示为：
“Microsoft VBScript runtime  error '800a01b6'
Object doesn't support this property or method: 'file1.SaveVirtual' ”

我咨询了空间商Godaddy,空间是支持ASPupload3.0的.请教大家如何修改代码？

还有，yao=upload.form("yaoqiu")  获取的表单文本字段的值写入ACCESS数据库中的是乱码，如何解决？（数据库中看就是乱码，不是显示页面的问题）