<% pid=int(Request.QueryString ("pid")) pshow=int(Request.QueryString ("show")) set rs=server.CreateObject("adodb.recordset") rs.open "select * from tproduct where id="& pid &" " ,conn,1,3 rs("show")=pshow rs.Update rs.Close set rs=nothing response.Redirect "chkpro.asp" %>