标题: [求助]如何读取且连接数据库不同表中的网址 [打印本页] 作者: 若叶花吹雪 时间: 2010-1-17 08:08 标题: [求助]如何读取且连接数据库不同表中的网址 <%
ShowSmallClassType=ShowSmallClassType_Article
dim ArticleID
ArticleID=trim(request("ArticleID"))
if ArticleId="" then
response.Redirect("Product.asp")
end if
sql="select * from Product where ArticleID=" & ArticleID & ""
Set rs= Server.CreateObject("ADODB.Recordset")
rs.open sql,conn,1,3
if rs.bof and rs.eof then
response.write"<SCRIPT language=JavaScript>alert('商品已经不存在！');"
response.write"javascript:history.go(-2)</SCRIPT>"
else
rs("Hits")=rs("Hits")+1
rs.update
if rs("hits")>=HitsOfHot then
rs("Hot")=True
rs.update
end if
BigClassName=rs("BigClassName")
SmallClassName=rs("SmallClassName")
Xss=rs("Xss")
%>