OK, hvad med en hta-fil?
Gem dette med hta-extension. Prøv de to forskellige outputmetoder, den sidste rydder vinduet.
<HTML>
<HEAD>
<TITLE></TITLE>
<SCRIPT LANGUAGE=vbscript>
function DisplayChoice()
set f = document.forms(0)
set objRadio = f.elements("radio1")
strOut = ""
for each r in objRadio
if r.checked then
strOut = strOut & "Du valgte at få " & r.value & " til aftensmad."
end if
next
if f.Ketchup.checked or f.Kartofler.checked then
strOut = strOut & "<br>Du har bedt om følgende tilbehør: "
if f.Ketchup.checked then
strOut = strOut & "Ketchup"
end if
if f.Kartofler.checked then
if f.Ketchup.checked then
strOut = strOut & " & kartofler"
else
strOut = strOut & "Kartofler"
end if
end if
end if
'document.getElementById("Display").innerHTML = strOut
document.write(strOut)
end function
</SCRIPT>
</HEAD>
<BODY>
<FORM ID="Form1">
<P>
<INPUT type=radio name=radio1 value=Flæskesteg ID="Radio1">Flæskesteg
<BR><INPUT type=radio name=radio1 value=Hakkebøf ID="Radio2">Hakkebøf
<BR><INPUT type=radio name=radio1 value=Pandekager ID="Radio3">Pandekager
</P>
<P>
<INPUT type=checkbox name="Ketchup" ID="Checkbox1">Ketchup
<BR><INPUT type=checkbox name="Kartofler" ID="Checkbox2">Kartofler
</P>
<P>
<INPUT type=button value=Go! onclick="DisplayChoice()" ID="Button1" NAME="Button1">
</P>
</FORM>
<DIV id="Display"></DIV>
</BODY>
</HTML>
