急需ASP中 上传图片源码？

tulang729 2009-09-20 07:39:13
急急急急急急！
...全文
140 6 打赏 收藏 转发到动态 举报
写回复
用AI写文章
6 条回复
切换为时间正序
请发表友善的回复…
发表回复
tulang729 2009-09-23
  • 打赏
  • 举报
 回复
大家回答 很正确 下次多给点分
qymdf4 2009-09-21
  • 打赏
  • 举报
 回复
百度搜索一下“化境无组件上传”或者“eWebEditor在线编辑器”
ziyuanxian 2009-09-21
  • 打赏
  • 举报
 回复
[Quote=引用 1 楼 dadimamiilove 的回复:]
加我Q~~传你艾恩无组件上传~458012374
[/Quote]支持多文件上传,不错的
王者归来222 2009-09-21
  • 打赏
  • 举报
 回复
用ACCESS数据库的
<!--#include file="check.asp" -->
<!--#include file=conn.asp-->
<%
If Request.querystring("act")="del" then
set rs=server.createobject("ADODB.recordset")
id=Request.form("id")
sql="select * from pic where id="&id
rs.open sql,conn,1,3
rs.delete
rs.update
rs.close
set rs=nothing
response.redirect "sbc-pic.asp?xiangmuID="&request.QueryString("xiangmuID")
End if

If Request.querystring("act")="add" then
set rs=server.createobject("ADODB.recordset")
sql="select * from pic"
rs.open sql,conn,1,3
Rs.AddNew
rs("url")=trim(request.Form("pic1"))
rs("xiangmuID")=request.querystring("xiangmuID")
rs.update
rs.close
set rs=nothing
response.redirect "sbc-pic.asp?xiangmuID="&request.QueryString("xiangmuID")
End if
%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
<script language='javascript' src='images/private.js'></SCRIPT>
<style type="text/css">
<!--
body,td,th {
font-size: 12px;
color: #666666;
}
a:link {
color: #666666;
text-decoration: none;
}
a:visited {
text-decoration: none;
color: #666666;
}
a:hover {
text-decoration: underline;
color: #000000;
}
a:active {
text-decoration: none;
color: #000000;
}
.zone {display:block;float:left;width:12%;height:30px;}
-->
</style></head>

<body>
<table width="95%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
<tr>
<td height="30" align="center" background="images/top-bg.jpg"><img src="images/icon-1.gif" width="7" height="18" align="absmiddle"> 项目信息</td>
</tr>
<tr>
<td bgcolor="#FFFFFF"><%
Set Rs=Server.Createobject("adodb.recordset")
Sql="select * from xiangmu where xiangmuID="&request.querystring("xiangmuID")
Rs.Open Sql,conn,1,1
%>
<table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td colspan="3"> </td>
</tr>
<tr>
<td height="40">单位名称：
<input name="Input3" style="BORDER:1px #000000 solid;"onfocus=this.select(); value="<%=rs("bumenid")%>" size="20" readonly="yes" /></td>
<td>项目名称：
<input name="Input4" style="BORDER:1px #000000 solid;"onfocus=this.select(); value="<%=rs("xiangmuname")%>" size="20" readonly="yes" /></td>
<td>项目编号：
<input name="Input5" style="BORDER:1px #000000 solid;"onfocus=this.select(); value="<%=rs("xiangmubianhao")%>" size="20" readonly="yes" /></td>
</tr>
<tr>
<td height="40">负 责 人：
<input name="Input" style="BORDER:1px #000000 solid;"onfocus=this.select(); value="<%=rs("fuzeren")%>" size="20" readonly="yes" /></td>
<td>联 系 人：
<input name="Input2" style="BORDER:1px #000000 solid;"onfocus=this.select(); value="<%=rs("lianxiren")%>" size="20" readonly="yes" /></td>
<td>联系电话：
<input name="Input6" style="BORDER:1px #000000 solid;"onfocus=this.select(); value="<%=rs("phone")%>" size="20" readonly="yes" /></td>
</tr>

