5个回答
推荐于2016-08-22
展开全部
(一)准备工作,总共需要4个文件 3个asp文件 upload.asp uploadsave.asp upload_asjob.asp 还有一个图片上传到文件夹uppic (一个文件夹,上传的图片就传到里面)
(二)upload.asp 这是个上传图片的表单
代码如下:
Copy code <% Response.Buffer=True %>
<html>
<head>
<title>图片上传</title>
</head>
<body background="images/bg.gif" topmargin="30" style=""><div align="center">
<center>
<table border="1" cellspacing="1" style="border-collapse: collapse" bordercolor="#C0C0C0" width="420" id="AutoNumber69" bgcolor="#F5F5F5">
<tr>
<td width="100%" bgcolor="#F5F5F5" bordercolor="#F5F5F5"><form name="form1" method="post" action="uploadsave.asp" enctype="multipart/form-data">
<p align="center"><span style="font-size: 12px">图片上传:</span><br>
<br>
<INPUT type="file" class="f11" name="file1" size="23"><br>
<br>
<input type=submit name="submit" value="上 传" class=anniu >
<br>
<br>
<span style="font-size: 12px">文件格式为<font color="#EC5106">*.gif,*.jpg,*.jpeg
</font>
</span></p>
</form>
</td>
</tr>
</table>
</center>
</body>
</html>
代码解释:
(1)<% Response.Buffer=True %>这是控制缓冲 缺省值为ture
(2)<form name="form1" method="post" action="uploadsave.asp" enctype="multipart/form-data">
这里要注意的是enctype="multipart/form-data" 一定要multipart/form-data 因为我们上传的是图片 不是文字 类型要与图片匹配 <%
option explicit
dim conn,DBPath
dim rs,sql
'取得参数id
dim id
id=request("id")
Set conn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("db.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
set rs=server.CreateObject("ADODB.Recordset")
sql="select * from photo where id=" &id
rs.open sql,conn,1,1
'显示图片
Response.ContentType = "image/jpeg"
Response.BinaryWrite rs("img")
rs.close
'释放对象
set rs=nothing
set conn=nothing
%>
这是显示一张的图片的asp源码,相应的地方也应该需要改一改吧
sql="select * from photo where id=" &id
这里可能需要修改一下表单名,然后 where id 后面的条件也应该需要改一改
(二)upload.asp 这是个上传图片的表单
代码如下:
Copy code <% Response.Buffer=True %>
<html>
<head>
<title>图片上传</title>
</head>
<body background="images/bg.gif" topmargin="30" style=""><div align="center">
<center>
<table border="1" cellspacing="1" style="border-collapse: collapse" bordercolor="#C0C0C0" width="420" id="AutoNumber69" bgcolor="#F5F5F5">
<tr>
<td width="100%" bgcolor="#F5F5F5" bordercolor="#F5F5F5"><form name="form1" method="post" action="uploadsave.asp" enctype="multipart/form-data">
<p align="center"><span style="font-size: 12px">图片上传:</span><br>
<br>
<INPUT type="file" class="f11" name="file1" size="23"><br>
<br>
<input type=submit name="submit" value="上 传" class=anniu >
<br>
<br>
<span style="font-size: 12px">文件格式为<font color="#EC5106">*.gif,*.jpg,*.jpeg
</font>
</span></p>
</form>
</td>
</tr>
</table>
</center>
</body>
</html>
代码解释:
(1)<% Response.Buffer=True %>这是控制缓冲 缺省值为ture
(2)<form name="form1" method="post" action="uploadsave.asp" enctype="multipart/form-data">
这里要注意的是enctype="multipart/form-data" 一定要multipart/form-data 因为我们上传的是图片 不是文字 类型要与图片匹配 <%
option explicit
dim conn,DBPath
dim rs,sql
'取得参数id
dim id
id=request("id")
Set conn = Server.CreateObject("ADODB.Connection")
DBPath = Server.MapPath("db.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
set rs=server.CreateObject("ADODB.Recordset")
sql="select * from photo where id=" &id
rs.open sql,conn,1,1
'显示图片
Response.ContentType = "image/jpeg"
Response.BinaryWrite rs("img")
rs.close
'释放对象
set rs=nothing
set conn=nothing
%>
这是显示一张的图片的asp源码,相应的地方也应该需要改一改吧
sql="select * from photo where id=" &id
这里可能需要修改一下表单名,然后 where id 后面的条件也应该需要改一改
2013-07-30
展开全部
你说的让人不明白,到底是你自己的网站还是别人的网站会员管理中心,如果是自己的网站好做,你可以在相应的地方增加一个广告,然后用FTP工具把图片上传到一个文件夹里,在用DW页面工具做一个图片广告代码,把图片地址写在代码里,放在后台的那个广告位里就可以了。 晕,你到底懂不懂啊,不管是什么ASP,HPH,什么动态的,什么静态的,都是一样的。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-07-30
展开全部
上传图片后,将图片地址写入数据库,前台调用地址!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-07-30
展开全部
例如:图片放在你项目中的 image 文件夹下,前台显示的时候 <img src="images/xxx.gif>
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-07-30
展开全部
如果是asp.net我刚好写过一个类似界面!需要的话!+276376191
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询