有没有文件上传的源代码！最好是asp.net的？

lins1980 2002-05-27 10:08:30

有没有文件上传的源代码！最好是asp.net的？谢谢

...全文

140 8 打赏收藏转发到动态举报

写回复

用AI写文章

8 条回复

切换为时间正序

请发表友善的回复…

发表回复

wangfei2428 2002-05-28

打赏
举报

asp.net本身就带有自动上传的功能，您看看书！
无须要!

xxjmz_78 2002-05-28

打赏
举报

在浏览器中上载文件的方法与实现

--------------------------------------------------------------------------------

上海铁道大学
刘建莹张宇
---- 一、问题引入

---- 在现在的管理信息系统中，比较先进的都已采用浏览器/服务器的模型，在这种模型中都要涉及到客户端与服务器端的信息交互问题，从服务器端到客户端的信息传递技术已经比较成熟，这里主要讨论从客户端到服务器端的文件上载问题，基于Microsoft的IE4.0、IIS4.0、ASP(Active Server Page)和标准HTML语言。

---- 二、实现方法

---- 在ASP页面中，利用HTML中的Form元素来实现。

---- 在Form元素的语法中，EncType表明提交数据的格式，Method表明提交的方法(Get/Post)。在IE4.0 及以后的版本中都支持"multipart/form-data"这种格式，相应的Method方法必须是Post，表明要上载文件到服务器。当然同时在服务器相应的WEB站点上要把属性设为可写。下面是一个示例：

< form enctype="multipart/form-data"
action="http://dev_d/upload/post/cpshost.dll?
PUBLISH?http://dev_d/upload/UserUploadAction.asp"
method=post id=form2 name=form2 >

1. Press the Browse button and
choose a File to upload from your computer.
< br >< input type="file" id=file1 name=file1 >
2. Upload the file.
< br >< input type=hidden size=80 name="TargetURL"
value=http://dev_d/upload/post >
< input type=submit value='Upload'
id=submit1 name=submit1 >
< /form >

---- 三、实现要素

1 Form的enctype="multipart/form-data"。

2 Form的action="(UserURL)/cpshost.dll?PUBLISH?
(UserURL)/UserUploadAction.asp"。

---- 说明：cpshost.dll是用于文件上载的动态链接文件，其后的PUBLISH参数也为固定，而(UserURL)指的是完整的URL地址，如：http://dev_d/upload。如果PUBLISH后没有参数，上载文件完成后，只是简单返回文件已经上载；如果PUBLISH后跟上完整URL的ASP文件，就可以用ASP来处理文件上载后的其他操作，如修改相应的数据库数据。可以在ASP文件中用Request.Form("Variable")来访问相应参数。对上载文件来说，Variable有四种可能的值：FileName 文件名称(不包括后缀),FileExtention 文件后缀(包括"."),FilePath 上载文件保存的服务器端路径,FileSize 上载文件的字节大小。

---- 3 Form的Method的方法必须为Post。

---- 4 Form中必须有一个input元素，而且input的属性type="file"。

---- 说明：如果要上载多个文件，有多个input元素就可以了，但至少有一个有效文件，否则会出错。

---- 系统会自动产生一个文本区域和一个"browse..."按钮，可以直接在文本区域内输入文件路径名称，或按"browse..."按钮，从文件对话框中选择一个文件。

---- 5 Form中必须有一个隐含(即type=hidden)input元素，而且input的属性name="TargetURL"，属性

---- value="(UserURL)"，(UserURL)即为上载文件保存位置的URL地址。

---- 说明：文件保存位置的URL地址属性必须设为可写，否则会返回此URL地址没有写的权限。

---- 6 Form中必须有一个submit按钮，即input的属性type="submit"，此按钮即为上载按钮。或者在其他相关事件中调用此Form的Submit方法。但两种方法实际上本质相同，只不过用方法调用还可以在上载前加上其它处理代码，如数据的有效性检查等。

---- 四、完整实例

---- 1 用户上载文件页面UserUpload.asp

