---
title: "hjälp med update kod"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/86537-hjälp-med-update-kod"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "voigtann1"
published: "2003-09-21T08:10:30.000Z"
updated: "2003-09-21T12:40:33.000Z"
replies: 4
views: 236
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/86537-hjälp-med-update-kod"
---

# hjälp med update kod

## #1 — voigtann1, 2003-09-21T08:10Z

```
<!-- #include file="database.asp" -->
<form name="vbform" action="show.asp?skickat=japp" method=post>
<%
arrLinks = GetRows("SELECT pID,sub_dir,name,finish,progress FROM [progress]")
intGrpId = 0 
	
Call LinkTree(intGrpId,0)

Sub LinkTree(intParent,intIndent) : Dim X,Z
  For X = 0 To Ubound(arrLinks,2)		
    If arrLinks(1,X) = intParent Then
      strIndent=""
      For Z = 1 To intIndent : strIndent = strIndent & "--" : Next
        if arrLinks(3,X) = true then
          check = "checked"
        else
          check = ""
        end if

        if arrLinks(4,x) = 0 then
          Response.Write(strIndent&" "&arrLinks(2,X)&"<br>"&VbCrlf)
        else
          Response.Write(strIndent&" "&arrLinks(2,X)&"<input type='checkbox' name='ID' value='"& arrlinks(0,x) &"' "&check&"><br>"&VbCrlf)
        end if

      Call LinkTree(arrLinks(0,X),intIndent + 1)			
    End If
  Next 
End Sub

Function GetRows(ByVal SQL)
  Dim arrRecords, rs	
  Set rs = databas.Execute(SQL)
    If Not rs.BOF Or Not rs.EOF Then
      arrRecords = rs.GetRows()
    ELSE
      arrRecords = ""
    End If		
  rs.Close
  Set rs = nothing
  GetRows = arrRecords 
End Function
%><input type=submit></form>
[b]<%if request.querystring("skickat") = "japp" then
for each id in Request.Form("id")
  sql = "update progress set finish "&len(Request.Form("id"))&" where table where id = " & id
  set rs = Conn.execute(sql)
next
end if
%>[/b]
```

Hur gör man egentligen för att uppdatera rätt ID?

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

## #2 — mozilla, 2003-09-21T08:41Z

Hur menar du med rätt? Men för det första har du inget "=" tecken efter finish och så har du två where's?

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

## #3 — voigtann1, 2003-09-21T12:21Z

själva koden jag undra över hur vet man att rätt IDs finish blir true

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

## #4 — @nders, 2003-09-21T12:35Z

...set finish=true where id = " & id 

Eller? Jag förstår inte riktigt vad du är ute efter. Vad är det som inte fungerar om du gör så?

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

## #5 — solbulle, 2003-09-21T12:40Z

Jag vet då inte riktigt hur du skriver egentligen...

> själva koden jag undra över hur vet man att rätt IDs finish blir true

I request.form("id") ska du ha de Id som är true, de andra följer ej med.

Så typ detta skulle kunna fungera:

```
<%
if request.querystring("skickat") = "japp" then
	sql = "update progress set finish=TRUE WHERE id IN ("&Request.Form("id")& ") "
	Conn.execute(sql)
end if
%>
```

Bortsett från table som du har i din orginalkod, vad det nu är?

red./ lite sen kanske...

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/86537-hjälp-med-update-kod
