fodderType = function() {
return $("#fodderTypeSelect")val();
};
//初始化fileinput控件（第一次初始化）
function initFileInput(ctrlName, FileExtensions, fileSize) {
var control = $('#' + ctrlName);
controlfileinput({
language: 'zh', //设置语言
uploadUrl: "/WxMedia/ImageUpload", //上传的地址
allowedFileExtensions: FileExtensions, //接收的文件后缀
showUpload: true, //是否显示上传按钮
showCaption: true, //是否显示标题,
maxFileSize: fileSize 1000, //单位为kb，如果为0表示不限制文件大小
browseClass: "btn btn-primary", //按钮样式
previewFileIcon: "<i class='glyphicon glyphicon-king'></i>",
initialCaption: "请选择上传素材",
uploadExtraData: function(previewId, index) { //额外参数的关键点
var obj = {};
objfodder = fodderType();
consolelog(obj);
return obj;
}
});
}
关键点：
可以看到配置文件中uploadExtraData的参数是一个函数形式，这是一个回调函数，会在上传时调用，读取配置的额外参数。前台：ajax实现，点击上传，确认表单发送到后台，此时ajax做的事情，就是确认表单，这是一个伪ajax ,ajax不能实现文件上传，可以使用一个JS,叫做ajaxfileuploadjs的用法。
后台无非是接收了，没什么好讲（一）准备工作，总共需要4个文件 3个asp文件 uploadasp uploadsaveasp upload_asjobasp 还有一个上传到文件夹uppic （一个文件夹，上传的就传到里面）
（二）uploadasp 这是个上传的表单
代码如下：
Copy code <% ResponseBuffer=True %>
<html>
<head>
<title>上传</title>
</head>
<body background="images/bggif" topmargin="30" style=""><div align="center">
<center>
<table border="1" cellspacing="1" style="border-collapse: collapse" bordercolor="#C0C0C0" width="420" id="AutoNumber69" bgcolor="#F5F5F5">
<tr>
<td width="100%" bgcolor="#F5F5F5" bordercolor="#F5F5F5"><form name="form1" method="post" action="uploadsaveasp" enctype="multipart/form-data">
<p align="center"><span style="font-size: 12px">上传:</span><br>
<br>
<INPUT type="file" class="f11" name="file1" size="23"><br>
<br>
<input type=submit name="submit" value="上 传" class=anniu >
<br>
<br>
<span style="font-size: 12px">文件格式为<font color="#EC5106">gif,jpg,jpeg
</font>
</span></p>
</form>
</td>
</tr>
</table>
</center>
</body>
</html>
代码解释：
(1)<% ResponseBuffer=True %>这是控制缓冲 缺省值为ture
(2)<form name="form1" method="post" action="uploadsaveasp" enctype="multipart/form-data">
这里要注意的是enctype="multipart/form-data" 一定要multipart/form-data 因为我们上传的是 不是文字 类型要与匹配 <%
option explicit
dim conn,DBPath
dim rs,sql
'取得参数id
dim id
id=request("id")
Set conn = ServerCreateObject("ADODBConnection")
DBPath = ServerMapPath("dbmdb")
connOpen "driver={Microsoft Access Driver (mdb)};dbq=" & DBPath
set rs=serverCreateObject("ADODBRecordset")
sql="select from photo where id=" &id
rsopen sql,conn,1,1
'显示
ResponseContentType = "image/jpeg"
ResponseBinaryWrite rs("img")
rsclose
'释放对象
set rs=nothing
set conn=nothing
%>
这是显示一张的的asp源码，相应的地方也应该需要改一改吧
sql="select from photo where id=" &id
这里可能需要修改一下表单名，然后 where id 后面的条件也应该需要改一改
欢迎分享，转载请注明来源：内存溢出
微信扫一扫
支付宝扫一扫
评论列表（0条）