%if request("do")= "del" Then Set MyCmd1 = Server.CreateObject("ADODB.Command") MyCmd1.ActiveConnection = MyConn MyCmd1.CommandText = "UPDATE Forces_Properties SET Deleted = 'yes' WHERE PropertyID = ? " MyCmd1.Parameters.Append MyCmd1.CreateParameter("", 3, 1, , request("id")) Set RSDel = Server.CreateObject("ADODB.RecordSet") RSDel.Open MyCmd1 response.redirect "my-properties.asp" end if %>
Sorry! You have no items for sale.
<%else Do WHILE NOT RSItems.EOF%>£<%=RSItems("Price")%> " onclick="if(!confirm('Are you sure you want to delete this record? It will be removed permanently!')) return false;">![]()
Description :
<%=RSItems("Description")%>