4 svar · 241 visningar · startad av Asa
Har en kod där man ska kunna bestämma antal inputrutor med en siffra och med dess text från en settingsfil och koden för själva formuläret ser ut så här och funkar fint:
**\<%For x = 1 To antalin%\>
\<%=Inkomst(x)%\>: \<input type="text" name="\<%=Inkomst(x)%\>" size="15\>
\<%Next%\>**
Sen såklart så finns formtaggarna men har de inte med här!
Koden dit det ska gå ser ut så här:
For x=1 To antalin
Inkomst" &x &" = Request.Form("Inkomst" &x)
If Inkomst" &x &" = "" Then Inkomst" &x &" = 0 End If
Next
Denna kod funkar inte 
Det ska vara en mindre kod av denna:
**For x=1 To antalin
Inkomst1 = Request.Form("Inkomst1")
If Inkomst1 = "" Then Inkomst1 = 0 End If
Next
osv**
Hoppas någon kan hjälpa mig med detta problem jag har!
I VBScript kan du inte använda dynamisk variabeltilldelning på det sättet. Du måste nog använda en array för ändamålet.
Dim varInkomst
Redim varInkomst (antalin)
For x=1 To antalin
varInkomst(x) = Request.Form("Inkomst" &x)
If varInkomst(x) = "" Then varInkomst(x) = 0 End If
Next
Ungefär. 
Mvh,
Hur summerar man då alla varInkomst(x) ???
lngSumma = 0
for i = 1 to ubound (varInkomst)
lngSumma = lngSumma +cLng(varInkomst(i))
next
response.write lngSumma
Annars kan du ju göra den summeringen redan när du fyller upp arrayen.
Mvh,
Tackar så jättemycket