📄 link_edit.asp

📁 gmaple软件下载系统1.0Beta 具有一下功能: 1.模板功能,前台的呈现更加灵活. 2.支持静态生成,可在动态与静态间随时切换. 3.在静态模式下,可自定义生成目录,生成方式灵活.

💻 ASP

字号:

<!--#include file="admin_include.asp"-->
<%
if request.Form.Count>0 then
	friend_id = request.Form("friend_id")
	friend_title = request.Form("friend_title")	'标题
	friend_url = request.Form("friend_url")		'添加时间
	friend_info = request.Form("friend_info")		'资讯内容
	if friend_info="" then
		friend_info="无介绍"
	end if

	sql="select * from [Link] where friend_title='"& friend_title &"' and friend_id<>"&friend_id
	'debug(sql)
	rs.open sql,conn,1,1
	if not rs.eof then
		rs.close
		call pagend()
		response.Write("友情链接已存在!")
		response.End()
	else
		rs.close
		sql="select * from [Link] where friend_id="&friend_id
		rs.open sql,conn,1,3
			rs("friend_title")=friend_title
			rs("friend_url")=friend_url
			rs("friend_addtime")=Now()
			rs("friend_pic")=session("UploadFile")
			rs("friend_info")=friend_info
		rs.update
		rs.close
		response.Write("修改成功!")
		session("UploadFile")=""
		call pagend()
		response.End()
	end if
elseif request.QueryString.Count>0 then
	link_id = request.QueryString("link_id")
	call CheckNum(link_id)
	sql="select * from [Link] where friend_id="&link_id
	rs.open sql,conn,1,1
	if not rs.eof then
		friend_title=rs("friend_title")
		friend_url=rs("friend_url")
		friend_addtime=rs("friend_addtime")
		friend_info=rs("friend_info")
		friend_pic=rs("friend_pic")
	else
		call ShowErr("参数错误!","1")
	end if
	rs.close
end if
session("UploadFile")=""
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<link href="Css/main.css" rel="stylesheet" type="text/css" />
<script language="javascript" src="../js/jquery.js"></script>
<script language="javascript" src="../js/jquery.form.js"></script>
<script language="javascript" src="../js/Date.js"></script>
<title>活动添加</title>
<script language="javascript">
<!--
function AddClass_Submit(){
	var options = {
		beforeSubmit:   showRequest,
		success:        showResponse
	};
	$("#SoftAddForm").ajaxForm(options);
}
function showRequest(formData,jqForm){
	//return true;
	var obj = document.SoftAddForm;
	if (obj.friend_title.value == ""){
		alert("没有填写链接标题!");
		obj.friend_title.focus();
		return false;
	}
	if (obj.friend_url.value == "" || obj.friend_url.value == "http://"){
		alert("没有填写链接地址!");
		obj.friend_url.focus();
		return false;
	}
//	alert($.param(formData))
//	return false
	return true;
}
function showResponse(Re,statusText){
	alert(Re);
	if (Re.search("成功") >= 0){
		location.href='link.asp';
	}
}

-->
</script>
</head>

<body>
<form action="Link_Edit.asp" id="SoftAddForm" name="SoftAddForm" method="post" onsubmit="return false;">
<input type="hidden" name="friend_id" value="<%=link_id%>" />
<table width="98%" border="1" cellpadding="2" cellspacing="1" bordercolor="#FFFFFF">
  <tr>
    <td colspan="2" class="table_caption">链接编辑</td>
  </tr>
  <tr>
    <td colspan="2" bgcolor="#CCCCCC" class="intro">&nbsp;
    	<a href="Link.asp">链接列表</a>
    </td>
  </tr>
  <tr>
    <td width="25%" class="leftbg">链接名称</td>
    <td class="rightbg">
    	<input type="text" class="TextBox3" name="friend_title" value="<%=friend_title%>" />
    	<span class="tip_red">*</span>
    </td>
  </tr>
  <tr>
    <td width="25%" class="leftbg">链接地址</td>
    <td class="rightbg">
    	<input type="text" class="TextBox3" name="friend_url" value="<%=friend_url%>" />
    	<span class="tip_red">*</span>格式 http://www.163.com
    </td>
  </tr>
  <tr>
    <td class="leftbg">图片</td>
    <td class="rightbg" style="overflow-y:hidden;">
    	<iframe name="ifrName" id="ifrName" src="UploadFile2.asp?ImgSrc=<%=friend_pic%>&id=<%=link_id%>&table=Link&imgUrl=friend_pic&imgId=friend_id" frameborder="0" width="100%" height="100%" onload="document.all['ifrName'].style.height=ifrName.document.body.scrollHeight"></iframe>
    </td>
  </tr>
  <tr>
    <td class="leftbg">介绍</td>
    <td class="rightbg">
    	<textarea name="friend_info" cols="50" rows="8"><%=friend_info%></textarea>
    </td>
  </tr>
  <tr>
    <td colspan="2" class="header text_nor">
    	<input type="submit" class="submitCmd" value="编 辑" onClick="return AddClass_Submit()" />
      <input type="reset" class="submitCmd" value="重 置" id="ResetCmd">
    </td>
  </tr>
</table>
</form>
<%
call pagend
%>
</body>
</html>

💿 文件大小 1025 K

👤 上传用户 ok34090512

📂 所属分类其他

🏷️ 相关标签

#gmaple #Beta #1.0 #软件

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -