% id=request("id") Set rs = Server.CreateObject("ADODB.Recordset") sql="select * from T_LeaveWords where id="&id rs.open sql,conn,1,3 rs("public")="True" rs.update rs.close %>