Eagleeye>> Nå, jeg blev lidt irriteret i går. Jeg var midt i at lave et svar, og pludselig har du uden kommentarer eller noget lagt et svar. Jeg skulle nok have holdt min irritation for mig selv.
Jeg vælger alligevel at fortsætte.
Babyworm>>
Din ide er at kunne omsætte imellem de to temperaturskalaer. Du vil have et felt på skærmen, hvor brugeren kan skrive en temperatur og to radioknapper, som skal afgøre, om man omsætter fra Celsius til Fahrenheit eller omvendt.
Der skal være en knap, som brugeren kan trykke på, når der ønskes en omregning.
Først laver vi layoutet til html-siden, som jo er det brugeren ser:
<html>
<body>
<form METHOD="post" ACTION="omregning.asp?mode=send" align="left" name="frmMail">
<input type="text" name="grader">
<p>
<input type="radio" name="valg" value="celsius">
Celsius<br>
<input type="radio" name="valg" value="fahrenheit">
Fahrenheit </p>
<p>
<input type=submit value="Omregn">
</form>
</body>
</html>
Så skal vi beslutte, hvor resultatet skal skrives. Vi vælger, at der øverst på siden udskrives en tekst af form:
0 graders Celsius er det samme som 32 graders Fahrenheit.
Nu skal ASP-koden så laves. Du ville gerne arbejde med funktioner, så vi laver en funktion, der kan omsætte fra
Celsius til Fahrenheit. Den kalder vi CtilF og en anden, som omregner fra Fahrenheit til Celsius. Den kaldes FtilC.
ASP-koden anbringer vi før html-siden, og html-siden ændres så der øverst bliver udskrevet svaret.
ASP-siden kommer så til at se således ud:
<%
'Omregning mellem Celsius-grader og Fahrenheit-grader
Option Explicit
Dim mode, t, svar
Function CtilF(c)
CtilF=c*9/5 + 32
End Function
Function FtilC(f)
FtilC=(f - 32)*5/9
End Function
mode=request.querystring("mode")
if mode="send" then
t=request.form("grader")
if isNumeric(t) then 'Vi tester, om der er tale om et tal
t=Cdbl(t) '(for god ordens skyld konverterer vi til et tal)
if request.Form("valg") = "celsius" then
svar= t & " graders fahrenheit er det samme som " & FtilC(t) & " graders celsius"
elseif request.Form("valg") = "fahrenheit" then
svar= t & " graders celsius er det samme som " & CtilF(t) & " graders fahrenheit"
end if
else
svar="Du har ikke indtastet et tal!"
end if
end if
%>
<html>
<body>
<%response.write(svar)%><p>
<form METHOD="post" ACTION="omregning.asp?mode=send" align="left" name="frmMail">
<input type="text" name="grader">
<p>
Vælg her, hvad du vil omregne til: <p>
<input type="radio" name="valg" value="celsius">
Celsius<br>
<input type="radio" name="valg" value="fahrenheit">
Fahrenheit </p>
<p>
<input type=submit value="Omregn">
</form>
</body>
</html>
