---
title: "Lägga in värden från 2 fält som tillhör varandra..."
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/116548-lägga-in-värden-från-2-fält-som-tillhör-varandra"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Arre"
published: "2004-11-23T19:56:50.000Z"
updated: "2004-11-25T12:04:04.000Z"
replies: 9
views: 291
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/116548-lägga-in-värden-från-2-fält-som-tillhör-varandra"
---

# Lägga in värden från 2 fält som tillhör varandra...

## #1 — Arre, 2004-11-23T19:56Z

den här kan vara lite klurig...
Har gjort en albumscript där man kan lägga till titel, år och spår.
Spåren har jag gjort så att man skriver in hur många spår albumet har, och när man trycker på "continue" knappen så får man upp det antalet fält som man skrev i föregående formulär (för att skriva spårnamn) plus en textarea för varje spår där man kan skriva in lite övrig info om varje spår :)

Såhär ser koden ut, lite städat:

```
<---- sidan där man väljer antal spår ---->
<form action="addalbums.asp?action=addtracks">
<input type name="antal" size="30" class="form">
<input type="submit" name="Submit" value="continue" onfocus=this.blur()>
</form>
<---- sidan där man sparar spåren ---->
<form method="post" name="addtracks" action="addalbums.asp?action=save">

<%For X = 1 To Request.Form("antal")%>
<input type name="svar<%=X%>" size="30" class="form">
?-------> <textarea name="?"></textarea>
<%Next%>
<input type="submit" value="Create" onfocus=this.blur()>
</form>
```

Problemet är hur man skriver in värdet från textarea ihop med varje spårfält...  

```
If Request.Querystring("action") = "save" Then

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "driver={Microsoft Access Driver (*.mdb)}; DBQ=" & db2

For Each Name In Request.Form
  If Not Request.Form(Name) = "save" Then
    SQL = "Insert Into tracklisting(trackname, tracknumber) Values('"& Request.Form(Name) &"',"& CInt(Replace(Name,"svar","")) &")"
    Conn.Execute(SQL)		
  End If
Next

Conn.Close
Set Conn = nothing

Response.Redirect "addalbums.asp"
End If
```

Puh :D
Hoppas att nån förstår vad jag menar...
Tack på förhand!

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

## #2 — @nders, 2004-11-23T20:00Z

Du är inte så långt ifrån... Det här borde funka:

```
For Each Name In Request.Form
   If Left(Name, 4) = "save" Then
     SQL = "Insert Into tracklisting(trackname, tracknumber) Values('"& Request.Form(Name) &"',"& CInt(Replace(Name,"svar","")) &")"
     Conn.Execute(SQL) 
   End If
Next
```

Det vore najsigt om du använde \[kod\]-taggar till din kod också. ;)

mvh

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

## #3 — Arre, 2004-11-23T20:04Z

Tack för svaret Anders! Tänkte se en grej, följer informationen i varje textarea med då om den ska sparas i ett annat fält (details) i databasen? tex såhär:

```
For Each Name In Request.Form
   If Left(Name, 4) = "save" Then
     SQL = "Insert Into tracklisting(trackname, details, tracknumber) Values('"& Request.Form(Name) &"',"& CInt(Replace(Name,"svar","")) &")"
     Conn.Execute(SQL) 
   End If
Next
```

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

## #4 — magnusfernstrom, 2004-11-23T20:06Z

**\[kod\]-taggarna!**

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

## #5 — Arre, 2004-11-23T20:09Z

ja Magnus?

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

## #6 — magnusfernstrom, 2004-11-23T20:22Z

Använd kod-taggarna när du postar kod.

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

## #7 — Arre, 2004-11-23T20:24Z

Ska komma ihåg det till nästa gång :)

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

## #8 — @nders, 2004-11-24T04:06Z

> Tänkte se en grej, följer informationen i varje textarea med då om den ska sparas i ett annat fält (details) i databasen?

Jag förstår inte riktigt vad du menar. :)

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

## #9 — Arre, 2004-11-25T12:00Z

Textarean som följer med för varje \<%=x%\> ska sparas i ett fält i databasen... vilken kod lagrar denna? kan det se ut som nedan:

```
For Each Name In Request.Form
If Not Request.Form(Name) = "save" Then
     SQL = "Insert Into tracklisting(trackname, details, tracknumber) Values('"& Request.Form(Name) &"','"& Request.Form(Name) &"',"& CInt(Replace(Name,"svar","")) &")"
     Conn.Execute(SQL) 
   End If
Next
```

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

## #10 — OveRRidE, 2004-11-25T12:04Z

> **Arre skrev:**
>
> Ska komma ihåg det till nästa gång :)

 :OO

Jag hjälper dig komma ihåg. ;)

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/116548-lägga-in-värden-från-2-fält-som-tillhör-varandra