仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 743|回复: 7
打印 上一主题 下一主题

[学习教程] ASP编程:纯asp代码完成图片和文本同步上传

[复制链接]
莫相离 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 23:41:38 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
缺点:安全性不是太差了,还行,只要你充分利用系统自带的工具;唯一缺点就是执行效率慢,如何进行网站优化以后,效果会比较好。上传|上传在网上看到一篇文章,经由修正并分离xml,完成图片文本同步上传!
共3文件:upload.htm,uploadtext.asp,uploadimg.asp

创建一access数据库,叫text.mdb,表叫做imgtable
字段有text1,img两个,另有一个递增的id字段.
代码以下:

upload.htm

<html>
<head>
<title>图片文本同步上传</title>
<metaname="dongbao"content="text/html;charset=gb2312"http-e
quiv="Content-Type">
<scriptlanguage="javascript">
<!--hideme
functionupload()
{
varxmlhttp=newActiveXObject("Microsoft.XmlHttp");
vartextcontent="<textcontent><name>"+document.formtext.name.va
lue+"</name></textcontent>";
xmlhttp.Open("POST","uploadtext.asp",false);
xmlhttp.Send(textcontent);
returntrue;
}
//showme-->
</script>
</head>

<body>
<formaction="uploadimg.asp"enctype="multipart/form-data"method
="post"onsubmit="returnupload();">
<inputname="picture"type="file"/>
<inputtype="submit"/>
</form>
<formname="formtext">
<inputname="name"/>
</form>
</body>
</html>


showpicture.asp:

<%@Language=VBScript%>
<%
setconn=server.CreateObject("adodb.connection")
dbpath=server.MapPath("test.mdb")
conn.Open"driver={MicrosoftAccessDriver(*.mdb)};dbq="&dbpath

setxmldom=server.CreateObject("Microsoft.XmlDom")
xmldom.load(request)
name=xmldom.selectsinglenode("//name").text

sql="insertintoimgtable(text1)values("&name&")"
conn.Executesql
%>

uploadimg.asp:

<%@Language=VBScript%>
<%
FormSize=Request.TotalBytes失掉数据
FormData=Request.BinaryRead(FormSize)

functionImageUp(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)
endfunction

Image=ImageUp(FormSize,Formdata)这里就是图象部分了。

setrs=server.CreateObject("adodb.recordset")
strconn="driver={microsoftaccessdriver(*.mdb)};dbq="&server.M
apPath("test.mdb")
sql="SELECT*FROMimgtableorderbyiddesc"
rs.Opensql,strconn,1,3

rs("img").appendchunkImage
rs.Update
rs.Close

response.contenttype="image/gif"
response.binarywriteimageup(formsize,formdata)这里是显现图象。暗示
乐成!
%>
</p>缺点:正版成本价格贵(盗版就不说了)、不够安全,大多数服务器用windows系统,没有linux安全
飘飘悠悠 该用户已被删除
沙发
发表于 2015-1-20 11:13:21 | 只看该作者
那么,ASP.Net有哪些改进呢?
莫相离 该用户已被删除
板凳
 楼主| 发表于 2015-1-29 06:55:31 | 只看该作者
弱类型造成潜在的出错可能:尽管弱数据类型的编程语言使用起来回方便一些,但相对于它所造成的出错几率是远远得不偿失的。
小女巫 该用户已被删除
地板
发表于 2015-2-5 23:44:36 | 只看该作者
如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助:
兰色精灵 该用户已被删除
5#
发表于 2015-2-14 05:59:24 | 只看该作者
另外因为asp需要使用组件,所以了解一点组件的知识(ADODB也是组件)
只想知道 该用户已被删除
6#
发表于 2015-3-4 04:59:41 | 只看该作者
ASP的语言不仅仅只是命令格式差不多,而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的,但他就是完全继承了VB所有的功能。
蒙在股里 该用户已被删除
7#
发表于 2015-3-19 02:57:27 | 只看该作者
不能只是将它停留在纸上谈兵的程度上。
变相怪杰 该用户已被删除
8#
发表于 2015-3-27 06:08:26 | 只看该作者
Session:这个存储跟客户端会话过程的数据,默认20分钟失效
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-30 01:35

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表