📄 userlike.asp
字号:
<%qx="09"%>
<!--#include file="0.asp"-->
<!--#include file="../../conn/conn.asp"-->
<!--#include file="../../conn/nosql.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../../css/css.css" rel="stylesheet" type="text/css">
</head>
<body>
<form action="?x=b" method="post" name="myform" id="form">
<table width="450" border="0" align="center" cellpadding="0" cellspacing="1">
<tr valign="middle" bgcolor="#CCCCCC">
<td height="25" colspan="2"> <font color="#FF3333"><strong>>>添加友情店铺</strong></font></td>
</tr>
<tr valign="middle" bgcolor="#f1f1f1">
<td height="25" align="center">连接名称</td>
<td height="25"> <input name="mc" type="text" class="wenbenkuang" id="mc" size="55"></td>
</tr>
<tr valign="middle" bgcolor="#f1f1f1">
<td width="100" height="25" align="center">连接URL</td>
<td height="25"> <input name="url" type="text" class="wenbenkuang" id="url" value="http://" size="35">
<select name="css" class="wenbenkuang" id="css">
<option value="" selected>默认连接颜色</option>
<option style="background-color:#ff0000;color: #ff0000" value="#ff0000">#ff0000</option>
<option style="background-color:#0000FF;color: #0000FF" value="#0000FF">#0000FF</option>
<option style="background-color:#8A2BE2;color: #8A2BE2" value="#8A2BE2">#8A2BE2</option>
<option style="background-color:#A52A2A;color: #A52A2A" value="#A52A2A">#A52A2A</option>
<option style="background-color:#DEB887;color: #DEB887" value="#DEB887">#DEB887</option>
<option style="background-color:#5F9EA0;color: #5F9EA0" value="#5F9EA0">#5F9EA0</option>
<option style="background-color:#D2691E;color: #D2691E" value="#D2691E">#D2691E</option>
<option style="background-color:#FF7F50;color: #FF7F50" value="#FF7F50">#FF7F50</option>
<option style="background-color:#6495ED;color: #6495ED" value="#6495ED">#6495ED</option>
<option style="background-color:#DC143C;color: #DC143C" value="#DC143C">#DC143C</option>
<option style="background-color:#00008B;color: #00008B" value="#00008B">#00008B</option>
<option style="background-color:#008B8B;color: #008B8B" value="#008B8B">#008B8B</option>
<option style="background-color:#B8860B;color: #B8860B" value="#B8860B">#B8860B</option>
<option style="background-color:#006400;color: #006400" value="#006400">#006400</option>
<option style="background-color:#BDB76B;color: #BDB76B" value="#BDB76B">#BDB76B</option>
<option style="background-color:#8B008B;color: #8B008B" value="#8B008B">#8B008B</option>
<option style="background-color:#556B2F;color: #556B2F" value="#556B2F">#556B2F</option>
<option style="background-color:#FF8C00;color: #FF8C00" value="#FF8C00">#FF8C00</option>
<option style="background-color:#9932CC;color: #9932CC" value="#9932CC">#9932CC</option>
<option style="background-color:#8B0000;color: #8B0000" value="#8B0000">#8B0000</option>
<option style="background-color:#E9967A;color: #E9967A" value="#E9967A">#E9967A</option>
<option style="background-color:#483D8B;color: #483D8B" value="#483D8B">#483D8B</option>
<option style="background-color:#2F4F4F;color: #2F4F4F" value="#2F4F4F">#2F4F4F</option>
<option style="background-color:#9400D3;color: #9400D3" value="#9400D3">#9400D3</option>
<option style="background-color:#FF1493;color: #FF1493" value="#FF1493">#FF1493</option>
<option style="background-color:#00BFFF;color: #00BFFF" value="#00BFFF">#00BFFF</option>
<option style="background-color:#696969;color: #696969" value="#696969">#696969</option>
<option style="background-color:#1E90FF;color: #1E90FF" value="#1E90FF">#1E90FF</option>
<option style="background-color:#B22222;color: #B22222" value="#B22222">#B22222</option>
<option style="background-color:#228B22;color: #228B22" value="#228B22">#228B22</option>
<option style="background-color:#FF00FF;color: #FF00FF" value="#FF00FF">#FF00FF</option>
<option style="background-color:#DAA520;color: #DAA520" value="#DAA520">#DAA520</option>
<option style="background-color:#808080;color: #808080" value="#808080">#808080</option>
<option style="background-color:#008000;color: #008000" value="#008000">#008000</option>
</select></td>
</tr>
<tr valign="middle" bgcolor="#f1f1f1">
<td width="100" height="25" align="center"> </td>
<td height="25"> <input name="Submit3" type="submit" class="go-wenbenkuang" value="提交">
<%set rs1 = conn.execute("select * from user_name where name='"&nosql(session("www.wygk.cn"))&"'")
id=rs1("id")
%> <input name="userid" type="hidden" id="userid" value="<%=id%>">
</td>
</tr>
</table>
</form>
<table width="590" align="center">
<tr align="center">
<td width="50" bgcolor="#CCCCCC">显示</td>
<td bgcolor="#CCCCCC">连接名称</td>
<td width="120" bgcolor="#CCCCCC">连接URL</td>
<td bgcolor="#CCCCCC">删除</td>
</tr>
<% set rs = conn.execute("select * from user_like where userid="&id&"")
i=1
do while not rs.eof%>
<form name="form1" method="post" action="?x=a">
<tr>
<td width="50" align="center" bgcolor="#f1f1f1"><%=i%>
<input name="id" type="hidden" id="id" value="<%=rs("id")%>"></td>
<td bgcolor="#f1f1f1">
<input name="mc" type="text" class="wenbenkuang" id="tp" size="45" value="<%=rs("mc")%>"> </td>
<td width="120" bgcolor="#f1f1f1"> <strong>
<input name="url" type="text" class="wenbenkuang" id="url" value="<%=rs("url")%>" size="25">
</strong></td>
<td align="center" bgcolor="#f1f1f1"> <input name="Submit2" type="button" class="go-wenbenkuang" value="删除" onClick="window.location='?x=c&id=<%=rs("id")%>'"></td>
</tr>
</form>
<%i=i+1
rs.movenext
loop
rs.close%>
</table>
</body>
</html>
<%Select case request("x")
case "a"
conn.execute("Update user_like set mc= '"&replace(request("mc"),"'","")&"',url = '"&request("url")&"' where id="&request("id")&"")
Response.redirect "?"
case "b"
if request("css")<>"" then mc="<font color="&request("css")&">"&request("mc")&"</font>" else mc=request("mc")
Set s= Server.CreateObject("abodb.recordset")
conn.execute("Insert into user_like(mc,url,userid)values('"&mc&"','"&request("url")&"','"&id&"')")
Response.redirect "?"
case "c"
conn.execute("Delete user_like where id="&request("id")&"")
Response.redirect "?"
End Select
conn.close
set conn=nothing
set s=nothing%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -