📄 modi_link.asp
字号:
<!--#include file="../../include/db.asp"-->
<!--#include file="../../include/admin_check.asp"-->
<!--#include file="power.asp"-->
<%
Set conn = OpenOrGet_Database("sql_conn")
act = Lcase(request("act"))
other = request("other")
id = request("id")
If act = "mo" Then
'删除图片
If request("forimg") = "del" and request("imgname") <> "" Then
imgname = request("imgname")
source = Server.MapPath(imgname)
Set Fs = Server.CreateObject("Scripting.FileSystemObject")
IF not Fs.FileExists(source) Then
call goback("图片不存在！","")
End if
Fs.DeleteFile source,True
Set Fs = Nothing
Conn.Execute "Update friendlink set linkimage = null where id = '" & id & "'"
call goback("图片已删除！","window.location='edit_link2.asp'")
resposne.end
End If
ModifyLink
End IF
If act = "del" Then
DeleteLink
End If
Sub DeleteLink()
SelectSql = "select * from friendlink where id = '" & id &"'"
Set Rs = Open_Rs(conn,SelectSql)
If Rs.Eof Then
Call goback("该链接不存在","")
End If
If Rs("linkimage") = "" or isnull(rs("linkimage")) or other = "errimg" Then
Conn.Execute "Delete from friendlink where id = '" & id & "'"
call Goback("链接已删除！","window.location='edit_link.asp'")
Response.end
Else
TempName = split(Rs("linkimage"),"/")
ImgName = TempName(UBound(TempName))
source = Server.MapPath("/images/links/"&ImgName)
Set Fs = Server.CreateObject("Scripting.FileSystemObject")
IF not Fs.FileExists(source) Then
Call Goback("","if(confirm('要删除的图片已不存在！\n\n[确定] 删除此链接， [取消] 返回')){window.location='Modi_link.asp?act=del&other=errimg&id="&id&"'}else{window.history.back();}")
Conn.Execute "Delete from friendlink where id = '" & id & "'"
call Goback("链接已删除！","window.location='edit_link.asp'")
End If
Fs.DeleteFile source,True
Set Fs = Nothing
Conn.Execute "Delete from friendlink where id = '" & id & "'"
call Goback("链接已删除！","window.location='edit_link.asp'")
End If
End Sub
Sub ModifyLink()
SelectSql = "select * from friendlink where id = '" & id & "'"
set rs = Open_rs(conn,selectsql)
%>
<html>
<head>
<title>深圳育才一小欢迎您！</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="/include/page.css" type="text/css">
<LINK href="/Include/DatePicker.css" rel=stylesheet type=text/css>
<SCRIPT language=javascript src="/include/DateObject.js"></SCRIPT>
<SCRIPT language=javascript src="/include/DatePicker.js"></SCRIPT>
<SCRIPT language=javascript src="/include/editlib.js"></SCRIPT>
<SCRIPT language=javascript src="/js/pattern.js"></SCRIPT>
</head>
<body >
<table width="1" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td>
<table width="753" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><!--#include file="../../include/admin_banner.inc"--></td>
</tr>
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="1%"> </td>
<td width="99%">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td id="td1"> </td>
</tr>
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="21%" valign="top"><!--#include file="../../include/admin_left.inc"--></td>
<td width="2%" valign="top"> </td>
<td width="77%" height=1 valign="top">
<table width="97%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr valign="top">
<td background="/images/middle/m-bg.gif" width="70">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><img src="/images/border/A01.gif" width="12" height="19"></td>
<td nowrap style="background-image: url('/images/border/A_bg1.gif');padding-top:3px;font-size:12px;" valign="middle">
首页友情链接</td>
<td><img src="/images/border/A02.gif" width="18" height="19"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td><img src="/images/border/01.gif" width="2" height="19"></td>
</tr>
</table>
</td>
<td background="/images/border/Bg1.gif" align="right"><img src="/images/border/02.gif" width="3" height="38"></td>
<td width="6" align="right"><img src="/images/border/04.gif" width="16" height="38"></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td class="bg-left" width="6"><img src="/images/left/l-l.gif" border=0></td>
<td width="100%" class="newsborder" valign="top">
<script langauge=javascript>
function checklinkform()
{
if(Checkblank.test(linkform.link_name.value)){alert("链接文字为空！");linkform.link_name.focus();return false;}
if(linkform.che_image.checked && Checkblank.test(linkform.link_image.value)){alert("没有选择图片！");linkform.link_name.focus();return false;}
if(!CheckHTTP.test(linkform.link_href.value)){alert("链接地址有误！");linkform.link_href.focus();return false;}
}
</script>
<form name="linkform" method="post" action="addlink.asp" onsubmit="return checklinkform()" enctype='multipart/form-data'>
<table border="0" cellspacing="2" cellpadding="2" width="90%" align="center">
<tr>
<td width="7%" align="center">文字：</td>
<td width="75%">
<input type="text" name="link_name" size="14" class="s05" value="<%=rs("linkname")%>">
<input type="hidden" name="id" value="<%=rs("id")%>">
</td>
</tr>
<tr>
<td width="7%" align="center">Logo：</td>
<td width="75%" valign="middle">
<%
if isnull(rs("linkimage")) or rs("linkimage") = "" Then
Response.write "无"
Else
Response.write "<a href='" & rs("linkhref") & "' target='" & rs("linktarget") & "' title='" & rs("linkname") & "'><img src='" & rs("linkimage") & "' border=0 align='absmiddle'></a> <a href='Modi_link.asp?act=Mo&forimg=del&imgname="&rs("linkimage")&"&id="&rs("id")&"'><img src='/images/delete.gif' border=0 align='absmiddle'> 删除图片</a> "
End If
%>
<input type="checkbox" name="che_image" value="1" onClick="image_link()">
更改
<script language="JavaScript">
function image_link()
{
if(linkform.che_image.checked)
{linkform.link_image.disabled = false;
linkform.link_image.style.background='white';
linkform.isimage.value=1;}
else{
linkform.link_image.disabled = true;
linkform.link_image.style.background='#dddddd'
linkform.isimage.value=0;}
}
</script>
<input type="hidden" name="isimage" value="0">
<input type="hidden" name="act" value="mo">
<input type="file" name="link_image" class="s05" disabled size="18" style="background:#dddddd" readonly>
</td>
</tr>
<tr>
<td width="7%" align="center">地址：</td>
<td width="75%">
<input type="text" name="link_href" size="20" class="s05" value="<%=rs("linkhref")%>">
</td>
</tr>
<tr>
<td width="7%" align="center">窗口：</td>
<td width="75%">
<select name="link_target" class="s05" >
<option value="_blank" selected>新窗口</option>
<option value="_self">本窗口</option>
<option value="_parent">父窗口</option>
</select>
</td>
</tr>
<tr>
<td width="7%" align="center"> </td>
<td width="75%"> </td>
</tr>
</table>
<table width="90%" border="0" cellspacing="2" cellpadding="2" align="center">
<tr>
<td width="16%"> </td>
<td width="84%">
<input type="submit" name="Submit" value=" 更新 " class="s03">
<input type="button" name="Submit2" value=" 返回 " onclick="history.back()" class="s02">
</td>
</tr>
</table>
</form>
</td>
<td class="bg_right" width="6"><img src="/images/left/l-r.gif" border=0></td>
</tr>
</table>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr valign="top" class="Border-a">
<td width="6"><img src="/images/border/05.gif" width="13" height="8"></td>
<td width="100%" align="right"></td>
<td align="right" width="6"><img src="/images/border/06.gif" width="12" height="8"></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="13"> </td>
</tr>
<tr>
<td><!--#include file="../../include/dot.inc"--></td>
</tr>
<tr>
<td> </td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html>
<SCRIPT language=javascript>
<!--
function checkform()
{
var Checkblank = /^(\s*|(\ )|(\.))*$/;
if (Checkblank.test(form.username.value))
{
alert("用户名不能为空!");
return false;
}
if (Checkblank.test(form.userpass.value))
{
alert("密码不能为空!");
return false;
}
window.form.submit();
}
function submitdel()
{
var flag=false;
if (isNaN(dataform.select_del.length)&&(!(dataform.select_del.checked))){
flag=false;}
else if(!(isNaN(dataform.select_del.length))){
for (var i=0;i<dataform.select_del.length;i++){
if (dataform.select_del[i].checked==true) flag=true;
}}
else{
flag=true;
}
if ((flag==false)) {alert ('请选择需要删除的项目！');return false;}
if (!(confirm("您是否确定删除选定的记录？")))
{
if (isNaN(dataform.select_del.length)) {dataform.select_del.checked=false;return false;}
for (var i=0;i<dataform.select_del.length;i++) dataform.select_del[i].checked=false;
return false
}
window.dataform.submit();
}
function openwin(filename)
{
//alert(filename);
window.open(filename,"","location=0,menubar=1,left=0,width=700,height=500,");
return;
}
//-->
</SCRIPT>
<%End Sub%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -