udregninger

Hej jeg har et lille problem jeg er ved at lave en udregningsformel... men sidder fast UDEN nogen anelse om hvad jeg skal gøre !!!!

Min ide er at man krydser de vare man nu vil have af udfylder resten af felterne trykker på send og så vil formlen lægge priserne for de valgte vare sammen og gemme den sammenlagte pris!!

Her er min bestillingsformel:

<form action="default.asp?mode=sendbestilling" method="post">

<table border="0">
<tr>
    <td width="100" class="td">Firma ID:</td>
    <td width="450"><input class="box" width="30" type="text" name="kundenr"></td>
</tr>
<tr>
    <td width="100" class="td">Leverings Adresse:</td>
    <td width="450"><input class="box" width="30" type="text" name="adresse"></td>
</tr>
<tr>
    <td width="100" class="td">Vare:</td>
    <td width="450" class="td">

<% strsql2 = "Select * From vare Order by varenavn"
set vare = conn.execute(strsql2) %>

<% do while vare.eof=false %>

<input type="checkbox" value="<%=vare("varenavn")%> " name="vare"><%=vare("varenavn")%> (<%=vare("pris")%>kr.)

<br><% vare.movenext
loop %>

    </td>
</tr>
</table>

    <input class="knap" type="submit" value="Gem">
</form>

her min formel ti lat gemme bestillingen:

IF mode="sendbestilling" THEN

function pris2

HER MANGLER MIN FORMEL !!!

end function

kundenr = Replace(Trim(Request.form("kundenr")), "'", "''")
vare = Replace(Trim(Request.form("vare")), "'", "''")
pris=pris2

SQL3 = "Insert Into bestillinger (kundenr, vare, pris) Values('"&kundenr&"', '"&vare&"', '"&pris&"')"

Conn.Execute(SQL3)

Response.Redirect "default.asp"

END IF
-------------------------

Håber på at i kan hjælpe !!!