---
title: "Problem med for loop"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/91910-problem-med-for-loop"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Wiklund!!"
published: "2003-12-04T19:41:04.000Z"
updated: "2003-12-04T20:17:53.000Z"
replies: 3
views: 157
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/91910-problem-med-for-loop"
---

# Problem med for loop

## #1 — Wiklund!!, 2003-12-04T19:41Z

Jag har en tabell med 31 fält i, day1, day2, day3 osv.
Sen har jag den här koden:

```
For X = 1 To DatePart("d",DateSerial(year(now),month(now)+1,0))

response.write "<b>Day "&X&"</b><br>"
response.write "<textarea name=""day"&X&""" cols=""90"" rows=""5"" class=""input3"">"&rs("dayX")&"</textarea>"
response.write "<br><br>"

Next
```

Jag vill ju skriva ut fältet day och sen X. Men vad jag vet så kan man inte lägga ihop ett recordset med en variabel.

Finns det nått annat sätt jag kan göra på?

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

## #2 — Sebbe, 2003-12-04T19:44Z

```
For X = 1 To DatePart("d",DateSerial(year(now),month(now)+1,0))
  response.write "<b>Day "&X&"</b><br>"
  response.write "<textarea name=""day"&X&""" cols=""90"" rows=""5"" class=""input3"">"&rs("day" & X)&"</textarea>"
  response.write "<br><br>"
Next
```

Tror jag nog ska funka. :)

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

## #3 — Wiklund!!, 2003-12-04T19:54Z

Tackar fungerade fint.

Har tyvärr problem med en grej till:

```
For X = 1 To DatePart("d",DateSerial(year(now),month(now)+1,0))

Dayy X = Request.Form("day"&X&"")
Dayy X = replace(Dayy & X, "'", "''")

Connect.Execute "UPDATE happenings SET day & X = '"& Request.Form("day"&X&"") &"'",,128
Next
```

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

## #4 — Sebbe, 2003-12-04T20:17Z

```
For X = 1 To DatePart("d",DateSerial(year(now),month(now)+1,0))
  Connect.Execute "UPDATE happenings SET day" & X & " = '" & Request.Form("day" & X) & "'",,128
Next
```

Är dock inte säker på att det där funkar, om det inte gör det så testa det här:

```
For X = 1 To DatePart("d",DateSerial(year(now),month(now)+1,0))
  Connect.Execute "UPDATE happenings SET day" & X & " = '" & Request.Form(Eval("day" & X)) & "'",,128
Next
```

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/91910-problem-med-for-loop