onchange funktion i dynamisk form
HejHvordan får jeg lagt et vilkårligt antal inputteksters værdi sammen i et andet inputfelt (eller som tekst på siden)?
Jeg henter nogle elementer fra en database, så inputfelterne får deres navne dynamisk - og så kan jeg ikke få det til at virke.
Kode:
<head>
<script language=javascript>
function calc(id,pris){
var stkpris;
var pris_ialt;
navn = "document.form1.antal_" & id & ".value"
stkpris = parseInt(navn);
pris_ialt = stkpris * pris
document.form1.total.value = document.form1.total.value + pris_ialt;
}
</script>
</head>
<body>
<form name="form1" method="POST" onsubmit='return check(this)' action="">
<table border="0" cellpadding="0" cellspacing="0" width="100%" class="tekst">
<tr>
<td width="100%" colspan="5"><img border="0" src="../images/horisontalDot_small.gif"></td>
</tr>
<%sql = "SELECT * FROM artikler"
Set Arr = Connect_bestil.Execute(sql)
do until Arr.eof%>
<tr>
<td width="100%" colspan="5"><img border="0" src="../images/5x5.gif"></td>
</tr>
<tr>
<td width="25" valign="top"><input type="checkbox" name="art_<%=Arr("id")%>" value="ON"></td>
<td valign="top"><b><%=Arr("navn")%></b></td>
<td valign="top"></td>
<td valign="top"><p align="right">Antal: </td>
<td valign="top"><p align="right"> <input type="text" onChange="calc(<%=Arr("id")%>,<%=Arr("pris")%>);" name="antal_<%=Arr("id")%>" size="5" class="felt"></td>
</tr>
<tr>
<td valign="top"></td>
<td valign="top" colspan="4">
<table border="0" cellpadding="0" cellspacing="0" width="100%" class="tekst">
<tr>
<%if Arr("billede") <> "" then%>
<td width="115" valign="top"><img border="0" src="../log/bestilling/<%=Arr("billede")%>" width="100"></td>
<td valign="top"><%=Arr("beskrivelse")%><p>Artikelnummer: <%=Arr("id")%><br>Pris pr. stk.:
<%if Arr("pris")= 0 then
Response.Write "Gratis"
else
Response.Write FormatNumber(Arr("pris"),2) & " kr."
end if%></p></td>
<%else%>
<td colspan="2" valign="top"><%=Arr("beskrivelse")%><p>Artikelnummer: <%=Arr("id")%><br>Pris pr. stk.:
<%if Arr("pris")= 0 then
Response.Write "Gratis"
else
Response.Write FormatNumber(Arr("pris"),2) & " kr."
end if%></p></td>
<%end if%>
</tr>
</table>
</td>
<td valign="top"></td>
</tr>
<tr>
<td width="100%" colspan="5"><img border="0" src="../images/horisontalDot_small.gif"><br>
</td>
</tr>
<%Arr.MoveNext
loop
Arr.Close
Set Arr = nothing%>
<tr>
<td width="100%" colspan="5">
<table border="0" cellpadding="0" cellspacing="0" width="100%" class="tekst">
<tr>
<td width="50%"><b>Samlet pris for bestilling:</b></td>
<td width="50%">
<p align="right"><input type="text" name="total" size="5" class="felt"></p>
</td>
</tr>
<tr>
<td width="100%" colspan="2"> </td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="100%" colspan="5"><input type="submit" value="Bestil" name="Submit" class="knap">
</td>
</tr>
</table>
<p><input type="hidden" name="redirect" value="takaendr.htm"> </p>
</form>
</body>
