8 svar · 394 visningar · startad av Belthor
jag har en sida som loopar upp posterna i en databas, dom är
lagda i en tabell, och det finns en knapp för varje loop som körs för att kunna ta bort den posten.
Jag satt en räknare med i databasen så att varje post får en unik identitet.
Problemet jag har är att när jag trycker på en av knapparna så skickar den med värdet i alla loopar. Hur gör jag för att den ska få värdet i just den loopen med skickat?
Mvh
Tommy
meddelande.asp
Do until RecSet.EOF
%>
<body background="../Bilder/grainblue.jpg">
<form method="post" action="delmed.asp">
<table border="1" bordercolor="black" bgcolor="#FFFFFF">
<tr>
<td width="300" align="center"><b><%=RecSet("datum")%></b></td>
<td width="300"><%=RecSet("namn")%></td>
<td width="300"><%=RecSet("foretag")%></td>
<td><a href="mailto:<%=RecSet("email")%>"><%=RecSet("email")%></a></td>
<td width="300"><%=RecSet("meddelande")%></td>
<input type="hidden" value="<%=RecSet("namn")%>" name="namn">
<input type="hidden" value="<%=RecSet("raknare")%>" name="raknare">
<td width="300" align="right"><input type="submit" value="Ta Bort" width="5"></td>
</tr>
</table>
<%
RecSet.movenext
loop
RecSet.Close
%>
</form>
delmed.asp
<%
namn = request.Form("namn")
raknare = request.Form("raknare")
Tabort= "SELECT * FROM kontakt WHERE namn = '" & namn & "' AND raknare = " &raknare
RecSet.Open Tabort, Connect, adOpenStatic, adLockOptimistic
RecSet.Delete
RecSet("raknare") = raknare
RecSet.Update
RecSet.Close
%>
vad får du om du skriver
[red]
response.Write request.Form("raknare")
response.End
[/red]
högst upp i delmed.asp
mv icaaq
Då räknar den upp numrena på alla inläggen
Sen hade jag bytt ut din kod i just delmed mot denna
[red]
<%
raknare = request.Form("raknare")
strSql = "DELETE FROM kontakt WHERE raknare = "&raknare
Connect.Execute(strSql),,128
Connect.Close
Set Connect = nothing
%>
[/red]
mv icaaq
jag får då detta felmeddelande:
Kompileringsfel i Microsoft VBScript (0x800A0401)
Slut på programsats förväntas.
/HydroSwede/adm/delmed.asp, line 6, column 16
strSql = DELETE FROM kontakt WHERE raknare =
"&raknare
---------------^
Jag hade bytt ut din submit-knapp till en button:
[red]
<input type="button" value="Ta Bort" width="5" onclick="window.location.href='delmed?id=<%=RecSet("raknare")%>';">
[/red]
och sedan
[red]
id = request.QueryString("id)
strSql = "DELETE FROM kontakt WHERE raknare = "&id
Connect.Execute(strSql),,128
Connect.Close
Set Connect = nothing
[/red]
nu då ;)
Efter en liten mix av din och min gamla kod fick jag till det, tack så mycket för hjälpen. :)