<% id=request.querystring("id") conn = strAdminProvider sqlstmt = "select * FROM business_meeting_point WHERE id=" & id response.write sqlstmt Set rs=Server.CreateObject("ADODB.Recordset") rs.open sqlstmt, conn if rs.eof then response.write "
" response.write client_prev_deleted & "
" response.write "" & d_retour & "" response.write "
" response.End end if %>
<% =client_delete %> <% =rs("nombre") & " " & rs("apellidos")%> <% =client_delete2 %>
<% if request.querystring("want_to_delete")="yes" then ' ohne das geht's komischerweise nicht response.write("") ' collect input parameters ' database connection conn = strAdminProvider sqlstmt = "delete from business_meeting_point WHERE id=" & id ' 'response.write sqlstmt Set rs=Server.CreateObject("ADODB.Recordset") rs.open sqlstmt, conn end if %> <% if request.querystring("want_to_delete")="yes" then %>
 <% =delete_client3 %>  


<% =client_deleted %><% =d_retour %>
<% end if %>