< % response.expires=0 % >
< HTML >
< HEAD >
< META NAME="GENERATOR"
Content="Microsoft Visual Studio 6.0" >
< /HEAD >

< BODY >

< form enctype="multipart/form-data"
action="http://dev_d/upload/post/cpshost.dll?
PUBLISH?http://dev_d/upload/UserUploadAction.asp"
method=post id=form2 name=form2 >
< table BORDER=0 CELLSPACING=3 CELLPADDING=3 >
< tr >
< td valign=top >< span >1. < /span >
< td >Press the Browse button and choose
a File to upload from your computer.
< br >< input type="file" id=file1 name=file1 >
< br >< input type="file" id=file2 name=file2 >
< /td >
< tr >
< TD vAlign=top >< SPAN >2. < /SPAN >
< TD >Upload the file.
< br >< input type=hidden size=80 name="TargetURL"
value="http://dev_d/upload/post" >
< input type=submit value='Upload'
id=submit1 name=submit1 >
< /td >
< /table >
< /form >
< /BODY >
< /HTML >

2 用户上载文件处理页面UserUploadAction.asp
< % Response.Buffer = TRUE % >
< % Response.expires=0 % >

< HTML >
< BODY >
< H3 >Upload Status:< BR >< /H3 >

< span style="color:gray" >< HR >
< % For I = 1 To Request.Form("FileName").Count
Response.Write "Uploaded File: < B >" &
Request.Form("FileName")(I) &
Request.Form("FileExtention")(I) &"< /B >< BR >"
Response.Write "Server Path: < B >" &
Request.Form("FilePath")(I) & "< /B >< BR >"
Response.Write "Size: < B >"
& Request.Form("FileSize")(I)
& " bytes< /B >< br >"
Next
FileName = Request.Form("FilePath")(1) &
Request.Form("FileName")(1) &
Request.Form("FileExtention")(1)
% >
< hr >< br >
< % if request.form("FilePath").count = 0 then
Response.Write ("No file was received.")
Response.End
else
Response.Write (filename+" File was received.")
end if % >
< /span >
< /BODY >
< /HTML >

xxjmz_78 2002-05-28

打赏
举报

HTTP 方式上载文件的ASP实例

--------------------------------------------------------------------------------

太极计算机公司交通事业部
李嘉

1. HTTP 方式的文件上载
---- 文件的上载( upload) 是制作网站时经常遇到的问题, 经常上网的朋友大都使用过WEB 方式的Email 发信. 操作大体是这样: 当选择了粘贴文件后, 直接输入本地文件的绝对路径或按BROWSER 按钮浏览要粘贴的文件, 而后确认. 在这个过程中实际上就实现了HTTP 方式的文件上载.( 其中BROWSER 按钮在中文版的Netscape 和IE4 中显示为” 浏览..”). 这里文件从客户端到服务器的上载是由HTTP 协议的通用网关界面(CGI) 支持的. 这种上载方式要求浏览器和WEB Server 两方面都能够支持Rfc1867. Netscape 的Web Server 和浏览器以及IE4.0 都支持CGI 方式的上载, 但是微软的Web Server IIS 还不能提供这样的功能. 也就是说, 如果我们要想使用ASP 实现文件上载, 还必须对IIS 进行配置. 在网上可以下载这样的Active Server Componet, 或者用VB 等开发工具为IIS 编写一个这样的Active Server Componet 来支持Rfc1867. 由于采用HTTP 方式上载文件对使用者来说是最直接和方便的, 相信大家对下面的ASP 实例一定会感兴趣.

2. ASP 编程实例
---- 为了使大家对HTTP 方式的上载有一个感性的认识, 最好能实际运行以下这个例子. 这个简单的例子有两个文件. 一个是upload.html, 一个是up.asp. upload.html 中有一个FORM, 它有两个按钮” 浏览..” 和” 上载”, 用户在文本框中输入文件在本地的绝对路径或通过浏览选中文件后就可以用” 上载” 按钮将文件上载. 而IIS 上的up.asp 将会把文件存到服务器上的指定路径下.

