---
title: "delimeters inne i delimeters"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/88499-delimeters-inne-i-delimeters"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Pellsater"
published: "2003-10-14T19:02:40.000Z"
updated: "2003-10-16T07:19:27.000Z"
replies: 14
views: 323
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/88499-delimeters-inne-i-delimeters"
---

# delimeters inne i delimeters

## #1 — Pellsater, 2003-10-14T19:02Z

hur gör jag för att få värdet in i 
value=""storleksID""
nedan

får inte till det

PS det kan var flera värden som ska in....

```
<%
sql2 = "SELECT tss.storlek, tss.storleksid from TblStorlekar as tss INNER JOIN tblRelstorlek as TRs ON TSS.StorleksId = TRs.StorleksId WHERE TRs.ProdId = "&pprodid

set rsSt=Server.CreateObject("ADODB.Recordset")
rsSt.Open sql2, conn
if not rsSt.eof then
      Response.Write "<br><font size=""2"" color=""white"">"

      While Not rsSt.EOF
         Response.Write "<input type=""text"" name=""tblStorlek"" size=""3"" class=""thisform"" value=""storleksID"">"
	     Response.Write "<br>"
         rsSt.MoveNext
      Wend

      Response.Write "</font>"
   end if

%>
```

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

## #2 — Sebbe, 2003-10-14T19:05Z

Menar du så här?

```
<%
sql2 = "SELECT tss.storlek, tss.storleksid from TblStorlekar as tss INNER JOIN tblRelstorlek as TRs ON TSS.StorleksId = TRs.StorleksId WHERE TRs.ProdId = "&pprodid

set rsSt=Server.CreateObject("ADODB.Recordset")
rsSt.Open sql2, conn
if not rsSt.eof then
      Response.Write "<br><font size=""2"" color=""white"">"

      While Not rsSt.EOF
         Response.Write "<input type=""text"" name=""tblStorlek"" size=""3"" class=""thisform"" value=""" & rsSt("storleksID") & """>"
	     Response.Write "<br>"
         rsSt.MoveNext
      Wend

      Response.Write "</font>"
   end if

%>
```

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

## #3 — Pellsater, 2003-10-14T19:09Z

japp men skulel behöva i de olika värdena i samma formfält med ett kommatecken emellan

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

## #4 — Sebbe, 2003-10-14T19:11Z

Så här?

```
<%
sql2 = "SELECT tss.storlek, tss.storleksid from TblStorlekar as tss INNER JOIN tblRelstorlek as TRs ON TSS.StorleksId = TRs.StorleksId WHERE TRs.ProdId = "&pprodid

set rsSt=Server.CreateObject("ADODB.Recordset")
rsSt.Open sql2, conn
if not rsSt.eof then
      Response.Write "<br><font size=""2"" color=""white"">"

      While Not rsSt.EOF
         Response.Write "<input type=""text"" name=""tblStorlek"" size=""3"" class=""thisform"" value=""" & rsSt("storleksID") & ", " & objRS("storlek") & """>"
	     Response.Write "<br>"
         rsSt.MoveNext
      Wend

      Response.Write "</font>"
   end if

%>
```

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

## #5 — Pellsater, 2003-10-14T19:15Z

nja!

mer som en loop i fomulärfälet där koden går igenom och skriver ut de olika storlekarna i samma fält, splittat med ett kommatecken... den koden du skrev funkade inte alls...

vad gör den?

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

## #6 — Sebbe, 2003-10-14T19:36Z

Är det såhär du menar då?

```
<%
sql2 = "SELECT tss.storlek, tss.storleksid from TblStorlekar as tss INNER JOIN tblRelstorlek as TRs ON TSS.StorleksId = TRs.StorleksId WHERE TRs.ProdId = "&pprodid

set rsSt=Server.CreateObject("ADODB.Recordset")
rsSt.Open sql2, conn
if not rsSt.eof then
  Response.Write "<br><font size=""2"" color=""white"">"
  Response.Write "<input type=""text"" name=""tblStorlek"" size=""3"" class=""thisform"" value=""")
  intCount = 0

  While Not rsSt.EOF
    If intCount = 0 Then
      Response.Write(rsSt("storlek"))
      intCount = 1
    Else
      Response.Write(", " & rsSt("storlek"))
    End If
    rsSt.MoveNext
  Wend

  Response.Write(""">")
  Response.Write "</font>"
end if
%>
```

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

## #7 — Pellsater, 2003-10-14T19:42Z

ja fast den klagar på rad 154 som ser ut så här

Response.Write "\<input type=""text"" name=""tblStorlek"" size=""3"" class=""thisform"" value=""")

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

## #8 — Sebbe, 2003-10-14T19:48Z

> **Pellsater skrev:**
>
> ja fast den klagar på rad 154 som ser ut så här
> 
> Response.Write "\<input type=""text"" name=""tblStorlek"" size=""3"" class=""thisform"" value=""")

Ta bort parentesen i slutet. :)

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

## #9 — Pellsater, 2003-10-15T06:44Z

jag får inga kommatecken mellan dee olika storlekarna.... och jag får en fel kod på nästa sida när jag uppdaterar produkten

Så här koden ut som tar hand om uppdateringen

```
<%
tblstorlek = Split(Request.form("tblstorlek"),",") 

Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DSN=d8318-shop;Password=@01#$hgdchgknihnllhdiodhlihmg"
IF isArray(tblstorlek) THEN 
sql3 = "Delete * from tblrelstorlek Where prodid = " & prodid
conn.Execute(sql3)

for x = 0 to ubound(tblstorlek)
sql3 = "INSERT INTO tblrelstorlek (storleksid, prodid) Values (" & Trim(tblstorlek(x)) & ", "& prodid &")"
conn.Execute(sql3)

next
End if

conn.close

%>
```

Felkoden är denna

```
ADODB.Connection.1 error '80004005' 

SQLState: 07001
Native Error Code: -3010
[INTERSOLV][ODBC SequeLink driver][ACCESS][Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 1.

/admin/admin_redigera_ok.asp, line 68
```

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

## #10 — @nders, 2003-10-15T06:46Z

Felmeddelandet brukar betyda att man har ett objektnamn i SQL-frågan som är felstavat/inte existerar.

När du får fel på SQL-frågor, skriv ut den färdiga SQL-frågan med Response.write så är det lättare att felsöka.

Mvh

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

## #11 — Pellsater, 2003-10-15T06:52Z

Hittade ett fel... men jag behöver ha så den skriver ut kommatecken i formulärfältet det gör den inte med Sebbes kod HJÄLP

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

## #12 — Pellsater, 2003-10-15T11:31Z

Fick ordning på det med kommatecken också!!
Men jag behöver ha ett tomt formulärsfält om det inte finns några stolekar i Db så att man kan skriva in om det finns

```
  While Not rsSt.EOF
    If intCount = 0 Then
      Response.Write(rsSt("storlek"))
      intCount = 1
    Else
      Response.Write(", " & rsSt("storlek"))
    End If
    rsSt.MoveNext
  Wend
```

hur skriver jag in det???

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

## #13 — Pellsater, 2003-10-16T06:24Z

Är det nån som har en idé om hur jag ska göra?

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

## #14 — Josef, 2003-10-16T06:51Z

Det är ju bara att kolla om det finns några storlekar i databasen med en if-sats. Om det inte finns det skriver du ut ett formulärsfält, annars inte.

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

## #15 — Pellsater, 2003-10-16T07:19Z

har försökt få in det i koden ovan men får inte till det

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/88499-delimeters-inne-i-delimeters