<tr>
<td colspan="3"> </td>
</tr>
</table>
<%
rs.close
set rs=nothing
%></td>
</tr>
</table><br>
<table width="95%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">

<tr>
<td height="30" align="center" background="images/top-bg.jpg"><img src="images/icon-1.gif" width="7" height="18" align="absmiddle"> 管理扫描件</td>
</tr>
<tr>
<td bgcolor="#FFFFFF">
<form action="?act=del&xiangmuID=<%=request.QueryString("xiangmuID")%>" method="post" name="form1">
<%
sql="select * from pic where xiangmuID="&request.QueryString("xiangmuID")
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,1
tu=1
do while not rs.eof
%>
<div class="zone">
<label><input type="radio" name="id" value="<%=rs("id")%>"> <a href="<%=rs("url")%>" title="点击查看" target="_blank">扫描件<%=tu%></a></label>
</div>
<%
tu=tu+1
rs.movenext
loop
rs.close
set rs=nothing
%>
<br>  
<input type="submit" name="Submit" value="删 除">
</form> </td>
</tr>
</table>
<br>
<form name="addNEWS" method="post" action="?act=add&xiangmuID=<%=request.QueryString("xiangmuID")%>">
<table width="95%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
<tr>
<td height="30" align="center" background="images/top-bg.jpg"><img src="images/icon-1.gif" width="7" height="18" align="absmiddle"> 上传扫描件</td>
</tr>
<tr>
<td bgcolor="#FFFFFF"><table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td colspan="3"> </td>
</tr>
<tr>
<td height="40" colspan="3">扫描件：
<input name="pic1" id="pic1" size="35">
 
<iframe ID="UploadFiles" src="upload_Photo.asp?PhotoUrlID=6" frameborder=0 scrolling=no width="350" height="25" name="I1" marginwidth="1" marginheight="1"></iframe></td>
</tr>
<tr>
<td height="40" colspan="3" align="center"><input type="image" src="images/submit.gif"></td>
</tr>
<tr>
<td colspan="3"> </td>
</tr>
</table>
</td>
</tr>
</table>
</form>
<br>
<center>
</center>
</body>
</html>
fadfayger 2009-09-20
  • 打赏
  • 举报
 回复
试试这个，无组件上传，里面有好几种的http://www.asp300.com/View/10/28639.html
Dadimamiilove 2009-09-20
  • 打赏
  • 举报
 回复
加我Q~~传你艾恩德无组件上传~458012374
C#旅游网站源码ASP.NET
以前学习ASP.NET时开发的网站，按照传智播客ASP.NET教程现学现卖，具备基本的旅游线路管理和展示功能，界面还比较漂亮,源码完整供参考。因为经常要下参考代码，急需积分，第一次上传项目源码，望支持！
分享音乐 v2.5.rar
注意：为了安全使用前请先修改数据库名字，并相应的修改Connections和admin中的conn.asp文件（注意：admin中的conn.asp文件和Connections中的路径的区别） 后台地址：admin/login.asp 默认密码：admin/admin
毕业设计精品课之ASP.NET早教互动平台源码实战讲解
本套课程将对ASP.NET早教互动平台毕业设计源码进行讲解，分析该源码的设计思路和实现方式，并对源码中的代码进行注释和讲解，该源码界面布局美观，代码思路清晰，该课程可以作为早教互动平台和幼儿园早教网站类毕业...
分享音乐 v2.0.rar
要是不做了简直太对不起众位朋友，于是花了些时间完善了下加了些急需的功能。 改进的地方： 1、增加了管理员密码修改功能（说起来挺不好意思的，第一个版本甚至连这个功能都没做） 2、增加了审核功能（后台...
asp.net+sqlserver智能制造业ERP系统-计算机毕业设计源码89973
为提高企业的管理效率，向管理要效益，同时摆脱企业管理人员在工作中出现的种种弊端，现急需开发一套智能制造业ERP系统。 ERP发展现状 目前来看，ERP在中国的发展是非常迅速的。随着各行各业的发展，它们对生产制造...
ASP

28,391

社区成员

357,060

社区内容

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages，是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今

加载中

查看更多榜单
社区公告
暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章