asp如何上传图片(asp代码怎么添加图片)

asp如何上传图片,asp代码怎么添加图片内容导航：ASP如何上传图片，并且可以添加图片说明在ASP中如何实现图片的上传用数据库不用ASP多图片同时上传程序有木有ASP图片上传代码急急急一、ASP如何上传图片，并且可以添加图片说明用ASP编写网站应用程序时间长了，难免会遇到各式各样的问题，其中关于如何上传文件到服务器恐怕是遇见最多的问题了，尤其是上传图片，比如你想要在自己的社区里面实现类似网易 虚拟社区提供的“每日一星”的功能，就要提供给网友上传照片的功能。上传图片文件到服务器可以使用各种免费的文件上传组件，使用起来功能虽然很强大，但是由于很多情况下，我们只能使用免费的支持ASP的空间或者租用别人的虚拟空间，对于种情况，我们根本就没有可能来使用文件上传组件；于第二种情况，我们也要付出不少的“银子”才可以。除非你拥有自己的虚拟主机，你就可以随便的在服务器上面安装自己所需要的组件，这种情况对于大多数人来说是可望而不可及的。那我们就没有办法了吗？呵呵，答案是肯定的（当然是肯定的了，要不然我也没法写出这篇文章啊）。下面就让我们一起来使用纯ASP代码来实现图片的上传以及保存到数据库的功能（顺便也实现显示数据库中的图片到网页上的功能）。 首先我们先来熟悉一下将要使用的对象方法。我们用来获取上一个页面传递过来的数据一般是使用Request对象。同样的，我们也可以使用Request对象来获取上传上来的文件数据，使用的方法是d()。而我们要从数据库中读出来图片的数据显示到网页上面要 用到的方法是： te()。在我们得到了图片的数据，要保存到数据库中的时候，不可以直接使用Insert语句对数据库进行操作，而是要使用ADO的AppendChunk方法，同样的，读出数据库中的图片数据，要使用GetChunk方法。各个方法的具体语法如下： d语法： variant=d(count) 参数 variant返回值保存着从客户端读取到数据。 count 指明要从客户端读取的数据量大小，这个值小于或者等于使用方法s得到的 数据量。 te语法： tedata 参数data 要写入到客户端浏览器中的数据包。 s语法： variant=s 参数 variant 返回从客户端读取到数据量的字节数。AppendChunk语法 将数据追加到大型文本、二进制数据Field或Parameter对象。 nkData 参数objectField或Parameter对象 Data变体型，包含追加到对象中的数据。 说明使用Field或Parameter对象的AppendChunk方法可将长二进制或字符数据填写到对象中。在系统内存有限的情况下，可以使用AppendChunk方法对长整型值进行 部分而非全部的操作。 GetChunk语法返回大型文本或二进制数据Field对象的全部或部分内容。 variable=(Size) 返回值 返回变体型。 参数Size长整型表达式，等于所要检索的字节或字符数。 说明 使用Field对象的GetChunk方法检索其部分或全部长二进制或字符数据。在系统内存有限的情况下，可使用GetChunk方法处理部分而非全部的长整型值。 GetChunk调用返回的数据将赋给“变量”。如果Size大于剩余的数据，则GetChunk仅返回剩余的数据而无需用空白填充“变量”。如果字段为空，则 GetChunk方法返回Null。每个后续的GetChunk调用将检索从前一次GetChunk调用停止处开始的数据。但是，如果从一个字段检索数据然后在当前记录中设置或读取另一个字段的值，ADO将认为已从个字段中检索出数据。如果在个字段上再次调用GetChunk方法，ADO将把调用解释为新的GetChunk操作并从记录的起始处开始读取。如果其他Recordset对象不是Recordset对象的副本， 则访问其中的字段不会破坏GetChunk操作。如果Field对象的Attributes属性中的adFldLong位设置为True，则可以对该字段使用GetChun k方法。如果在Field对象上使用Getchunk方法时没有当前记录，将产生错误3021（无当前记录）。接下来，我们就要来设计我们的数据库了，作为测试我们的数据库结构如下（Access200 0）： 字段名称 类型 描述 id 自动编号 主键值 imgOLE对象 用来保存图片数据 对于在MSSQLServer7中，对应的结构如下： 字段名称 类型 描述 id int(Identity) 主键值 imgimage 用来保存图片数据现在开始正式编写我们的纯ASP代码上传部分了，首先，我们有一个提供给用户的上传界面 ，可以让用户选择要上传的图片。代码如下（）： ＜html> ＜body> ＜center> ＜form name=”mainForm” enctype=”multipart/form-data”action=”” method=p ost> ＜inputtype=filename=mefile>＜br>＜inputtype=submitname=okvalue=”OK”> ＜/form> ＜/center> ＜/body> ＜/html>注意enctype=”multipart/form-data”，一定要在Form中有这个属性，否则，将无法得到上传上来的数据。接下来，我们要在中对从浏览器中获取的数据进行必要的处理，因 为我们在中获取到的数据不仅仅包含了我们想要的上传上来的图片的数据，也包含了其他的无用的信息，我们需要剔除冗余数据，并将处理过的图片数据保存到数据库中，这 里我们以access2000为例。具体代码如下（）： ＜% =trueformsize=s formdata=d(formsize) bncrlf=chrB(13)&chrB;(10)divider=leftB(formdata,clng(instrb(formdata,bncrlf))-1)datastart=instrb(formdata,bncrlf&bncrlf;)+4dataend=instrb(datastart+1,formdata,divider)-datastartmydata=midb(formdata,datastart,dataend) setconnGraph=ect(“n”)nString=”driver={MicrosoftAccessDriver(.mdb)};DBQ=”&; pPath(“”)&”;uid=;PWD=;”setrec=ect(“”) “SELECTFROM[images]whereidisnull”,connGraph,1,3rec(“img”).appendchunkmydata setrec=nothing setconnGraph=nothing %>好了，这下我们就把上传来的图片保存到了名为的数据库中了，剩下的工作就是要将数据库中的图片数据显示到网页上面了。一般在HTML中，显示图片都是使用＜IMG>标签，也就是＜IMGSRC=”图片路径”>，但是我们的图片是保存到了数据库中，“图片路径”是什么 呢？呵呵，其实这个SRC属性除了指定路径外，也可以这样使用哦：＜IMGSRC=”?id= x”> 所以，我们所要做的就是在中从数据库中读出来符条件的 数据，并返回到SRC属性中就可以了，具体代码如下（）： ＜%setconnGraph=ect(“n”) nString=”driver={MicrosoftAccessDriver(.mdb)};DBQ=”&(“”)&”;uid=;PWD=;” setrec=ect(“”)strsql=”selectimgfromimageswhereid=”&trim;(request(“id”)) l,connGraph,1,1pe=”image/” terec(“img”).getChunk() setrec=nothing setconnGraph=nothing %>注意在输出到浏览器之前一定要指定pe=”image/“， 以便正常显示图片。 要注意的地方是，我的中作的处理没有考虑到页()中还有其他数据，比如＜INPUT type=tesxt name=userid>等等，如果有这些项目，你的就 要注意处理掉不必要的数据。二、在ASP中如何实现图片的上传用数据库不用并能在网站上显示这些图片一种方法：用组件上传。百度一下“ASP上传组件”应该能找到不少，用法也很简单，网上也有说明文件。还有一种方法是不用组件，用fso对象。如果你要记录这些数据，并在站点上显示，需要用到数据库，可以记录文件路径，也可以记录文件。SQL和Access数据库都有一个数据类型用来存储字段，可以查看SQL帮助文件找到。三、ASP多图片同时上传程序有木有答：这里有一个文件上传程序看看有没有帮助参考资料：/common/shoutbox/?4=t＆四、ASP图片上传代码急急急以下代码是把上传后的编号编为年月日和时间.能不能不改变原文件名上传呀请个为老师帮忙看看..俺是菜鸟…还不懂的怎么弄..别笑话哈…<%set upload=new upload_5xsoftset file=(“sf_upfile”)if <1 then“alert(‘您没有选择图片。~~~\n\n－－－－－请点击浏览按钮，从弹出的窗口中选择要上传的图片。\n\n－－－－－然后点击上传按钮就可以把图片上传了…\n\n－－－－－不过要注意图片的格式哦~~~’);()”end ifif <10 or >6100*5000 then“错误:上传的图片大小超过了限制! 退回上一步”end ifupfilename = split(,”.”)upfileext = upfilename(ubound(upfilename))if upfileext<>”jpg” and upfileext<>”jpeg” and upfileext<>”gif” andupfileext<>”JPG” and upfileext<>”JPEG” and upfileext<>”GIF” andupfileext<>”png” and upfileext<>”PNG”then“错误:上传的文件格式不对! 退回上一步”end ifufp=”dsc”&year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&”.”&upfilename(ubound(upfilename))//保存的文件名称(“../upload/”&ufp)//文件的保存路径%>+=’upload/<%=ufp%>’(”)<%set file=nothingset upload=nothing‘set my_conn = nothing‘set rs = nothing%><% set upload=new upload_5xsoft set file=(“sf_upfile”) if <1 then “alert(‘您没有选择图片。~~~\n\n－－－－－请点击浏览按钮，从弹出的窗口中选择要上传的图片。\n\n－－－－－然后点击上传按钮就可以把图片上传了…\n\n－－－－－不过要注意图片的格式哦~~~’);()” end if if<10 or >6100*5000 then “错误:上传的图片大小超过了限制! 退回上一步”end if upfilename = split(,”\”) ufn = split(,”.”) upfileext = ufn(ubound(ufn))if upfileext<>”jpg” and upfileext<>”jpeg” and upfileext<>”gif” andupfileext<>”JPG” and upfileext<>”JPEG” and upfileext<>”GIF” andupfileext<>”png” and upfileext<>”PNG”then “错误:上传的文件格式不对! 退回上一步” end ifufp=upfilename(ubound(upfilename))//保存的文件名称 (“../upload/”&ufp)//文件的保存路径 %> +=’upload/<%=ufp%>’ (”) <% set file=nothing setupload=nothing ‘set my_conn = nothing ‘set rs = nothing%>这样应该可以了，如果还不行就email我，我的电子信箱地址是sdxy@,我重新改过了，你去测试吧