asp上传文件代码 html简单上传文件回调代码

编程之家2026-06-21825次浏览

很多朋友对于asp上传文件代码和html简单上传文件回调代码不太懂，今天就由小编来为大家分享，希望可以帮助到大家，下面一起来看看吧！

asp 如何实现带进度条的上传文件功能

以下就以abcupload4为例来说明怎么来制作实时的文件上传进度条。

（注：我们在abcupload自带例子基础上改进。）

progressupload.htm（上传文件的前台提交，我们让进度条在这个里面显示）

<HTML>

<body>

<!--

theUniqueID=(new Date()).getTime()% 1000000000;

function s()//让数据提交的同时执行显示进度条的函数

{

bar();//开始执行反映上传情况的函数

document.myform.action="progressupload.ASP?ID=" theUniqueID;//处理上传数据的程序

document.myform.target="up"//将提交的数据放在一个名字是up隐藏的iframe里面处理，这样提交的页面就不会跳转到处理数据的页

document.myform.submit();//提交表单

}

function bar()

{

bar1.style.display='';//让显示上传进度显示的层的可见

var timeoutid=null;//这个变量是作定时器的ID

var oXMLDoc= new ActiveXObject('MSXML');//创建'MSXML'对象

sURL="progressbar.ASP?ID=" theUniqueID"&temp=" Math.random();//获取上传状态数据的地址

oXMLDoc.url= sURL;//load数据

var oRoot=oXMLDoc.root;//获取返回XML数据的根节点

if(oRoot.children!= null)

{

if(oRoot.children.item(0).text-100==0)//文件上传结束就取消定时器

clearTimeout(timeoutid)

PercentDone.style.width=oRoot.children.item(0).text"%";//设置进度条的百分比例

//根据返回的数据在客户端显示

min.innerHTML=oRoot.children.item(1).text;//显示剩余时间（分钟）

secs.innerHTML=oRoot.children.item(2).text;//显示剩余时间（秒钟）

BytesDone.innerHTML=oRoot.children.item(3).text;//已上传数据大小

BytesTotal.innerHTML=oRoot.children.item(4).text;//总大小

BytesPerSecond.innerHTML=oRoot.children.item(5).text;//传输速率

Information.innerHTML=oRoot.children.item(6).text;//上传信息

}

if(oRoot.children.item(0).text-100<0)//只要文件没有传完，就每隔多少时间获取一次数据

timeoutid= setTimeout("bar()",50)//这里设定时间间隔是0.05秒，你也可以根据你的情况修改获取数据时间间隔

}

//-->

</script>

<tr>

</tr>

<td>

<tr>

</tr>

</table>

</td>

</tr>

<tr>

<td>

<tr>

<span id=min></span>分

<span id=secs></span>秒

(<span id=BytesDone></span> KB of

<span id=BytesTotal></span> KB已上传)</font></td>

</tr>

<tr>

传送速度:</font></td>

</tr>

<tr>

</tr>

</table>

</td>

</tr>

</table>

</div>

</form>

</body>

</HTML>

progressbar.ASP（返回上传状况数据的文件）

<%@EnableSessionState=False%>

On Error Resume Next

Set theProgress= Server.CreateObject("ABCUpload4.XProgress")'创建上传组件对象

theProgress.ID= Request.QueryString("ID")

'将返回数据以XML格式输出

<?XML version="1.0" encoding="gb2312"?>

<plan>

</plan>

progressupload.ASP（处理上传文件）

<%@EnableSessionState=False%>

Response.Expires=-10000

Server.ScriptTimeOut= 300

Set theForm= Server.CreateObject("ABCUpload4.XForm")

theForm.Overwrite= True

theForm.MaxUploadSize= 8000000

theForm.ID= Request.QueryString("ID")

Set theField= theForm("filefield1")(1)

If theField.FileExists Then

theField.Save theField.FileName

End If

<HTML>

<body>

传送结束

</body>

</HTML>

怎样用asp实现图片上传到文件夹,路径保存在access数据库中

