shadow76it
20-09-2003, 16:04
Salve a tutti mi sapete dire dove sta l'errore non riesco a cancellare un record.
Eccovi il codice
<%@LANGUAGE="VBSCRIPT"%>
<%
Dim conngen
Set conngen = Server.CreateObject("ADODB.Connection")
conngen.open "dati1","administrator",""
%>
<% Dim id %>
<%
id = request.form("id")
sql_del = "delete from dati where ID='" &id;
Set conngen = conngen.Execute (sql_del)
%>
<html>
<head>
<title>Conferma di avvenuta cancellazione</title>
</head>
<body bgcolor="#000066" text="#FFFF00" leftmargin="30" topmargin="30" marginwidth="30" marginheight="30">
<table width="760" border="0">
<tr>
<td width="166">Attenzione l'utente con ID </td>
<td width="51"><% response.Write(id) %></td>
<td width="529">è stato eliminato</td>
</tr>
<tr>
<td> </td>
<td> </td>
<td> </td>
</tr>
<tr>
<td> </td>
<td> </td>
<td> </td>
</tr>
</table>
</body>
</html>
Grazie a tutti
Eccovi il codice
<%@LANGUAGE="VBSCRIPT"%>
<%
Dim conngen
Set conngen = Server.CreateObject("ADODB.Connection")
conngen.open "dati1","administrator",""
%>
<% Dim id %>
<%
id = request.form("id")
sql_del = "delete from dati where ID='" &id;
Set conngen = conngen.Execute (sql_del)
%>
<html>
<head>
<title>Conferma di avvenuta cancellazione</title>
</head>
<body bgcolor="#000066" text="#FFFF00" leftmargin="30" topmargin="30" marginwidth="30" marginheight="30">
<table width="760" border="0">
<tr>
<td width="166">Attenzione l'utente con ID </td>
<td width="51"><% response.Write(id) %></td>
<td width="529">è stato eliminato</td>
</tr>
<tr>
<td> </td>
<td> </td>
<td> </td>
</tr>
<tr>
<td> </td>
<td> </td>
<td> </td>
</tr>
</table>
</body>
</html>
Grazie a tutti