boxes = "100420, 100401, 100403, 100405"
box = Split(boxes,",")
for i=0 to UBound(box)
Response.Write Trim(box(i)) & "<br>"
next
ska nog gå ganska bra
-Eitraz
7 svar · 251 visningar · startad av Pellefant
Hej hopp! :)
Hur plockar man fram värdena, ett i taget, ur en kommaseparerad variabel.
Tex: boxes=100420, 100401, 100403, 100405
(Detta för att jag ska plocka fram motsvarande poster ur en db, där en kolumn har detta värde)
boxes = "100420, 100401, 100403, 100405"
box = Split(boxes,",")
for i=0 to UBound(box)
Response.Write Trim(box(i)) & "<br>"
next
ska nog gå ganska bra
-Eitraz
Du kan göra så här om du skall radera posterna:
<%
Dim kId,con,xBoxar
kId = request.form("boxes")
Set con = Server.CreateObject("ADODB.Connection")
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("Databasen.mdb")
'Ta bort poster med en loop
xBoxar = split(kId,",")
For x = 0 To UBound(xBoxar)
sql = "delete from tabellen where kolumn=" & cint(xBoxar(x))
con.Execute sql,,128
next
con.Close
Set con = Nothing
%>
Du behöver inte dela upp den alls.
q = "select * from t where ic in (" & ksl & ")"
ksl = variabel som innehåller kommaseparerade värden.
om ic är numerisk.
Oj, det var ju smidigt!