Hej folkens.
Jeg har siddet og leget med nogle asp scripts som skal skrive en
hel HTML fil, den samler nogle inputs og skriver simpelt en html
fil
med de indledende tags, altså:
<html>
<head>
</head>
<body bgcolor="bruger input">
Altså skrives den med baggrunds farve fra input i noget form værk
osv.
Alt det her fungerer fint og skriver pænt og nydeligt et html
dokument.
Næste trin er at tilføje noget tekst med selvvalgt style;
Koden ser således ud:
dim fs,f
set fs=Server.CreateObject("Scripting.FileSystemObject")
set f=fs.OpenTextFile(Server.MapPath("../Created Documents/" &
Request.Form("docname") & ".html"),8,true)
f.WriteLine ("<style type='text/css'>")
f.WriteLine ("#" & Request.Form("title") & "{" )
f.WriteLine ("border:none;")
If Request.Form("type") = "verdana" Then
f.WriteLine ("font-family:verdana, sans-serif, monotype;")
End If
If Request.Form("size") = "large" Then
f.WriteLine ("font-size:250%;")
Else
F.WriteLine ("font-size:120%;")
End If
If Request.Form("color") = "yellow" Then
f.WriteLine ("color: #FFFF00;")
Else
f.WriteLine ("color: #CCCC00;")
End If
f.WriteLine ("}")
f.WriteLine ("</style>")
f.Close
set f=Nothing
set fs=Nothing
%>
Outputtet bliver i browseren således:
猼祴敬琠灹㵥琧硥&
#12148;獣❳ാ⌊浈筭਍ĝ
14;摲牥渺湯㭥਍潦瑮
;昭浡汩㩹敶摲湡ⱡ
猠湡⵳敳楲ⱦ洠湯&
#29807;灹㭥਍潦瑮猭穩
4949;㈱┰഻挊汯牯›䌣¬
19;ぃ㬰਍ൽ㰊猯祴敬
ാ
Outputtet i HTML koden er bare en masse firkanter selvfølgeligt.
Det er jo nok bare mig der laver en dum fejl...
Men jeg kan altså ikke finde den, nogen der kan hjælpe mig? :)
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! =>
http://www.html.dk/tutorials