28,391
社区成员
发帖
与我相关
我的任务
分享
<form action="index.asp" method="post" enctype="multipart/form-data" >
<input name="a" type="text" /><br />
<input name="b" type="file" /><br />
<input type="submit" />
</form>
<%
dim st,tot,fstream
tot=request.TotalBytes
st=request.BinaryRead(tot)
if tot>0 then
'response.BinaryWrite(st)
set fstream=server.CreateObject("adodb.stream")
fstream.type=1
fstream.mode=3
fstream.open
fstream.write st
'fstream.loadfromfile "D:/my web/_a/upload_t/1.jpg"
response.BinaryWrite fstream.read
end if
%>
<form action="index.asp" method="post" enctype="multipart/form-data" >
<input name="a" type="text" /><br />
<input name="b" type="file" /><br />
<input type="submit" />
</form>
<%
dim st,tot,fstream
tot=request.TotalBytes
st=request.BinaryRead(tot)
if tot>0 then
'response.BinaryWrite(st)
set fstream=server.CreateObject("adodb.stream")
fstream.type=1
fstream.mode=3
fstream.open
fstream.write st
'fstream.loadfromfile "D:/my web/_a/upload_t/1.jpg"
response.BinaryWrite fstream.read
end if
%>