📄 admin_index_editsave.asp

📁 完整的网址站
💻 ASP
字号:
<!--#include file="config.asp"-->
<%
dim founderr,errmsg
founderr=false
errmsg=""
if session("adminlogin")<>sessionvar then
  founderr=true
  errmsg=errmsg+"<br>"+"<li>你尚未登录，或者超时了！请<a href='index.asp'>重新登录</a>！"
  call diserror()
  response.end
end if
  if session("flag")>1 then
  errmsg=errmsg+"<br>"+"<li>你的管理权限不够！！</a>！"
  call diserror()
  response.end
  end if
	id=Request("id")
	if trim(Request("web"))="" then
  		response.write"<SCRIPT language=JavaScript>alert('站点名称不能为空！');"
		response.write"javascript:history.go(-1)</SCRIPT>"
		response.end
	else
		web=trim(Request("web"))
	end if
	if trim(Request("url"))="" then
  		response.write"<SCRIPT language=JavaScript>alert('站点地址不能为空！');"
		response.write"javascript:history.go(-1)</SCRIPT>"
		response.end
	else
		url=trim(Request("url"))
		if right(url,1)="/" then url=left(url,len(url)-1)
	end if
	if Request("sort")="" then
  		response.write"<SCRIPT language=JavaScript>alert('站点分类不能为空！');"
		response.write"javascript:history.go(-1)</SCRIPT>"
		response.end
	else
		sort=trim(Request("sort"))
	end if
	
	if Request("shuju")="2" and trim(Request("txtcontent"))="" then
   		response.write"<SCRIPT language=JavaScript>alert('站点内容描述不能为空！');"
		response.write"javascript:history.go(-1)</SCRIPT>"
		response.end
	else
		content=trim(Request("txtcontent"))
	end if
    
    
	dim sql
	dim rs		
	if Request("shuju")="1" then		
			
		set rs=server.createobject("adodb.recordset")
		sql="select * from happywz_WEB where wwwid="&id
		rs.open sql,conn,1,2
		rs("wwwsort")=sort
		rs("wwwweb")=web
		rs("wwwurl")=url
		rs("addtime")=now()
		rs.update
		rs.close
		set rs=nothing
	
    	elseif Request("shuju")="2" then
	
		set rs=server.createobject("adodb.recordset")
		sql="select * from happywz_WEBURL where id="&id
		rs.open sql,conn,1,2
		rs("sort")=sort
		rs("lang")=lang
		rs("web")=web
		rs("url")=url
		rs("info")=content
		rs("adate")=now()
		rs.update
		rs.close
		set rs=nothing
	end if
	
	
	conn.close
	set conn=nothing
%>

<html>
<head>
<title> - 网址登陆</title> <LINK REL="stylesheet" HREF="css.css" TYPE="text/css">
</head>
<body topmargin="0" LEFTMARGIN="0">
<TABLE WIDTH="99%" BORDER="0" CELLPADDING="2" CELLSPACING="1" BGCOLOR="#0099CF" > 
<TR BGCOLOR="#0099CF"> <TD HEIGHT="22" COLSPAN="2" ALIGN="center"><B>站点信息修改</B></TD></TR> 
<TR BGCOLOR="#ffffff"> <TD  WIDTH="70" HEIGHT="30" BGCOLOR=""#0099CF""><B>管理导航：</B></TD><TD  HEIGHT="30">☆<A HREF="Admin_Index.asp">返回用户网址列表</A>　　☆<A HREF="Admin_Html_Index.asp">返回网址库数据列表</A></TD></TR> 
</TABLE><BR><TABLE WIDTH="88%" BORDER="0" CELLSPACING="1" CELLPADDING="3" ALIGN="center" BGCOLOR="#0099CF"> 
<TR BGCOLOR="#0099CF" > <TD CLASS="td1" COLSPAN="2" HEIGHT="25"> <B>站点信息修改成功！</B></TD></TR> 
<TR> <TD CLASS="td1" WIDTH="16%" ALIGN="right" BGCOLOR=""#0099CF"" HEIGHT="26"><B>站点名称：</B></TD><TD CLASS="td1" WIDTH="84%" BGCOLOR="#ffffff"><%=web%></TD></TR> 
<TR> <TD CLASS="td1" WIDTH="16%" ALIGN="right" BGCOLOR=""#0099CF"" HEIGHT="26"><B>站点地址：</B></TD><TD CLASS="td1" WIDTH="84%" BGCOLOR="#ffffff"><%=url%></TD></TR> 
<TR> <TD CLASS="td1" WIDTH="16%" ALIGN="right" BGCOLOR=""#0099CF"" HEIGHT="26"><B>站点分类：</B></TD><TD CLASS="td1" WIDTH="84%" BGCOLOR="#ffffff"><%=sort%></TD></TR> 
<TR> <TD CLASS="td1" WIDTH="16%" ALIGN="right" BGCOLOR=""#0099CF"" HEIGHT="26"><B>站点描述：</B></TD><TD CLASS="td1" WIDTH="84%" BGCOLOR="#ffffff"><%=content%></TD></TR> 
<TR BGCOLOR="#ffffff"> <TD CLASS="td1" COLSPAN="2" ALIGN="center" HEIGHT="30"><%if Request("shuju")=2 then%>［<A HREF="admin_index.asp?sort=<%=sort%>"><FONT COLOR="#006600">返回此类别站点列表</FONT></A>］<%elseif Request("shuju")=1 then%>［<A HREF="admin_html_index.asp?sort=<%=sort%>"><FONT COLOR="#006600">返回此类别站点列表</FONT></A>］<%end if%></TD></TR> 
</TABLE><BR><BR><TABLE WIDTH="99%" BORDER="0" CELLPADDING="2" CELLSPACING="1" BGCOLOR="#0099CF" > 
<TR BGCOLOR="#0099CF"> <TD HEIGHT="22" 
COLSPAN="2" ALIGN="center"><B>操作说明</B></TD></TR> <TR BGCOLOR="#ffffff"> <TD WIDTH="87" HEIGHT="30"><B>操作说明：</B></TD><TD 
HEIGHT="30"><LI>网址库数据修改项目中<FONT COLOR="#FF0000">站点描述</FONT>为非填写项目</TD></TR> </TABLE> 
</body>

  </html>
⌨️ 快捷键说明

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