asp上传文件到服务器的代码怎么写？

\x0d\\x0d\\x0d\无标题文档\x0d\\x0d\\x0d\重新上传" \x0d\responseend \x0d\end if \x0d\fType=1 \x0d\fOpen \x0d\aPosition=i-1 \x0d\aCopyTo f,j \x0d\\x0d\h = Mid(h, InStrRev(h, "filename=""") + 10) '这是我帮你添加的，文件名的获取没有正确 \x0d\fSaveToFile servermappath("/EXCEL/"& h),2 \x0d\fClose \x0d\set f=Nothing \x0d\aClose \x0d\set a=Nothing \x0d\'responsewrite ""&h&""\x0d\end if\x0d\If Errnumber 0 Then\x0d\ responseWrite errnumber\x0d\ responseWrite errDescription\x0d\ ResponseEnd\x0d\ End If\x0d\%>\x0d\\x0d\ function checkupload() {\x0d\ if (documentupload_formfevalue == "") {\x0d\ alert("未选择要上传的文件"); \x0d\ return false;\x0d\ } \x0d\ }\x0d\\x0d\ \x0d\ \x0d\\x0d\ \x0d\\x0d\

---