用ASP编写网站应用程序时间长了，难免会遇到各式各样的问题，其中关于如何上传文件到服务器恐怕是遇见最多的问题了，尤其是上传图片，比如你想要在自己的社区里面实现类似网易虚拟社区提供的“每日一星”的功能，就要提供给网友上传照片的功能。上传图片文件到服务器可以使用各种免费的文件上传组件，使用起来功能虽然很强大，但是由于很多情况下，我们只能使用免费的支持ASP的空间或者租用别人的虚拟空间，对于第一种情况，我们根本就没有可能来使用文件上传组件；至于第二种情况，我们也要付出不少的“银子”才可以。除非你拥有自己的虚拟主机，你就可以随便的在服务器上面安装自己所需要的组件，这种情况对于大多数人来说是可望而不可及的。那我们就没有办法了吗？呵呵，答案是肯定的（当然是肯定的了，要不然我也没法写出这篇文章啊）。下面就让我们一起来使用纯ASP代码来实现图片的上传以及保存到数据库的功能（顺便也实现显示数据库中的图片到网页上的功能）。

首先我们先来熟悉一下将要使用的对象方法。我们用来获取上一个页面传递过来的数据一般是使用Request对象。同样的，我们也可以使用Request对象来获取上传上来的文件数据，使用的方法是Request.BinaryRead()。而我们要从数据库中读出来图片的数据显示到网页上面要用到的方法是：

Request.BinaryWrite()。在我们得到了图片的数据，要保存到数据库中的时候，不可以直接使用Insert语句对数据库进行操作，而是要使用ADO的AppendChunk方法，同样的，读出数据库中的图片数据，要使用GetChunk方法。各个方法的具体语法如下：

*Request.BinaryRead语法：

variant=Request.BinaryRead(count)

参数

variant

返回值保存着从客户端读取到数据。

count

指明要从客户端读取的数据量大小，这个值小于或者等于使用方法Request.TotalBytes得到的数据量。

*Request.BinaryWrite语法：

Request.BinaryWritedata

参数

data

要写入到客户端浏览器中的数据包。

*Request.TotalBytes语法：

variant=Request.TotalBytes

参数

variant

返回从客户端读取到数据量的字节数。

*AppendChunk语法

将数据追加到大型文本、二进制数据Field或Parameter对象。

object.AppendChunkData

参数

objectField或Parameter对象

Data变体型，包含追加到对象中的数据。

说明

使用Field或Parameter对象的AppendChunk方法可将长二进制或字符数

据填写到对象中。在系统内存有限的情况下，可以使用AppendChunk方法对长整型值进行部分而非全部的操作。

*GetChunk语法

返回大型文本或二进制数据Field对象的全部或部分内容。

variable=field.GetChunk(Size)

返回值

返回变体型。

参数

Size长整型表达式，等于所要检索的字节或字符数。

说明

使用Field对象的GetChunk方法检索其部分或全部长二进制或字符数据。在系统内存有限的情况下，可使用GetChunk方法处理部分而非全部的长整型值。

GetChunk调用返回的数据将赋给“变量”。如果Size大于剩余的数据，则

GetChunk仅返回剩余的数据而无需用空白填充“变量”。如果字段为空，则

GetChunk方法返回Null。

每个后续的GetChunk调用将检索从前一次GetChunk调用停止处开始的数据。但是，如果从一个字段检索数据然后在当前记录中设置或读取另一个字段的值，ADO将认为已从第一个字段中检索出数据。如果在第一个字段上再次调用GetChunk方法，ADO将把调用解释为新的GetChunk操作并从记录的起始处开始读取。如果其他Recordset对象不是首个Recordset对象的副本，则访问其中的字段不会破坏GetChunk操作。

如果Field对象的Attributes属性中的adFldLong位设置为True，则可以对该字段使用GetChunk方法。

如果在Field对象上使用Getchunk方法时没有当前记录，将产生错误3021（无当前记录）。

接下来，我们就要来设计我们的数据库了，作为测试我们的数据库结构如下（access2000）：

字段名称类型描述

id自动编号主键值

img OLE对象用来保存图片数据

对于在MSSQLServer7中，对应的结构如下：

字段名称类型描述

id int(Identity)主键值

img image用来保存图片数据

现在开始正式编写我们的纯ASP代码上传部分了，首先，我们有一个提供给用户的上传界面，可以让用户选择要上传的图片。代码如下

（upload.htm）：

<html>

<body>

<inputtype=filename=mefile><br>

<inputtype=submitname=okvalue="OK">

</form>

</center>

</body>

</html>

