HTML Datei einbinden ??

[Michael]

Hallo Frank,

Frame1 -> klaro

Frame2 -> berechne.asp ????

<form action="berechne.asp" method=post>
<% For each feld in Request.Form %>
<input type="hidden" name="<%=feld%>" value="<%Request.Form(feld)%>")
<% Next %>

<input type="submit" value="abschicken">
</form>

Vieleicht hilft dir das wegen dem Value da oben <%Request.Form(feld)%> <--- ????? (<hab nicht so viel ahnung in ASP :-)

So sieht der quellcode ohne die berechnungsfuntkion aus.

Dim file, Wahrung, intArtikel, intMENGE, intPreis1, intPreis2, intPreis3, intPreis4, intPreis5, intPreis6, intPreis7, intPreis8, intPreis9, IntEinzel, IntGesamt, IntMWST
if Request("wahr1") <> "" then
    Wahrung = Request("wahr1")
end if
if Request("wahr2") <> "" then
    Wahrung = Request("wahr2")
end if
if Request("MGE") <> "" then
    IntMENGE = int(Mid(Request("MGE"), 1, 2))
end if
if Request("NB") <> "" then
    intPreis1 = int(Mid(Request("NB"), 7, 5))
    intArtikel = int(Mid(Request("NB"), 1, 5))
end if
if Request("CPU") <> "" then
    intPreis2 = int(Mid(Request("CPU"), 7, 5))
end if
if Request("RAM") <> "" then
    intPreis3 = int(Mid(Request("RAM"), 7, 5))
end if
if Request("HD") <> "" then
    intPreis4 = int(Mid(Request("HD"), 7, 5))
end if
if Request("CD") <> "" then
    intPreis5 = int(Mid(Request("CD"), 7, 5))
end if
if Request("OS") <> "" then
    intPreis6 = int(Mid(Request("OS"), 7, 5))
end if
if Request("DFUE") <> "" then
    intPreis7 = int(Mid(Request("DFUE"), 7, 5))
end if
if Request("NT") <> "" then
    intPreis8 = int(Mid(Request("NT"), 7, 5))
end if
if Request("DS") <> "" then
    intPreis9 = int(Mid(Request("DS"), 7, 5))
end if

Vieleicht kannst du mir auf die sprünge helfen wie ich diese felder definiere ???

danke im Voraus

Michael