bh=Request.QueryString("bh")
set rs=server.CreateObject("adodb.recordset")
rs.open "select bh,sl FROM xs WHERE bh in ('" & bh & "') ",conn,1,3
rs("sl")=1
rs.update
rs.close
set rs=nothing
红花
2011年11月 Web 开发大版内专家分月排行榜第一 2009年10月 Web 开发大版内专家分月排行榜第一 2009年9月 Web 开发大版内专家分月排行榜第一 2009年8月 Web 开发大版内专家分月排行榜第一 2009年7月 Web 开发大版内专家分月排行榜第一 2009年6月 Web 开发大版内专家分月排行榜第一 2007年7月 Web 开发大版内专家分月排行榜第一 2007年6月 Web 开发大版内专家分月排行榜第一
1 确定bh的值是 aa','bbb','ccc','ddd 这种形式
2 用UPDATE语句即可 conn.Execute "UPDATE xs SET sl=1 WHERE bh IN (' & bh & ')"
