ASP程序图片以二进制流的形式存入oracle数据库实例.docx
- 文档编号:30680547
- 上传时间:2023-08-19
- 格式:DOCX
- 页数:17
- 大小:308.02KB
ASP程序图片以二进制流的形式存入oracle数据库实例.docx
《ASP程序图片以二进制流的形式存入oracle数据库实例.docx》由会员分享,可在线阅读,更多相关《ASP程序图片以二进制流的形式存入oracle数据库实例.docx(17页珍藏版)》请在冰豆网上搜索。
ASP程序图片以二进制流的形式存入oracle数据库实例
Asp图片以二进制流的形式存入
oracle数据
一、
运行环境与开发语言要求:
1、Win2003操作系统(安装方法省略)
2、IIS6.0(安装方法省略)
Asp网站配置方法如下图:
图1
图2
图3
图4
图5
图6
访问首页方法如下图:
图7
3、Oracles数据库(安装建库方法省略)
创建表,通过SQL语句创建:
图1
图2
二、网站各页面代码如下:
1、连接数据库页面:
conn_oracle.asp
代码如下:
<%
'打开数据库连接
SetConn=Server.CreateObject("ADODB.Connection")
myDSN="Provider=OraOLEDB.Oracle;DataSource=TEST65;UserID=TEST65;PASSWORD=oracle;PersistSecurityInfo=True"
Conn.OpenmyDSN
%>
2、已上传图片展示首页:
default.asp
代码如下:
--#includefile="conn_oracle.asp"-->
<%
dimi,intPage,page,pre,last,filepath
setrs=server.CreateObject("adodb.recordset")
sql="select*frompicorderbyiddesc"'这里是条件和表根据需要自己改
rs.Opensql,conn,3,1
rs.PageSize=6'这里设定每页显示的记录数
pre=true
last=true
page=trim(Request.QueryString("page"))
iflen(page)=0then
intpage=1
pre=false
else
ifcint(page)=<1then
intpage=1
pre=false
else
ifcint(page)>=rs.PageCountthen
intpage=rs.PageCount
last=false
else
intpage=cint(page)
endif
endif
endif
ifnotrs.eofthen
rs.AbsolutePage=intpage
endif
%>
--
.STYLE1{font-size:
13px}
.STYLE2{
font-size:
18px;
font-weight:
bold;
}
-->
<%
j=1
fori=1tors.PageSize
ifrs.EOForrs.BOFthenexitfor
ifj=4then
j=1
%>
<%endif%>
<%
j=j+1
rs.movenext
next
%>
<%ifrs.pagecount>0then%>
<%else%>
<%
endif
%>
page=1">首页| <%ifprethen%> page=<%=intpage-1%>">上页| <%endif%> <%iflastthen%> page=<%=intpage+1%>">下页| <%endif%> page=<%=rs.PageCount%>">尾页|转到第 location=this.options[this.selectedIndex].value;"> <% fori=1tors.PageCount ifi=intpagethen %> page=<%=i%>"selected><%=i%> <%else%> page=<%=i%>"><%=i%> <% endif next %> 页
3、图片上传处理页面up.asp
代码如下:
--#includefile="conn_oracle.asp"-->
functionmysubmit(theform)
{
if(theform.file.value=="")
{
alert("请点击浏览按钮,选择您要上传的jpg或gif文件!
")
theform.file.focus();
return(false);
}
else
{
str=theform.file.value;
strs=str.toLowerCase();
lens=strs.length;
extname=strs.substring(lens-4,lens);
if(extname!
=".jpg"&&extname!
=".gif")
{
alert("请选择jpg或gif文件!
");
return(false);
}
if(theform.pic_name.value=="")
{
alert("请输入名称!
")
theform.pic_name.focus();
return(false);
}
}
return(true);
}
functionform1_Onsubmit()
ifdocument.form1.pic_name.value=""then
form1_onsubmit=false
exitfunction
else
document.form1.action="save.asp?
pic_name="&document.form1.pic_name.value&""
endif
endfunction