---
title: "sql grunka :)"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/82263-sql-grunka"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "blodigeln"
published: "2003-07-18T10:41:55.000Z"
updated: "2003-07-18T11:54:02.000Z"
replies: 2
views: 163
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/82263-sql-grunka"
---

# sql grunka :)

## #1 — blodigeln, 2003-07-18T10:41Z

hej ! hoppas någon av er därute kan hjälpa mig med denna.

\<table width="100%" border="0" cellspacing="5" cellpadding="0"\>
\<tr\>\<td\>\<font face="arial" size="1"\>Login:\</font\>\</td\>\<td\>\<font face="arial" size="1"\>Acceptad / EJ Acceptad\</font\>\</td\>\</tr\>
\<%
SQL = "SELECT \* FROM login where quote = '0' order by id desc"
set Rs = Databas.Execute(SQL)
do until rs.eof
%\>
  \<tr\>
    \<td\>\<font face="arial" size="1"\>\<%=rs("namn")%\>\<br\>\</font\>\</td\>
    \<td\>\<form name="accepta" action="main.asp?admin=meny&login=accept"\>\<input type="radio" name="\<%=rs("id")%\>" value="1" \<%If rs("quote") = 1 Then Response.Write "checked"%\>\>
    /
    \<input type="radio" name="\<%=rs("id")%\>" value="0" \<%If rs("quote") = 0 Then Response.Write "checked"%\>\>\</td\>
  \</tr\>
\<%
Rs.Movenext
Loop
Databas.Close
Set Databas = Nothing %\>
\<tr\>\<td coolspan="2"\>\<input type="submit" value="Updatera"\>\</td\>\</tr\>
\</table\>\</form\>

raden ovan är den jag använder för att lista alla användarnamn och sedan check grejjor för att acceptera användarene eller inte.. det funkar perfekt men sedan när den ska updatera databasen blir det lite krångel javet inte rinktigt hur det ska vara påden sidan

det jag testa var:
\<% For Each id In Request.Form

If Request.Form(id) = "1" Then
  Conn.Execute("Update login Set quote=1 Where id=" & id)
Else
  Conn.Execute("Update login Set quote=0 Where id=" & id)
End If

Next
Response.Redirect "main.asp?admin=meny&login=accepta" %\>

men det kanske är helt fel

Permalänk: https://www.webforum.nu/p/82263

## #2 — Sebbe, 2003-07-18T11:48Z

**/red** Det blev lite fel. :)
**/red2** Det blev inte alls fel! ;) Här är koden:

```
<%
For Each id In Request.Form 
  If Request.Form(id) = "on" Then 
    Conn.Execute("Update login Set quote=1 Where id=" & id) 
  Else 
    Conn.Execute("Update login Set quote=0 Where id=" & id) 
  End If 
Next 

Response.Redirect "main.asp?admin=meny&login=accepta" %>
```

Permalänk: https://www.webforum.nu/p/1114097

## #3 — doggelito, 2003-07-18T11:54Z

ähh, kan inte heller läsa idag.
tur att jag får semester nu! :)

Permalänk: https://www.webforum.nu/p/1114099

---

Tråden på webben: https://www.webforum.nu/amne/asp/82263-sql-grunka