www.gusucode.com > 中网景企业网站源码时尚版 2009.73码程序 > common/favorite.asp

    <!--#include file="../opendb.asp" -->

<%
if username="" then call alertmsgc("请先登录！\n Please Login")
dim t,u,a,chksame
t=sqlchkchar(Request.QueryString("t"))
u=sqlchkchar(Request.QueryString("u"))
a=sqlchkchar(Request.QueryString("action"))

if a="add" then
set chksame=conn.execute("select count(*) from Cnk_webFavorite where Title='"&t&"' and Url='"&u&"'")
if chksame(0)>0 then call alertmsgc("您已经收藏了!\n It is existent")
conn.execute("insert into Cnk_webFavorite (userid,username,title,url) values ("&userid&",'"&username&"','"&t&"','"&u&"')")
call alertmsgc("收藏成功!\n It is OK")
end if
%>