UC知道绝对高分悬赏》》》如何用asp把图片上传到文件夹中
来源：百度知道 编辑：UC知道 时间：2024/05/17 11:10:10
在我的网站空间中，有一个图片文件夹 imag, 还有一个 页面a.html
,我想实现以下功能：
在a.html页面上 加以个按钮，当我浏览这个页面的时候，点击这个按钮，弹出一个新的 页面，即上传页面，在上传页面中，我可以浏览本地图片 并能将其 上传到空间，自动保存在 imag中～～
有哪为高手能帮我实现这个功能～～～～最好有详细的 讲解和 代码
如果 给的 代码可行的话 继续追加分～～～～
能不能更详尽一些啊～～～
,我想实现以下功能：
在a.html页面上 加以个按钮，当我浏览这个页面的时候，点击这个按钮，弹出一个新的 页面，即上传页面，在上传页面中，我可以浏览本地图片 并能将其 上传到空间，自动保存在 imag中～～
有哪为高手能帮我实现这个功能～～～～最好有详细的 讲解和 代码
如果 给的 代码可行的话 继续追加分～～～～
能不能更详尽一些啊～～～
代码如下:
很简单的,自己修改一下局部就OK了
/uploadx.asp
<% Dim FormData, FormSize, Divider, bCrLf
FormSize = Request.TotalBytes
FormData = Request.BinaryRead(FormSize)
bCrLf = ChrB(13) & ChrB(10)
Divider = LeftB(FormData, InStrB(FormData, bCrLf) - 1)
'将上传的文件保存到path所指定的目录下面。
'Formfield 上传表单的"file"域名 Path
' 要保存文件的服务器绝对路径，形式为："d:\path\subpath"或"d:\path\subpath\"
'MaxSize 限制上传文件的最大长度，以KByte为单位
' SavType 服务器保存文件的方式：
'0 唯一文件名方式，如果有同名则自动改名；
'1 报错方式，如果有同名则出错；
'2 覆盖方式，如果有同名则覆盖原来的文件
Function SaveFile(FormFileField, Path, MaxSize, SavType)
Dim StreamObj,StreamObj1
Set StreamObj = Server.CreateObject("ADODB.Stream")
Set StreamObj1 = Server.CreateObject("ADODB.Stream")
StreamObj.Mode = 3
StreamObj1.Mode = 3
StreamObj.Type = 1
StreamObj1.Type = 1
SaveFile = &