求教一个asp,添加到百度搜藏，QQ书签

[yefenghome]

在某篇文章的静态页（不支持js）添加超链接，如：

<a href="http://www.xxx.com/add.asp?addto=baidu">添加到百度搜藏</a>

add.asp里的内容怎么写,以下是我自己写的，但是不能用，麻烦高手给看一下，

还有，不知道怎么获取上一页的标题
<%
dim Url,Title,addto
Url = Request.ServerVariables("HTTP_REFERER") '要提取页面的url地址
Title=""

if request.querystring("addto")<>"" then
addto=trim(request("addto"))
end if

if addto="baidu" then
response.write"<script language='javascript' type='text/javascript'>window.open('http://www.google.com/bookmarks/mark?op=add&bkmk='+"&url&"+'&title='+"&title&");</script>"
end if
%>

[as123456789d]

网上有很多代码。。

自已可以写吗？

应该是人家提供给你的一个接口