webForumDet fria alternativet

Stor bokstav

ASP

6 svar · 306 visningar · startad av antar

Medlem sedan dec. 2001289 inlägg
Frågan#1

Kan man göra så att det automatisk blir en stor bokstav i fältet och resten små ?????

RecSet("fnamn") = Request.Form("fnamn")
Medlem sedan feb. 20012 412 inlägg
#2

Beror på vilken som ska vara stor?

Om det är fösta bokstaven kan du ju bara ändra när du presenterar eller innan du gör inserten om du hellre vill det.

dim strFnamn
strFnamn = RecSet("fnamn") 
response.write " "& ucase(left(strFnamn,1)) &" "

------------------
Varför bråka när man kan kramas?

[Redigerat av jorgen den 08 dec 2001]

Medlem sedan jan. 20001 372 inlägg
#3

Det finns en funktion på wF Script som Pace har skrivit som är utmärkt att använda.

funktionen finns här

------------------
// David - Probably the best guy in the world

[Redigerat av DavidB den 08 dec 2001]

Medlem sedan dec. 19995 874 inlägg
#4

myStr = Request.Form("fnamn")
RecSet("fnamn") = UCase(left(myStr,1)) & LCase(mid(myStr,2)

------------------
Mvh
Patrik aka Brimba
<A HREF="http://www.brimba.nu/default.asp?oPID=poll&PollID=20" TARGET=_blank>Har du husdjur hemma?
</A>Varför får man inte dricka saltvatten?

Medlem sedan dec. 19995 874 inlägg
#5

annars tar denna funktionen rätt bra

Function UCLCString(varData)
	arrTemp = Split(lcase(trim(request.form(varData))))
	For I = LBound(arrTemp) To UBound(arrTemp)
		arrTemp(I) = Left(UCase(arrTemp(I)),1) & Right(arrTemp(I),Len(arrTemp(I)) - 1) 
		arrTemp2 = Split(arrTemp(I),"-")
		For N = LBound(arrTemp2) To UBound(arrTemp2)
			arrTemp2(N) = Left(UCase(arrTemp2(N)),1) & Right(arrTemp2(N),Len(arrTemp2(N)) - 1)

			If N >= 1 Then
				strOP = strOP & "-" & arrTemp2(N)
			Else
				strOP = strOP & " " & arrTemp2(N)
			End If

		Next

	Next
	arrTemp = ""
	arrTemp2 = ""
	UCLCString = trim(strOP)
	strOP = ""
End Function

------------------
Mvh
Patrik aka Brimba
<A HREF="http://www.brimba.nu/default.asp?oPID=poll&PollID=20" TARGET=_blank>Har du husdjur hemma?
</A>Varför får man inte dricka saltvatten?

[Redigerat av Brimba den 08 dec 2001]

Medlem sedan dec. 2001289 inlägg
#6

använda mig utav brimbas kod funkar men jag är tvungen och göra så här:

MyStr = Request.Form("pnr")
	RecSet("pnr") = UCase(left(myStr,1)) & LCase(mid(myStr,2))
	
	MyStr = Request.Form("stad")
	RecSet("stad") = UCase(left(myStr,1)) & LCase(mid(myStr,2))

osv....

hur gör tvärttom fast med småbokstäver hela vägen??

måste man göra så här eller?

MyStr = Request.Form("stad")
	RecSet("stad") = LCase(left(myStr,1)) & LCase(mid(myStr,2))
Medlem sedan dec. 19995 874 inlägg
#7

MyStr = Request.Form("stad")
RecSet("stad") = LCase(myStr)

------------------
Mvh
Patrik aka Brimba
<A HREF="http://www.brimba.nu/default.asp?oPID=poll&PollID=20" TARGET=_blank>Har du husdjur hemma?
</A>Varför får man inte dricka saltvatten?

261 ms totalt · 4 externa anrop · v20260731065814-full.1dc6f849
127 ms — deklarationer (db)
0 ms — hämta statistik (cache)
132 ms — hämta tråd, inlägg och bilagor (db)
118 ms — ändringar (db)