<% Dim intQuant, intPrice, intResult
intQuant = CInt(Request("antal_01"))
intPrice = CInt(Request("tal1"))
intResult = intPrice * intQuant
%>

detta funkar, men hur skall jag skriva om jag typ vill lägga till antal_02 och tal2 upp till antal_05 och tal5 eller mer?


/Tommy

menar du såhär?


<%
Dim intQuant, intPrice, intResult

intQuant = 0
intPrice = 0

for i = 1 to 5
intQuant = intQuant + CInt(Request("antal_0" & i))
intPrice = intPrice 0 CInt(Request("tal" & i))
next
intResult = intPrice * intQuant
%>

sen borde du vara mer spacifik med request.. om du skickar med post skriver du request.form() annars request.querystring() om du hämtar från adressraden

Jag chansar på att priset skiljer mellan de olika "raderna".
<code>
<%
Dim Index
Dim intQuant, intPrice, intResult
For Index = 1 To 5
intQuant = CInt(Request.Form("antal_0" & Index))
intPrice = CInt(Request.Form("tal" & Index))
intResult = intResult + (intPrice * intQuant)
Next
%>Summan: <%= intResult %>
</code>

Detta funkade bra
om jag nu vill få ut procenten oxå 0.25 och 0.75 så att det visas (skrivs ut) typ:

Summa: 1000
Moms: 250
Totalsumma: 750

hur gör jag då på bästa (lättaste) sätt, kan jag kopiera detta 3 gånger då ? och skriva
("tal" & Index)) *0.25 och ("tal" & Index)) * 0.75 skulle det funka?


<%
Dim Index
Dim intQuant, intPrice, intResult
For Index = 1 To 5
intQuant = CInt(Request.Form("antal_0" & Index))
intPrice = CInt(Request.Form("tal" & Index))
intResult = intResult + (intPrice * intQuant)
Next
%>Summan: <%= intResult %>

Tack för all hjälp!

/Tommy

Om moms redan ingår i intPrice skriver du:
<code>
<%
Dim Index
Dim intQuant, intPrice, intResult
For Index = 1 To 5
intQuant = CInt(Request.Form("antal_0" & Index))
intPrice = CInt(Request.Form("tal" & Index))
intResult = intResult + (intPrice * intQuant)
Next
%>
Summan: <%= = intResult / 1.25 %>
Moms: <%= intResult / 5 %>
Totalsumma: <%= intResult %>
</code>

dela i 1.2 och 4 ska de va då 25% räknas på brutto summan.

Yes! detta funkade!! det var bara ett litet fel och det var ett = tecken för mycket i Summan: <%= = intResult / 1.25 %>

så denna är den rätta:

<%
Dim Index
Dim intQuant, intPrice, intResult
For Index = 1 To 5
intQuant = CInt(Request.Form("antal_0" & Index))
intPrice = CInt(Request.Form("tal" & Index))
intResult = intResult + (intPrice * intQuant)
Next
%>
Summan: <%= intResult / 1.25 %>
Moms: <%= intResult / 5 %>
Totalsumma: <%= intResult %>


Tack!!
//Tommy