注意enctype="multipart/form-data"，一定要在Form中有这个属性，否则，将无法得到上传上来的数据。接下来，我们要在process.asp中对从浏览器中获取的数据进行必要的处理，因为我们在process.asp中获取到的数据不仅仅包含了我们想要的上传上来的图片的数据，也包含了其他的无用的信息，我们需要剔除冗余数据，并将处理过的图片数据保存到数据库中，这里我们以access2000为例。具体代码如下（process.asp）：

response.buffer=true

formsize=request.totalbytes

formdata=request.binaryread(formsize)

bncrlf=chrB(13)&chrB(10)

divider=leftB(formdata,clng(instrb(formdata,bncrlf))-1)

datastart=instrb(formdata,bncrlf&bncrlf)+4

dataend=instrb(datastart+1,formdata,divider)-datastart

mydata=midb(formdata,datastart,dataend)

setconnGraph=server.CreateObject("ADODB.connection")

connGraph.ConnectionString="driver={MicrosoftAccessDriver(*.mdb)};DBQ="&server.MapPath("images.mdb")&";uid=;PWD=;"

connGraph.Open

setrec=server.createobject("ADODB.recordset")

rec.Open"SELECT*FROM[images]whereidisnull",connGraph,1,3

rec.addnew

rec("img").appendchunkmydata

rec.update

rec.close

setrec=nothing

setconnGraph=nothing

好了，这下我们就把上传来的图片保存到了名为images.mdb的数据库中了，剩下的工作就是要将数据库中的图片数据显示到网页上面了。一般在HTML中，显示图片都是使用<IMG>标签，也就是<IMGSRC="图片路径">，但是我们的图片是保存到了数据库中，“图片路径”是什么呢？呵呵，其实这个SRC属性除了指定路径外，也可以这样使用哦：

<IMGSRC="showimg.asp?id=xxx">

所以，我们所要做的就是在showimg.asp中从数据库中读出来符合条件的

数据，并返回到SRC属性中就可以了，具体代码如下（showimg.asp）：

setconnGraph=server.CreateObject("ADODB.connection")

connGraph.ConnectionString="driver={MicrosoftAccessDriver(*.mdb)};DBQ="&

server.MapPath("images.mdb")&";uid=;PWD=;"

connGraph.Open

setrec=server.createobject("ADODB.recordset")

strsql="selectimgfromimageswhereid="&trim(request("id"))

rec.openstrsql,connGraph,1,1

Response.ContentType="image/*"

Response.BinaryWriterec("img").getChunk(7500000)

rec.close

setrec=nothing

setconnGraph=nothing

注意在输出到浏览器之前一定要指定Response.ContentType="image/*"，

以便正常显示图片。

最后要注意的地方是，我的process.asp中作的处理没有考虑到第一页(upload.htm)中还有其他数据，比如<INPUT type=tesxt name=userid>等等，如果有这些项目，你的process.asp就要注意处理掉不必要的数据。

ASP网站上传图片代码问题怎么解决

如果您在使用ASP（Active Server Pages）开发网站时遇到了上传图片的问题，以下是一些可能的解决方案：

确保上传的文件类型正确：在ASP中，您需要确保允许上传的文件类型与您在代码中设置的一致。

检查文件大小限制：在ASP中，您可以通过代码设置上传文件的大小限制。确保您设置的大小限制与实际需求相符，并且上传的文件大小不超过该限制。

检查文件名和文件路径：在ASP中，上传的文件将被保存在指定的目录中，并使用唯一的文件名。确保您在代码中设置了正确的文件保存路径和文件名规则。

检查服务器权限：在ASP中，上传的文件需要写入服务器上的文件系统。确保您的服务器具有足够的权限来创建和写入文件。

调试代码：如果您在尝试上传图片时遇到了错误，可以使用调试工具来检查代码中的错误。您可以查看服务器日志、错误消息或使用调试工具来跟踪代码执行的过程，找出问题所在。

请注意，ASP是一种相对较旧的Web开发技术，可能存在一些安全问题和性能问题。如果您在开发一个大型或安全性要求较高的网站，建议考虑使用更现代的Web开发框架或技术。

关于本次asp上传文件代码和html简单上传文件回调代码的问题分享到这里就结束了，如果解决了您的问题，我们非常高兴。

lol被删除的4个英雄？lol被移除的十大英雄vba语言(vb是什么软件)