ASP编程：纯asp代码完成图片和文本同步上传
缺点:安全性不是太差了，还行，只要你充分利用系统自带的工具;唯一缺点就是执行效率慢，如何进行网站优化以后，效果会比较好。上传|上传在网上看到一篇文章,经由修正并分离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安全 那么，ASP.Net有哪些改进呢？ 弱类型造成潜在的出错可能：尽管弱数据类型的编程语言使用起来回方便一些，但相对于它所造成的出错几率是远远得不偿失的。 如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助: 另外因为asp需要使用组件，所以了解一点组件的知识(ADODB也是组件) ASP的语言不仅仅只是命令格式差不多，而是包含在<%%>之内的命令完全就是VB语法。虽然ASP也是做为单独的一个技术来提出的，但他就是完全继承了VB所有的功能。 不能只是将它停留在纸上谈兵的程度上。 Session:这个存储跟客户端会话过程的数据，默认20分钟失效
页:
[1]