<%Checklogin()%> <% cid=Request.QueryString("cid") eid=Request.QueryString("eid") If Not isNumeric(cid) or Not isNumeric(eid) Then conn.close Set conn=Nothing response.write "" response.end End If tagvalue=Request.QueryString("tagvalue") tagvalue=unescape(tagvalue) Set Rs=Server.CreateObject("ADODB.RecordSet") Rs.open "Select * from tagTable where customerId="&cid&" and employeeId ="&eid&" and tagName='"&tagvalue&"'",conn,1,3 If not Rs.bof and not Rs.eof Then Rs.Delete Else Rs.addNew Rs("tagName")=tagvalue Rs("employeeId")=eid Rs("customerId")=cid End if Rs.update Rs.close Set Rs=Nothing conn.close Set conn=Nothing %>