目前有很多无组件上传类,我大概看了一下,大多写的相当复杂,有的居然还只能传文本最关键的是没有10行代码以下的:)我花了一个晚上时间研究了一下ADODB.Stream,并且用了6行代码实现了无组件上传: strFileName=Request.QueryString SetobjStream=Server.CreateObject objStream.Type=1’’adTypeBinary objStream.Open objStream.LoadFromFilestrFileName objStream.SaveToFileServer."123_onweb.gif",2 使用方法: 把上面的代码写成upload.asp 在浏览器里面输入: http://XXX/upload.asp?file1=c:“上传文件“123.gif XXX为你的主机地址 执行完后你会看到你的目录下面多了一个123_onweb.gif 他就是你要文件拉!!!! 根据原理我们可以扩展以下代码: upload.asp文件 % FunctionGetFileName IfstrFile""Then GetFileName=mid 1) Else GetFileName="" EndIf Endfunction strFileName=Request.Form SetobjStream=Server.CreateObject objStream.Type=1’’adTypeBinary objStream.Open objStream.LoadFromFilestrFileName objStream.SaveToFileServer.MapPath),2 objStream.Close % upload.htm文件 formname="FORM"action="upload.asp"method="post" inputtype="submit"name="submit"value="OK" inputtype="file"name="file1"value="" /form