I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
<% Dim udsagn(6) Dim strSessionValue : strSessionValue = "" For i = 0 to 6 strValue = Request.Form("id" & i ) if( strValue = "" ) then strValue = "0" end if strSessionValue = strSessionValue & strValue if( i < 6 ) then strSessionValue = strSessionValue & "," end if next session("udsagn") = strSessionValue
response.write "kontrol af session indhold = " & session("udsagn")
Det ser rigtigt nok mærkeligt ud. Du har også for mange radiobuttons hvis du kun skal have 6 felter. Jeg har forenklet din kode lidt, til noget som burde virke.
<% Dim udsagn(5), tmpARR
if len(session("udsagn")) =0 then session("udsagn") = "0,0,0,0,0,0" 'start på session tmpARR = split(session("udsagn"),",")
For i = 0 to 5 if Request.Form("id"&i) <> "" then udsagn(i) = Request.Form("id"&i) else udsagn(i) = tmpARR(i) end if next session("udsagn") = join(udsagn,",") response.write "kontrol af session indhold = " & session("udsagn")
Tak for hjælpen begge. Fennec´s kommetar bragte mig videre, vil du lægge et svar.
:-) karsten_larsen
Og for dem som det kan interessere, blev løsningen.
Dim udsagn(5), tmpARR
if len(session("udsagn")) = 0 then session("udsagn") = "0,0,0,0,0" 'start på session tmpARR = split(session("udsagn"),",")
For i = 0 to 4 if Request.Form("id"&i) <> "" then udsagn(i) = Request.Form("id"&i) else udsagn(i) = tmpARR(i) end if next session("udsagn") = join(udsagn,",") response.write "kontrol af session indhold = " & session("udsagn")
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.