uploadimg.asp

来自「asp的新闻网站」· ASP 代码 · 共 47 行

ASP
47 行
字号 
<!--#include file="../include/checkserver.asp" -->
<!--#include file="../include/checkuser.asp" -->
<!--#include file="../include/myip.asp"-->
<html>
<head>
<script language="JavaScript">
	function See(hh,ff) {
		if (ff.value==''){
		alert('请选择图片！');
		return (false);}
		hh.src = ff.value
	}
	function check(form1) {
		if (form1.UploadFormName.value==''){
		alert('请选择图片！');
		return (false);}
	}
</Script>
</head>


<body bgcolor=#FFFFE0>
<p align=center>上传图片  
<form name=f1 enctype=multipart/form-data action="SavePic.asp?infoid=<%=request("infoid")%>&menuid=<%=request("menuid")%>&smallpic=<%=request("smallpic")%>&bigpic=<%=request("bigpic")%>&flag=<%=request("flag")%>" method=post onsubmit="return check(this);">  
<p>小图片：<input type="file" id=UploadFormName name=UploadFormName readonly>  
<input type=button name=b value=预览 onClick="See(this.form.picview,this.form.UploadFormName)">
<p><input type=submit name=upfile value=上传>&nbsp;&nbsp;<a href="uploadimgbig.asp?infoid=<%=request("infoid")%>&menuid=<%=request("menuid")%>&bigpic=<%=request("bigpic")%>&flag=<%=request("flag")%>">修改大图片</a>&nbsp;&nbsp; 
<% 'flag 标识位 1--添加专题  2--添加新闻  3--修改/删除专题 4--修改/删除新闻 %> 
<%select case request("flag")  %>
<% case 1 %>
&nbsp;&nbsp;<a href="add_subject.asp?menuid=<%=request("menuid")%>">添加下一条专题</a>
<% case 2 %>
&nbsp;&nbsp;<a href="add_news_3.asp?infoid=<%=(left(request("infoid"),8)&"0000")%>&menuid=<%=request("menuid")%>">添加本专题下一条新闻</a>
&nbsp;&nbsp;<a href="add_news_1.asp?menuid=<%=request("menuid")%>">添加其他专题的新闻</a>
<% case 3 %>
&nbsp;&nbsp;<a href="srch_subject_1.asp?menuid=<%=request("menuid")%>">修改/删除其他专题</a>
<% case 4 %>
&nbsp;&nbsp;<a href="srch_news_1.asp?menuid=<%=request("menuid")%>">修改/删除其他新闻</a>
<%end select%>

<br> 
<p align=center><img src="<%=smallPicUrl%><%=request("smallpic")%>" name=picview Border=0> 
</form> 
</body> 
</html>

uploadimg.asp - 源码说明

本页面展示了「asp的新闻网站」中的 uploadimg.asp 源码文件，采用 ASP 编程语言编写，共 47 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与asp相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?