---- 2.1 upload.html 文件

< HTML >
< HEAD >< TITLE > 请上载文件< /TITLE >< /HEAD >

< BODY >

< form enctype="multipart/form-data"
method="post" action="up.asp" >

输入上载文件的名称: < input type="file" name="f1" >< br >

< input type="submit" value=” 上载” >

< /form >

< /BODY >

< /HTML >

2.2 up.asp 文件
< %@ LANGUAGE="VBSCRIPT" % >

< HTML >< HEAD >

< TITLE > 上载文件测试< /TITLE >

< /HEAD >

< BODY >

您的文件已经上传成功!.< br >

< % Set upl = Server.CreateObject("SoftArtisans.FileUp") % >

< % upl.SaveAs "d:\upload\test.out" % >< BR >
文件长度: < %=upl.TotalBytes% >
< /BODY >
< /HTML >

---- 2.3 例子说明

---- 在HTML 中 FORM 必须有 ENCTYPE="multipart/form-data".

---- < INPUT TYPE="FILE" > 也是必须的.

---- 当对FORM 确认后, 浏览器将会传送指定文件的内容.

---- 在ASP 中实际上只用了两条语句就实现了上载

---- < % Set upl = Server.CreateObject("SoftArtisans.FileUp") % >

---- < % upl.SaveAs "d:\upload\test.out" % >

---- 第一条语句使用一个SoftArtisans.FileUp 的对象创建了一个名为 upl 的实例, 这里用到了一个称为SA-FileUp 的Active Server Componet. 第二条语句将上传的内容保存在服务器上.

---- 为了运行这个例子, 需要到http://www.serverpages.com/upload 站点下载这个Active Server Componet, 并用它配置微软的IIS 或Personal Web Server. 以上实例笔者在IIS3.0 和I E4,Netsapce4.0 运行通过.

林仪明 2002-05-27

打赏
举报

功能：
1。把图片文件(JPG GIF PNG)上传，
2。保存到指定的路径（在web.config中设置路径，以文件的原有格式保存），
3。并自动生成指定宽度的（在web.config中设置宽度）
4。和指定格式的（在web.config中指定缩略图的格式）
5。和原图比例相同的缩略图(根据宽度和原图的宽和高计算所略图的高度)
6。可以判断是否已经存在文件
7。如果不覆盖，则给出错误
8。如果选中"覆盖原图"checkbox，则覆盖原图。
9。可以根据要求，在webform上设置1个以上的file input和相应的checkbox
10。并在文件上传完毕后，显示原图的文件名，尺寸，字节，和
11。缩略图的文件名尺寸。
12。缩略图的文件名格式：原图+"_thumb."+指定格式，如：test.jpg_thumb.gif,以便于管理。

