-
等级
本版专家分：5结帖率 93.48% -
如题。急。展开阅读全文
-
等级
本版专家分：1855 -
网上下栽个“无组件上传”之类的代码就行了
-
等级
本版专家分：0
-
转来的,可以用
一:前言
首先，没有料到图片与文本的上传会引起这么大的注意。上一篇贴子(Id=435906)贴出后，有不少人来信说看不懂。或
是仍然不能实现。我就以一种完全简单的手法。完成无组件的文本与图片上传数据库所有过程。希望能帮助所有对此有疑
问的网友。
二：准备工作
按照惯例，我先将我的测试环境告诉大家。
系统：Win98se + pws + asp
编程环境：Visual Interdev 6.0
数据库：Access2000 （因为网友问的最多的都是Access2000的问题。）
建一个库：access2000中，先建好一个Test.mdb的数据库。具体有四个字段。
id | text1 | text2 | img
自动编号 文本 文本 OLE对象 ’如果是sql server 则选择(image即可)
三：Are you ready ,Go!!!
3-1.建上传表单：
我们知道，图像与文本是两种不同制式的文件（二进制，流式文本）而如果要同一表单提交的话，(file格式提交)则
我们获取时就不能用原来的方法request.form而必须用equest.TotalBytes来获得所有的提交资料。但这时两种格式的文件
混合在一起比较难分。我的上一贴已经告诉大家用二进制的方法来分开这些资料。但十分麻烦，要用到许多二进值的函
数，所以许多网友来信问我有没有更简单的方法,好。我可以告诉大家，有！而且保证下面的方法保证一学就会。（这种方
法很另类但伟人说过白猫，黑猫。能上网的就是好猫！）
upload.asp(具体代码如下)
<% @ language=vbscript %>
<html>
<head>
<meta name="VI60_defaultClientScript" content="VBScript">
<title> File Upload </title>
<script ID="clientEventHandlersVBS" LANGUAGE="vbscript">
<!--
Sub form2_onsubmit //** 这里是关键，当form2在提交的过程中时，即活form1的提交
form1.submit //**所以我们这里用了两个表单，但只用一个提交就可以了。
End Sub
-->
</script>
</head>
<body>
<form name="form1" ENCTYPE="multipart/form-data" ACTION="upimage.asp" METHOD="POST" target="_blank">
Please choose a picture to upload: <br>
<input NAME="picture" TYPE="FILE"> <br>
</form>
<form name="form2" action="uptext.asp" method="post">
<input type="text" name="text1"><br>
<input type="text" name="text2"><br>
<input type="submit" value="提交">
</form>
</body>
</html>
3-2 兵分两路来处理数据。
首先，文本很简单。
uptext.asp (代码如下)
<% @ language=vbscript %>
<%
strconn="driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("test.mdb")
text1=request.form("text1")
text2=request.form("text2")
response.write text1
response.write text2
set rs=Server.CreateObject("adodb.recordset")
sql="SELECT top 1 * FROM imgtable ORDER BY id DESC" ’这里的意思是选择最后一个Id,既刚刚被改动
rs.Open sql,strconn,1,3 ’就是你上传的图像的两个文本字段。
rs("text1")=text1 ’注意，这里是改动不是添加，所以不用addnew。
rs("text2")=text2
rs.Update
rs.Close
%>
接着，来处理图像。
upimage.asp (具体代码如下)
<%
FormSize = Request.TotalBytes ’得到数据
FormData = Request.BinaryRead( FormSize )
function ImageUp(formsize,formdata) ’这个函数的功能是截取其中的图像部分。
bncrlf=chrb(13) & chrb(10) ’做成函数后。以后你可以自己随意使用了。
divider=leftb(formdata,instrb(formdata,bncrlf)-1)
datastart=instrb(formdata,bncrlf&bncrlf)+4
dataend=instrb(datastart+1,formdata,divider)-datastart
imageup=midb(formdata,datastart,dataend)
end function
Image=ImageUp (FormSize,Formdata) ’这里就是图像部分了。
set rs=server.CreateObject("adodb.recordset")
strconn="driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("test.mdb")
sql="SELECT * FROM imgtable"
rs.Open sql,strconn,1,3
rs.AddNew ’因为表单二在表单一提交的过程中下提交了。
rs("img").appendchunk Image ’所以这里是添加。
rs.Update
rs.Close
response.contenttype="image/gif"
response.binarywrite imageup(formsize,formdata) ’这里是显示图像。表示成功！
%>
啊？！？！原来如此简单！
四：“显示，我要同页显示”
终于完成了图文同步提交。（真的是同步吗？不是吗？是吗？ 唉，我们只是为了解决问题。何必当真哪？不
是 吗？）
现在我们还要让他同页显示出来。其实，这是同样的思路。我们也用两页来完成。
主页面：show.asp
<%@ Language=VBScript %>
<%
strconn="driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("test.mdb")
set rs=Server.CreateObject("adodb.recordset")
sql="SELECT top 1 * FROM imgtable ORDER BY id DESC"
rs.Open sql,strconn,1,3
%>
<html>
<body>
以下是你的上传资料。<br>
文本一：<% Response.Write rs("text1") %><br>
文本二：<% Response.Write rs("text2") %><br>
你的图像：
<img src=showimg.asp?id=<%=rs("id")%>> ’注意这里，这才是关键。他可以实现网页图像与文本
</body> ’共存。
</html>
幕后页面：showimg.asp （说他是幕后的页面，因为他潜伏在主页面里。看上是一个页面一样）
<%@ Language=VBScript %>
<%
strconn="driver={microsoft access driver (*.mdb)};dbq="&server.MapPath("test.mdb")
id=Request("id")
set rs=server.CreateObject("adodb.recordset")
sql="SELECT * FROM imgtable where id="&id
rs.Open sql,strconn,1,3
response.contenttype="image/gif"
Response.BinaryWrite rs("img")
%>
（全文完：希望本文能帮助那些急于想解决本类问题的网友。）
-
等级
本版专家分：0
-
为什么我运行时会出现错误
提示如下:
错误类型：
Microsoft VBScript 运行时错误 (0x800A000D)
类型不匹配: 'imageup'
/fenqiu/uptest/uptext.asp, 第 27 行
说明:第27行的代码如下:
response.binarywrite imageup(formsize,formdata) '这里是显示图像。表示成功！
急求高手帮忙解决!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
万分感谢!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
-
等级
本版专家分：0
-
1
<html>
<body>
<center>
<form name="mainForm" enctype="multipart/form-data" action="process.asp" method=post>
<p><img src="showimg.asp?id=15">
</p>
<p>
<input type=file name=mefile>
<input type=submit name=ok value="上传">
</p>
</form>
</center>
</body>
</html>
2
<%@language="vbscript"%>
<%
response.buffer=true
'取得文件大小
formsize=request.totalbytes 'Request.TotalBytes方法返回从客户端读取到的数据的字节数
'设定上传文件大小,字节为单位.如果图片文件大于51160字节,将返回到图片上传页.并给出错误提示
if formsize>51160 then response.write("上传图片太大!")
formtype=request.ContentType
if formtype<>"jpg" or formtype<>"gif" then response.write("上传的文件格式不对!")
'获取上传的图片数据
formdata=request.binaryread(formsize) 'request.binaryread方法可以获取提交的文件数据
bncrlf=chrB(13)&chrB(10) 'vbCrLf是VB中用于表示“回车换行”的字符串常数（长度为2字节），相当于Chr（10）+Chr（13） 'bncrlf是加车换行的意思 chrb(13) & chrb(10)十六进制表示的回车换行 chr()返回与指定的 ANSI 字符代码相对应的字符。
divider=leftB(formdata,clng(instrb(formdata,bncrlf))-1) '按回车符和换行符的位置，从左取值 left()返回指定数目的从字符串的左边算起的字符。instr()返回某字符串在另一字符串中第一次出现的位置。
datastart=instrB(formdata,bncrlf&bncrlf)+4 '取得数据头 连续的回车符和换行符的位置：+4
dataend=instrB(datastart+1,formdata,divider)-datastart '取得数据尾
mydata=midB(formdata,datastart,dataend) '得到图片数据 mid()从字符串中返回指定数目的字符。
'建立同数据库联接
set conn=server.CreateObject("ADODB.connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("images.mdb")
conn.Open connstr
set rec=server.createobject("adodb.recordset")
sql="select * from images"
rec.open sql,conn,1,3
'判断是否曾经上传过相片,如果上传过就更改相片,否则就添加到数据库中
rec.addnew
rec("img").appendchunk mydata 'appendchunk用于向一域内添加大块的二进制或字符数据
rec.update
rec.close
set rec=nothing
set conn=nothing
response.redirect"upload.asp"
%>
3
<%
set conn=server.CreateObject("ADODB.connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("images.mdb")
conn.Open connstr
set rs=server.createobject("ADODB.recordset")
strsql="select img from images where id ="&trim(request("id"))
rs.open strsql,conn,1,1
Response.ContentType="image/*" '以便正常显示图片
Response.BinaryWrite rs("img").getChunk(7500000) 'getChunk返回大型文本或二进制数据Field对象的全部或部分内容。
rs.close
set rs=nothing
set conn=nothing
%>
- asp简单文件上传代码(上传任何文件)
asp简单文件上传代码(上传任何文件)"&h&""%>
- ASP.NET MVC 图片上传到服务器
今天在做项目中需要做一个功能是：把个人图片上传到服务器中，并把路径保存到数据库中！自己摸索着做了出来，但不是很完善，先记录下来，后台获取到前端传过来的文件进行上传！后台代码： /// <summary&...
- ASP.NET 上传图片至数据库并读取图片显示--二进制流方式
ASP.NET 上传图片至数据库并读取图片显示–二进制流方式 https://blog.csdn.net/xuxiaokui/article/details/7633453 数据库的字段同样简单： Image_ID int identity(1,1) primarykey not null Image_Content image ...
- ASP.NET控件上传图片
使用asp.net控件上传图片是一种比较简单的方式，直接在后台就可以得到图片流，并对流进行上传操作。
- 简单实现ASP.NET MVC Ajax无刷新上传图片
这里使用到了from.js,可以到官网下载或者从这里下载:http://pan.baidu.com/s/1c2JS60C。 首先在项目中引入jq和from.js 接下来在视图中创建表单 <body> <form id="form1">......
- JS简单实现多图片预览上传
js多张图片异步上传并带预览，此功能使用的地方比较多，就索性自己做了一个，思路为ajax将图片的base64编码传递到服务端进行保存，使用的是ASP.NET及C#，希望能够帮到你。（向立凯）功能描述实现图片预览，预览图片...
- ASP.NET Core 简单实现七牛图片上传（FormData 和 Base64）
七牛图片上传 SDK（.NET 版本）：https://developer.qiniu.com/kodo/sdk/1237/csharpUpoladService示例代码：public class UpoladService : IUpoladService { private readonly static string[] _imageExtensions =...
- asp.net中使用Uploadify插件实现多张图片上传，上传后可显示缩略图、删除图片
2.uploadify插件，到Uploadify官网下载即可，解压后发现有几个php文件，这是官方使用php语言做的一个例子，因为我要在asp.net下使用uplodify插件，所以把这几个php文件删掉了，删除后的目录如下： 我把jquery和...
- ASP代码实现图片上传到数据库中
用ＡＳＰ编写网站应用程序时间长了，难免会遇到各式各样的问题，其中关于如何上传文件到服务器恐怕是遇见最多的问题了，尤其是上传图片，比如你想要在自己的社区里面实现类似网易虚拟社区提供的“每日一星”的功能，...
- 使用ASP.NET上传图片汇总
1 使用标准HTML来进行图片上传前台代码：body> form id="form1" runat="server"> div> table> tr> td colspan="2" style="height: 21px" > 使用标准HTML来进行图片上传td>
- WebUploader图片上传实例
WebUploader 图片上传实例， 三种常用的样式 及 常用逻辑封装
- ASP.NET学习笔记（二）——一般处理程序之图片上传
简单图片上传功能 目标：实现从本地磁盘读取图片文件，展示到浏览器页面。 步骤： (1). 首先创建一个用于上传图片的HTML模板，命名为ImageUpload.html：<!DOCTYPE html> ; charset=utf-8"/> <title></titl
- 最简单的上传图片代码
.aspx.aspx.csprotected void Button1_Click(object sender, EventArgs e) { if (f1.FileName != "") { string file = f1.FileName; //得到文件名 f1.PostedFile.SaveAs(Server.MapPath(
- WebUploader上传图片到后台
最近公司新招一批小伙，他们连上传个图片都不会， 没办法，然后自己只好用webUploader插件写了一个小栗子webUploader的下载链接：http://fex.baidu.com/webuploader/download.html首先，前台js很简单，直接可有copy...
- Asp.Net 开发之图片上传
这里就不说效果图了，因为我会把所有的代码，包括页面代码都贴出来，希望大家理解!首先看一下页面的代码...
- ASP.NET获取微信客户端上传的图片
ASP.NET获取微信客户端上传的图片 本来我以为这个是很简单的事情，后来做了才发现原来使用微信JS-SDK的时候，微信的HTML5客户端不会将图片直接post给我服务端，而是先提交给微信服务器，然后我的服务端需要通过...
- web高拍仪图片上传
使用泽优Web图片上传控件（img2）帮助解决图片手动上传的问题，使用img2后可以自动上传本地路径下面的图片，不需要用户再手动选择图片。 优势： 1.不需要通过AJAX上传BASE64，直接上传本地图片文件...
- ASP.NET Core 上传多文件 超简单教程
示例源码下载地址 ... 项目地址https://dev.tencent.com/u/whuanle/p/asp.netcore_file_upload/attachment 创建应用程序 打开VS 2017 --新建 ASP.NET Co...
- ASP.NET MVC图片文件上传与下载
说明： 前后端代码中均只用到 ASP.NET MVC原生的技术，不需要用到ajax，WebAPI等。 下篇文章【 jQuery + Ajax...ASP.NET MVC最简单的方式是使用表单来POST文件。 前端代码如下： <form action="/B...
- 【ASP】FileUpload上传图片并保存数据库
界面简单粗糙，将就将就，代码复制过去应该可以直接用 前台代码就这点： div class="Upload"> asp:FileUpload ID="FileUpload" runat="server" /> div> asp:...
- 图片批量上传管理系统asp版
要是看不到文章的话，去我的QQ空间看，我的QQ号码：362315062 图片批量上传管理系统asp版 <br /> 本人经过两个多月的艰苦努力，终于将该系统写成了，中间走了很多岔路，不停的修正修改...
- ASP.NET简单实现APP中用户个人头像上传和裁剪
考虑到flash在IOS和Android上的兼容性问题，于是想着能从js这块入手，在网上发现了devotion博主写的《适应各浏览器图片裁剪无刷新上传js插件》文章，从中受到些许启发，以此为参考，进行了简单的修改。 新建一...
- asp简单文件上传源码
文件1.上传界面文件 upload.htm文件上传文件上传： 文件2.保存上传文件 SaveFile.aspdim file,filename,houzuifile = Request.Form("file")if file="" then response.write"alert(请选择要
- 使用ASP.NET上传图片汇总1
1 使用标准HTML来进行图片上传 前台代码： 使用标准HTML来进行图片上传
- 在ASP.NET Core中给上传图片功能添加水印
在ASP.NET Core中给上传图片功能添加水印 在传统的.NET框架中，我们给图片添加水印有的是通过HttpModules或者是HttpHandler，然后可以通过以下代码添加水印: var image = new WebImage...
- 基于asp.net + easyui框架，js实现上传图片之前判断图片格式，同时实现预览，兼容各种浏览器+下载
最近在做图片上传的一个前台页面，上传图片功能虽然很简单，但是需要我们学习的地方很多。在上传图片之前验证图片的格式，并同时实现预览。这篇博客我们就用一段简单的js代码来实现验证图片格式，并同时预览的功能。...
- 探索Asp.net mvc 的文件上传(由浅入深)
最近因为TeamVideo需要用到视频和图片上传功能，所以试着Google了很多资料，和大家分享下。 1．最基本的文件上传。 在View界面通过Form把数据POST到控制端(Controller)，Controller把文件存储到服务器，再
- Asp.Net Core Web Api图片上传(一)集成MongoDB存储实例教程
Asp.Net Core Web Api图片上传及MongoDB存储实例教程（一） 图片或者文件上传相信大家在开发中应该都会用到吧，有的时候还要对图片生成缩略图。那么如何在Asp.Net Core Web Api实现图片上传存储以及生成缩略图呢？...
- 测试开发笔记
测试开发笔记 第一章 测试基础 7 什么是软件测试： 7 ★软件测试的目的、意义：（怎么做好软件测试） 7 3.软件生命周期： 7 第二章 测试过程 8 1.测试模型 8 H模型： 8 V模型 9 2.内部测试 10 ...