Hej! Hörklara lite mer vad du vill göra. Hej Andreas! jag löste det själv....med följande kodcheckbox...hur gör man
jag har en loop där jag listar x st rader i en tabell. I loppen så sätterj ag in en checkbox på varje rad med namnet "PAY" value <%=(TmpChecknam)%>. denna varibel tilldelar checkboxen ett varden som motsvarar det unika idnummer varje rad har i tabellen som är ett nytt nummer för varje rad. Nu vill jag kunna markera vilka rader som skall visas när jag klickar på submit. I form action= lista.asp
i listan.asp vill jag nu att alla de markerade raderna skall skrivas ut....
hur gör jag detta...
jag har provat med följande kod:
<%@ Language=VBScript %>
<% strBetVald = request("pay")
AstrBet = split(strBetVald, ",")
for iLoop =lbound(AstrBet) to Ubound(AstrBet)
tmpBillNum(iLoop) = AstrBet(iLoop)
next
%>
tmpBillNum är en variabel som jag försökte använda efter principen i VB
Dim tmpBillNum(10) as integer. och lägga varje värde i arrayen i denna variabel för att sedan kunna köra:
for i = 1 to tmpBillNum
response.write = tmpBillnum ' motsvarande sätt
next
/TyronneSv: checkbox...hur gör man
Kan detta var till nån hjälp?
<%@ Language=VBScript %>
<%
Dim vTemp
Dim Data()
Dim Index
If Request.Form("pay").Count >0 Then
Redim Data(Request.Form("pay").Count)
For each vTemp In Request.Form("pay")
Response.Write vTemp & "<BR>" & vbCrLf
Data(Index) = vTemp
Index = Index + 1
Next
Else
Response.Write "No records selected"
End if
%>Sv: checkbox...hur gör man
Nu har jag kollat på ditt exempel men fick inte ut rätt sak av det, men jag använde följande i stället:
<%@ Language=VBScript %>
<%
Dim strCheckBoxstring
strCheckBoxstring = Request("checkbox")
Dim aCheckBoxArray
aCheckBoxArray = Split(strCheckBoxstring, ",")
Dim iLoop
for iLoop =LBound(aCheckBoxArray) to UBound(aCheckBoxArray)
response.write aCheckBoxArray(iLoop)
next
%>
Och nu fick jag ut det, men nu vill jag att
aCheckBoxArray(iLoop) skall fylla en variable/er så att jag sen kan ta och använda värderna i checkbox:en i en select sats.
Hänger du med....
Jag tar alltså och markerar i sida ett vilka poster som skall visas i sida två... varje posters unika id nummer ligger som value i checkboxen. Och på så sätt får jag checkboxar med samma snamn, men olika values..
På sida två har jag nu fått reda på vilka poster i sida 1 som är förbockade och skall visas i sida 2.
För att kunna visa dessa poster i sida 2, så måste jag på något sätt få ut värderna i aCheckBoxArray till olika variebaler som jag sedan använder i min selectsat..
Hoppas att du förstår...
/tyronneSv: checkbox...hur gör man
Dim iLoop
for iLoop =LBound(aCheckBoxArray) to UBound(aCheckBoxArray)
' <-- Updaterar bills med statcod = 2....2="SND"
str1 = "Update Bills set STATCOD=2 and status='SND' where billId=" & (aCheckBoxArray(iLoop))
set rst =con.execute(str1)
set rst= nothing
next
så jag omvandlade ditt förslag lite och löste det..
tack för hjälpen
/tyronne