?? bookmark.asp
字號:
<!--#include file="conn.asp"-->
<!--#include file="include/function.asp"-->
<!--#include file="include/setup.asp"-->
<%
dim FromUrl
if isymzc=0 then '是否可以匿名
if UserID="" or UserID=null then
response.write"<SCRIPT language=JavaScript>alert('對不起您還沒登陸，請登陸后再使用！');"
response.write"javascript:location.href='login.asp?toURL=icollect';</SCRIPT>"
response.end
end if
end if
logout=Request.form("logout")
if logout="y" then
Title=Request.form("Title")
FromURL=Request.form("FromURL")
Intro=Request.form("Intro")
Response.Cookies("1zhaiID")=""
end if
%>
<html>
<head>
<title><%=SiteName%>_設計網(wǎng)摘·網(wǎng)絡書簽·收藏夾</title>
<meta http-equiv=content-type content="text/html; charset=gb2312">
<link href="css/css.css" rel="stylesheet" type="text/css" />
<style>
<!--
.border1 {
border-right: #d4d4d4 1px dashed; border-top: #d4d4d4 1px dashed; border-left: #d4d4d4 1px dashed; border-bottom: #d4d4d4 1px dashed
}
body {background-color:#FFFFFF;}
-->
</style>
<script language="javascript">
function selectTag(obj, index)
{
if (document.all.XSort.value.indexOf(obj.options[index].value) < 0)
{
if (obj.options[index].value != "\"0\"")
{
document.all.XSort.value += " " + obj.options[index].value;
}
}
}
</script>
<script language=javascript>
function checkForm(this_form)
{
if (this_form.Title.value == '')
{
alert("標題不能為空, 請重新輸入！");
this_form.Title.focus();
return false;
}
if (this_form.FromURL.value == '')
{
alert("網(wǎng)址不能為空, 請重新輸入！");
this_form.FromURL.focus();
return false;
}
str = this_form.Title.value;
len = str.length;
var tt= "";
if (str != '')
{
var i=0;
do
{
var c = str.substr(i, 1);
if (c != " ")
{
tt += c;
//return false;
}
}while(++i < len);
}
var length=this_form.Title.value.length;
if (this_form.Title.value!="")
{
for(i=0;i<this_form.Title.value.length;i++)
{
if(this_form.Title.value.charCodeAt(i)>255)
{
length++;
}
}
if (length > 100)
{
alert ("標題50個漢字之內，請重新輸入");
this_form.Title.focus();
return false;
}
}
length=this_form.Intro.value.length;
if (this_form.Intro.value!="")
{
for(i=0;i<this_form.Intro.value.length;i++)
{
if(this_form.Intro.value.charCodeAt(i)>2555)
{
length++;
}
}
if (length > 10000)
{
alert ("簡介200個漢字之內，請重新輸入");
this_form.Intro.focus();
return false;
}
}
return true;
}
</script>
<script language="JavaScript">
<!--
var Href,Title,Url,Cento;
<%
if logout<>"y" then
%>
Href=document.location.href;
var re;
re=new RegExp("#t=(.[^&]*)","ig");
if(re.test(Href)){
re.exec(Href);
Title=unescape(RegExp.$1);
}else{
Title="";
}
re=new RegExp("&u=(.[^&]*)","ig");
if(re.test(Href)){
re.exec(Href);
Url=unescape(RegExp.$1);
re=new RegExp("^(.[^#]*)","ig");
if(re.test(Url)){
re.exec(Url);
Url=RegExp.$1;
}
}else{
Url="";
}
re=new RegExp("&c=(.[^&]*)","ig");
if(re.test(Href)){
re.exec(Href);
Cento=unescape(RegExp.$1);
}else{
Cento="";
}
<%
else
%>
Title="<%=Title%>";
Url="<%=FromUrl%>";
Cento="<%=Intro%>";
<%
end if
%>
//-->
</script>
</head>
<body topmargin="0">
<form name="form1" method="POST" action="dzhaiok.asp" onSubmit="return checkForm(this)">
<div align="center" style="border-style:solid; border-color:#B3BDC4; border-width:1px; width:480px;margin-right: auto;
margin-left: auto; padding:0px;">
<table height=20 cellspacing=0 cellpadding=0 width=480 align=center border=0>
<tr>
<td width="15" height="28" valign="middle" bgcolor="#B3BDC4"> </td>
<td bgcolor="#B3BDC4"><b>D摘網(wǎng)</b>-<font color="#FFFFFF">讓我們分享互聯(lián)網(wǎng)一切是如此的快樂和美妙</font></td>
<%
if UserID="" or UserID=null then
%>
<td class='whitetxt' align='right' bgcolor='#B3BDC4'>
</td>
<%
else
%>
<td class='whitetxt' align='right' bgcolor='#B3BDC4'>
</td>
<%
end if
%>
<td nowrap width="50" bgcolor="#B3BDC4"></td>
</tr>
</table>
<table cellspacing=2 cellpadding=2 width=400 align=center border=0>
<input type=hidden name=from>
<tr>
<td width=392 height=35 colspan="2" align=right valign="middle">
<div align="center">
<%
if UserID="" or UserID=null then
%>
<table width=350 height=46 border=0 cellpadding=2 cellspacing=0 class=border1 style="border: 1px solid #000000">
<tr>
<td width=45 align=center bgcolor=#fffdec style="font-size: 12px">
<img src=image/notice.gif width=21 height=22></td>
<td valign=middle bgcolor=#fffdec style="font-size: 12px">
<p style="line-height: 150%"><span class="redfont">您是匿名用戶；若要永久保存網(wǎng)頁，建議您先<br>
<a href="reg265.asp">注冊</a> 已注冊用戶請
<a href="login.asp?toURL=icollect">登錄</a></span></td></tr></table>
<%end if%>
</div>
</td>
</tr>
<tr>
<td align=right width=53 height=35>標題</td>
<td width="339"><input
name=Title id="Title" style="width: 280px" size=40>
<span class="redfont">*</span></td></tr>
<tr>
<td align=right>網(wǎng)址</td>
<td width="339"><input
name=FromURL id="FromURL" style="width: 280px" size=40>
<span class="redfont">*</span></td></tr>
<tr>
<td valign=top align=right>簡介</td>
<td width="339"><textarea name="Intro" cols=39 rows=4 id="Intro" style="width: 280px"></textarea></td></tr>
<tr>
<td align=right> </td>
<td height=20 width="339">選中被收藏網(wǎng)頁的文字，自動加為簡介</td></tr>
<tr>
<td align=right height=23>圖片</td>
<td width="339"><input
name=Img id="Title0" style="width: 280px" size=40></td>
</tr>
<tr>
<td align=right height=23>評分</td>
<td width="339"><select name="Rank"><option value="5">☆☆☆☆☆</option><option value="4">☆☆☆☆</option><option value="3" selected>☆☆☆</option><option value="2">☆☆</option><option value="1">☆</option>
</select><font color="#FF0000">提交圖片地址以便更多的為您推薦！</font></td>
</tr>
<tr>
<td align=right height=23>分類</td>
<td width="339">
<select name="Sort" id="Sort">
<%
set rs=conn.execute("select sortid,SortName from sort order by sortid asc")
do while not rs.eof
%>
<option value=<%=rs("sortid")%>><%=rs("SortName")%></option>
<%
rs.movenext
loop
rs.close
%>
</select>
標簽:<input
name=XSort id="Title1" style="width: 81; height:21" size=40>
<%
if UserID<>"" or UserID<>null then
set rs=server.createobject("adodb.recordset")
sql="select xsort from XSort where UserID='"&UserID&"'"
rs.open sql,conn,1,1
%>
<select class="list1" id="TagSelect" style="WIDTH: 105px" onChange="selectTag(this, this.selectedIndex);" name="TagSelect">
<option value selected>選擇已有標簽</option>
<%do while not rs.eof %>
<option value="<%=rs(0)%>"><%=rs(0)%></option>
<%
rs.movenext
loop
rs.close
%>
</select>
<%end if%>
</td>
</tr>
<tr>
<td valign=bottom align=right></td>
<td width="339">
<input type=radio value=1 name=IsPub checked>
公開(大家都可見) <input
type=radio value=0 name=IsPub>
私有
</td></tr></table>
<input name="logout" type="hidden" value="y">
<script language="JavaScript">
<!--
document.form1.Title.value=Title;
document.form1.FromURL.value=Url;
document.form1.Intro.value=Cento;
//-->
</script>
<table cellspacing=0 cellpadding=2 width=400 align=center border=0>
<tr>
<td height=35 align=center>
<input name="zhai" type="submit" class="button" id="zhai" value="收藏到<%=SiteName%>"></td>
</tr>
<tr align=middle>
<td bgcolor="#E3E8EA">
<table class=border1 cellspacing=0 cellpadding=5 width=100% align=center border=0>
<tr>
<td height="40"
align=left bgcolor=#E3E8EA style="padding-right: 20px; padding-left: 20px">
<table width="100%" height=20
border=0 align=center cellpadding=0 cellspacing=0>
<tr>
<td align=left width=45>
<img src="<%=weblogo%>" width="88" height="31" border="0" class="picborder"></td>
<td align="center"><span class=grayscript2>將保存到</span> <a
href="<%=SiteURL%>"
target=_blank><%=SiteURL%></a></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table></div>
</form>
</body>
</html>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -