文件1 - Upload.ASP

用w3 upload组件上传

文件2 - UploadProcess.ASP

<% @ LANGUAGE="VBSCRIPT" %>

<%

Set upload = Server.CreateObject( "w3.upload" )

actualName = upload.Form( "name" )

Set fileName = upload.Form( "thefile" )

if fileName.IsFile then

fileName.SaveToFile( Request.ServerVariables( "APPL_PHYSICAL_PATH" ) & "\\" & actualName )

end if

%>