net fileupload上传控件【原创】 [图] 发表时间:2007年11月27日 15时15分58秒 评论/阅读( 0/ 0) 上传组件:【原创】主要完成的功能:规定大小、文件扩展名、文件改名(改成系统时间定义的文件时间)、SaveAs方法保存文件。改名的方法:*DateTime.ToFileTimeUtc 方法。*返回值:此DateTime 的采用操作系统文件时间格式的值。该文件时间不考虑本地时区进行偏移。文件时间:文件时间是一个表示 Windows 文件时间戳的 64 位有符号整数值。时间戳是自协调通用时间 (UTC) 公元 (C.E.) 1601 年 1 月 1 日午夜 12:00 以来所经过的时间以 100 毫微秒为间隔表示时的数字。ToFileTimeUtc 方法返回相对于公元 1601 (C.E.) 1 月 1 日午夜 12:00 的此 DateTime 的值,但是不会考虑本地时区对文件时间进行调整。请按照下面的内容添加控件如下: 标准:FileUpLoad1 标准:Button1 标准:Label1,Label2 如下图所示: 修改属性:Button1-->text属性“上传” Label1,Label2--->text属性设置为""(空) 双击Button1进入 Button1_Click事件 输入如下代码: Dim savefolder As String = "\upimages\" Dim apppath As String = Request.PhysicalApplicationPath If (FileUpload1.HasFile) Then Dim filename As String = FileUpload1.FileName Dim filesize As Integer = FileUpload1.PostedFile.ContentLength Dim fileExtension As String = System.IO.Path.GetExtension(filename) If (fileExtension = ".jpg") Or (fileExtension = ".bmp") Or (fileExtension = ".gif") Then If (filesize < 510000) Then Dim renfilename As String = System.DateTime.now.ToFileTimeUtc.toString() Dim fullpath As String = apppath + savefolder + renfilename + fileExtension FileUpload1.SaveAs(fullpath) Label1.Text = "上传成功" + savepath + renfilename + fileExtension + "上传文件的大小为:" + Str(filesize / 1024) + "K" Else Label1.Text = filename + "超过上传大小失败" End If Else Label1.Text = "您上传的文件后缀名" + fileExtension + "被禁止" End If Else Label1.Text = "上传失败!请确认:1.文件扩展名只允许:.jpg、.bmp、.gif。2.文件大小超出指定大小。" End If 程序解释为:首先定义:1、dim savefolder想上传的文件夹名称具体格式:dim savefolder as string = "/文件夹名/"2、dim appPath 系统文件的路径用request中获取应用程序物理路径的方法:Request.PhysicalApplicationPath 给appPath 变量赋值具体为:dim appPath as string = Request.PhysicalAppliactionPath。3、 建立判断体:如果获取文件if(FileUpLoad1.HasFile) then定义filename变量用FileUpLoad1.FileName方法返回上传文件名具体格式:dim filename as string = FileUpLoad1.FileName定义fileExtension变量用System.IO.Path.GetExtension(filename)的方法返回上传文件的扩展名具体如下:dim fileExtension as string = system.IO.Path.GetExtension(Filename)定义filesize变量用FileUpLoad1.PostedFile.CountentLength的方法获取上传文件的大小。注意:filesize 是Integer类型。具体如下:dim filesize as Integer = FileUpload1.postedFile.CountentLength判断文件扩展名是否是符合规格(本程序只是只允许.jpg.bmp.gif的文件上传)If(fileExtension = ".jpg")or(fileExtension = ".bmp")or(fileExtension = ".gif") then判断文件大小(设置文件大小的限制数值:这里是5M因为是以位为单位的所以设置大小为500000)If(filesize < 5000000) then如果文件扩展名是.jpg.bmp.gif并且文件大小符合规定则会成功的保存文件,但是在保存文件前要设置文件保存的文件名:使用System.DateTime.now.ToFileTimeUtc.toString()的方法返回一个自定义的文件名(此产生的文件名是16位的数字)定义变量renfilename用来表示使用文件时间返回来的文件名:dim renfilename as string = System.DateTime.now.ToFileTimeUtc.toString()最后使用SaveAs(完整的存储路径+文件名+扩展名)定义一个fullpath填充到SaveAs方法中SaveAs(FullPath)具体的FullPath为:完整的存储路径+文件名+扩展名。dim FullPath as string = appPath + savefloder + renfilename + fileExtension 最后执行FileUpLoad1.SaveAs(FullPath);如果成功上传给于Label1.Text提示:Label1.Text = "上传成功"如果文件大小超出则给与Label1.Text 提示elseLabel1.Text = "超过上传大小失败" end if如果文件扩展名不符内容给与Label1.Text提示:elseLabel1.Text = “您上传的文件后缀名" + fileExtension + "被禁止"end if如果上传的文件为空则给与Label1.Text以示提示:elseLabel1.Text = ”上传失败!请确认:1.文件扩展名只允许:.jpg、.bmp、.gif。2.文件大小超出指定大小。" end if4、Ctrl + F5测试