10 svar · 408 visningar · startad av Pudolf
Hallå.
På en sida skrivs en mening såhär:
Du valde... " & request.querystring("foremal") & "
Men nu är det så att Querystringen är med små bokstäver, så finns det något sät att få ("foremal") i detta format:
Första bokstaven är stor, resten är små.
istället för att alla är små.
Skulle även vara schysst om någon kunde berätta hur jag på samma sätt gör för få alla bokstäver i Versaler.
Tack på förhand!
Hej
För att få första bokstaven till versal kan man använda den här funktionen:
chkLen = Len(Request.QueryString("foremal"))
newLen = chkLen - 1
sVersal = uCase(Left(Request.QueryString("foremal")))
sText = sVersal & Right(Request.QueryString("foremal"), newLen)
Response.Write sText
För att få alla till versaler kan du göra så här:
sText = uCase(Request.QueryString("foremal"))
Response.Write sText
------------------
SPiN, bjorne.w@telia.com
[Redigerat av SPiN den 29 okt 2000]
Hej, förlåt för att jag lägger mig i men detta var interresant.
Kan man även göra om versaler till gemener och i så fall hur?
LCase, i stället för UCase.
------------------
-------------------
What a waste it is to lose one's mind. Or not to have a mind is being very wasteful. How true that is.
Dan Quayle
tackar allihopa !
SPiN, jag testade din kod om att få första bokstaven till versal.
men jag fick detta felmeddelande:
Microsoft VBScript runtime error '800a01c2'
Wrong number of arguments or invalid property assignment: 'Left'
/testsida.asp, line 20
Vad gjorde jag fel?
Jag använder funktionen så att jag först skriver den övre halvan högst upp på sidan, sedan skriver jag ut den med
Response.write sText på lite olika ställen över hela sidan.
Tack på förhand?
[Redigerat av Pudolf den 01 nov 2000]
[Redigerat av Pudolf den 01 nov 2000]
japp... såg det nu :)
Glömde juh en etta...
Det ska vara:
sVersal = uCase(Left(Request.QueryString("foremal"), 1))
Nu borde det funka :)
------------------
SPiN, bjorne.w@telia.com
tack!
Fick koden att fungera men några problem uppstod... Kanske någon kan hjälpa mig med dem?
- Om jag går in på sidan utan någon querystring, (tex. TESTSIDAN.ASP) DÅ får jag detta felmeddelande:
Microsoft VBScript runtime error '800a0005'
Invalid procedure call or argument: 'Right'
/testsidan.asp, line 20
Här är koden som används, skriven av SPiN.
chkLen = Len(Request.QueryString("foremal"))
newLen = chkLen - 1
sVersal = uCase(Left(Request.QueryString("foremal"), 1))
sText = sVersal & Right(Request.QueryString("foremal"), newLen)
Det är för att newLen grundar sig på vad som står i QueryStringen. Du kan lösa det genom att använda en If-sats, ex
If Not isNumeric(Request.QueryString("foremal")) then
newLen = 1
else
chkLen = Len(Request.QueryString("foremal"))
newLen = chkLen - 1
end if
Då ska det funka. Du kan juh byta ut ettan mot vad som ska vara standard...
------------------
SPiN, bjorne.w@telia.com
[Redigerat av SPiN den 02 nov 2000]