binaryoutputclient.asp
' Author Philippe Collignon
' Email PhCollignon@email.com
Response.Buffer = TRUE
Response.Clear
byteCount = Request.TotalBytes
RequestBin = Request.BinaryRead(byteCount)
Dim UploadRequest
Set UploadRequest = CreateObject("Scripting.Dictionary")
BuildUploadRequestRequestBin
email = UploadRequest.Item("email").Item("Value")
contentType =UploadRequest.Item("blob").Item("ContentType")
filepathname = UploadRequest.Item("blob").Item("FileName")
filename = Right(filepathname,Len(filepathname)-InstrRev(filepathname,""))
picture = UploadRequest.Item("blob").Item("Value")
Response.ContentType = contentType
Response.binaryWrite picture
%>
<!--#include file="upload.asp"-->
' Author Philippe Collignon
' Email PhCollignon@email.com
Response.Buffer = TRUE
Response.Clear
byteCount = Request.TotalBytes
RequestBin = Request.BinaryRead(byteCount)
Dim UploadRequest
Set UploadRequest = CreateObject("Scripting.Dictionary")
BuildUploadRequestRequestBin
email = UploadRequest.Item("email").Item("Value")
contentType =UploadRequest.Item("blob").Item("ContentType")
filepathname = UploadRequest.Item("blob").Item("FileName")
filename = Right(filepathname,Len(filepathname)-InstrRev(filepathname,""))
picture = UploadRequest.Item("blob").Item("Value")
Response.ContentType = contentType
Response.binaryWrite picture
%>
<!--#include file="upload.asp"-->
-->
===========================================================
用JS+Cookie编写的购物车1(转)
===========================================================
一、商品列表:list.htm
新
新
-->
===========================================================
无组件上传文件(5)(转)
===========================================================
uploadform.htm
<!-- Author Philippe Collignon --> <!-- Email PhCollignon@email.com --> Upload Form Output to client Email : Picture : Binary output to client Email : Picture : Output to file system Email : Picture : 来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/7178747/viewspace-161978/,如需转载,请注明出处,否则将追究法律责任。
请登录后发表评论
登录
全部评论
<%=items[i].createtime%>
<%=items[i].content%> <%if(items[i].items.items.length) { %>
<%for(var j=0;j
<%}%> <%}%>
<%=items[i].items.items[j].createtime%>
<%=items[i].items.items[j].username%> 回复 <%=items[i].items.items[j].tousername%>: <%=items[i].items.items[j].content%>
还有<%=items[i].items.total-5%>条评论
) data-count=1 data-flag=true>点击查看
<%}%>
|
转载于:http://blog.itpub.net/7178747/viewspace-161978/