--------------------
public void UploadFile(object sender, System.EventArgs e)
{

string imgNameOnly, imgNameNoExt, imgExt;
string imgThumbnail;
int erroNumber = 0;
System.Drawing.Image oriImg, newImg;

StringBuilder picInfo = new StringBuilder();

if(Page.IsValid)
{

for(int i = 0;i < Request.Files.Count; i++)
{
HttpPostedFile PostedFile = Request.Files[i];
string fileExt = (System.IO.Path.GetExtension(PostedFile.FileName)).ToString().ToLower();

imgNameOnly = System.IO.Path.GetFileName(PostedFile.FileName);
if(fileExt == ".jpg" || fileExt == ".gif" || fileExt == ".png")
{

if(System.IO.File.Exists(ConfigurationSettings.AppSettings["FePicSavePath"]+ imgNameOnly) && (checkboxlistRewrite.Items[i].Selected == false))
{
erroNumber = erroNumber + 1;
picInfo.Append("<b>错误：</b>文件("+ (i+1) +") " + imgNameOnly + " 已经存在，请修改文件名<br>" );
}
}
else
{
erroNumber = erroNumber + 1;
picInfo.Append("<b>错误：</b>文件("+ (i+1) +") " + imgNameOnly + " 扩展名 " + fileExt + " 不被许可<br>" );
}

}

if(erroNumber > 0)
{
picInfo.Append("<font color=red>全部*作均未完成，请修改错误，再进行*作</font><br>");
}
else
{
for(int i = 0;i < Request.Files.Count; i++)
{

HttpPostedFile PostedFile = Request.Files[i];
imgNameOnly = System.IO.Path.GetFileName(PostedFile.FileName);
imgNameNoExt = System.IO.Path.GetFileNameWithoutExtension(PostedFile.FileName);
imgExt = System.IO.Path.GetExtension(PostedFile.FileName).ToString().ToLower();

oriImg = System.Drawing.Image.FromStream(PostedFile.InputStream);
newImg = oriImg.GetThumbnailImage(Int32.Parse(ConfigurationSettings.AppSettings["FePicThumbWidth"]),Int32.Parse(ConfigurationSettings.AppSettings["FePicThumbWidth"])*oriImg.Height/oriImg.Width,null,new System.IntPtr(0));
switch(imgExt)
{
//case ".jpeg":
case ".jpg":
oriImg.Save(ConfigurationSettings.AppSettings["FePicSavePath"] + imgNameOnly , System.Drawing.Imaging.ImageFormat.Jpeg);
break;
case ".gif":
oriImg.Save(ConfigurationSettings.AppSettings["FePicSavePath"] + imgNameOnly , System.Drawing.Imaging.ImageFormat.Gif);
break;
case ".png":
oriImg.Save(ConfigurationSettings.AppSettings["FePicSavePath"] + imgNameOnly , System.Drawing.Imaging.ImageFormat.Png);
break;
}

//oriImg.Save(ConfigurationSettings.AppSettings["FePicSavePath"] + imgNameNoExt + ".jpg", System.Drawing.Imaging.ImageFormat.Jpeg);

switch(ConfigurationSettings.AppSettings["FePicThumbFormat"].ToString().ToLower())
{
//jpeg format can get the smallest file size, and the png is the largest size
//case "jpeg":
case "jpg":
newImg.Save(ConfigurationSettings.AppSettings["FePicSavePath"] + imgNameOnly + "_thumb.jpg",System.Drawing.Imaging.ImageFormat.Jpeg);
imgThumbnail = imgNameOnly + "_thumb.jpg";
break;
case "gif":
newImg.Save(ConfigurationSettings.AppSettings["FePicSavePath"] + imgNameOnly + "_thumb.gif",System.Drawing.Imaging.ImageFormat.Gif);
imgThumbnail = imgNameOnly + "_thumb.gif";
break;
case "png":
newImg.Save(ConfigurationSettings.AppSettings["FePicSavePath"] + imgNameOnly + "_thumb.png",System.Drawing.Imaging.ImageFormat.Png);
imgThumbnail = imgNameOnly + "_thumb.png";
break;
default:
newImg.Save(ConfigurationSettings.AppSettings["FePicSavePath"] + imgNameOnly + "_thumb.jpg",System.Drawing.Imaging.ImageFormat.Jpeg);
imgThumbnail = imgNameOnly + "_thumb.jpg";
break;

}//switch

picInfo.Append("<b>文件　名：</b>" + imgNameOnly + " ( " + oriImg.Width + " x " + oriImg.Height + " ) " + PostedFile.ContentLength/1024 + "KB<br>");
picInfo.Append("<b>缩略图名：</b>" + imgThumbnail + " ( " + newImg.Width + " x " + newImg.Height + " )<br><br>");

oriImg.Dispose();
newImg.Dispose();

}//for
picInfo.Append("<font color=red>所有*作成功</font><br>");

}// if erronumber = 0

}
else
{
picInfo.Append("<font color=red>有错误，请检查。*作未成功</font><br>");

}

lblPicInfo.Text = picInfo.ToString();

}

ibadboy 2002-05-27