Stig Johansen wrote in dk.edb.internet.webdesign.serverside.asp:
> "Morten Kristensen" <noreply@noreply.dk> wrote in message
> news:47df6cb5$0$90269$14726298@news.sunsite.dk...
> > Hej
> >
> > Jeg ønsker at lave et program, der som input i to tekstfelter
> > modtager henholdsvis en tekst og et tegn, og som herefter viser
> > hvor mange gange det indtastede tegn forekommer i teksten.
> >
> > F.eks:
> > Input: Dette er en tekst
> > Søgetegn: t
> > Output: 4
>
> Hmm. .." action="opgave6.asp " opgave 6 ?, er det lektier?
Næh nej. Jeg holder skam påskeferie - men opgaven er en del af flere opgaver,
jeg har fundet i en bog - og for at bevare overblikket over hvilke opgaver jeg
har løst, kalder jeg dem nøjagtigt det samme som i bogen. (eller også er det
bare mangel på kreativitet:))
>
> Never mind, prøv at se om du kan få noget ud af dette her:
>
1 <%@ LANGUAGE = VBScript %><% Option Explicit %><%
2 Dim vartekst
3 Dim varbogstav
4 Dim wtekst
5 Dim antal
6
7 if Request.Servervariables("REQUEST_METHOD") = "POST" then
8 varbogstav = Request.Form("varbogstav")
9 vartekst = Request.Form("vartekst")
10 wtekst = Replace(vartekst,varbogstav,"")
11 antal = ( len(vartekst) - len(wtekst) ) / len(varbogstav)
12 Response.Redirect "bogstavtest.asp?vartekst="+ vartekst+"&varbogstav="
> + varbogstav + "&antal=" + cStr(antal)
13 Response.End
14 end if
15 %><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
16 "
http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
17 <html xmlns="
http://www.w3.org/1999/xhtml" xml:lang="da">
18 <head>
19 <title>ASP bogstav test</title>
20 </head>
21
22 <body>
23 <h3>ASP bogstav test</h3>
24 <h4>Sidste antal = <% = Request.QueryString("antal")%></h4>
25 <form action="bogstavtest.asp" method = "post">
26 <fieldset>
27 <label for="vartekst">Tekst her:</label>
28 <textarea name="vartekst" id = "vartekst"><% =
> Request.QueryString("vartekst")%></ textarea> <br/>
29 <label for="varbogstav">Bogstav(er):</label>
30 <input type="text" name="varbogstav" id="varbogstav" value="<% =
> Request.QueryString("varbogstav")%>"/>
31 <input type="submit" name="submit" id="submit" value="Vis antal" />
32 </fieldset>
33 </form>
34 </body>
35 </html>
>
>
> Prøv også at skrive 'te' i bogstavfeltet.
>
> --
> Med venlig hilsen/Best regards
> Stig Johansen
>
Hej Stig og god påske.
Tak for et hurtigt og velfungerende svar. Ja faktisk kan dit eksempel jo mere
end krævet. Virkelig flot. - og igen mange tak for din gode besvarelse.
Jeg var selv inde på at bruge len(vartekst) - men absolut ikke med nogen heldig
udgang :)
Jeg forstår desværre ikke helt hele eksemplet. Jeg har givet koden for oven
linjenumre og nedenfor prøvet at kommentere linje for linje, for at sikre at
jeg lærer af eksemplet og forstår.
Måske vil du (eller en anden) rette mine misforståelser og forklare linje
10-14?
Linje 1: <% @ language = vbscript %> - bør man altid starte vbScript således?
Jeg plejer blot at starte min ASP kode med et start tag - og så derudaf. :)
Linje 2-5: variablerne erklæres (som krævet med "<% option explicit %>")
Linje 7-9: variablerne varbogstav og vartekst får tildelt værdier fra
formularens inputfelter når metoden "post" anvendes.
Linje 10-14: forstår dem simpelthen ikke 100 % - hvor meget jeg end forsøger
Linje 15-17: doctype og stanard for html
Linje 18-20: head med title
Linje 22-23: start på body og h3 overskrift
Linje 24: sidste antal - værdien "antal" findes fra querystringen
Linje 25-35: formular med inputfelter og afslutning på formular, body og html
I linje 27 og 29 bruger du <label> til teksten foran input-felterne. Det kunne
vel også undlades - og bare stå som tekst uden label?
På forhånd tak.
Med venlig hilsen
Morten.
--
Vil du lære at kode HTML, XHTML, CSS, SSI, ASP eller ASP.NET?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! =>
http://www.html.dk/tutorials