% productid=request("pid") Set rstObj=Server.CreateObject("ADODB.Recordset") strSQL="select * from products_data where pro_id = '"&productid&"'" rstObj.Open strSQL,cnnDB,1,3 tonglei=rstObj("pro_muluid") rstObj("pro_dianji")=rstObj("pro_dianji")+1 proname=rstObj("pro_name") titlekey=proname if rstObj("pro_keyword")<>"" then titlekey=proname&","&rstObj("pro_keyword") rstObj.update %>
|
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
||