A antar Medlem sedan dec. 2001 289 inlägg Frågan 8 dec. 2001 13:03 #1 Kan man göra så att det automatisk blir en stor bokstav i fältet och resten små ?????
RecSet("fnamn") = Request.Form("fnamn")
J jorgen Medlem sedan feb. 2001 2 412 inlägg 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]
D DavidB Medlem sedan jan. 2000 1 372 inlägg 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]
Brimba Medlem sedan dec. 1999 5 874 inlägg 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?
Brimba Medlem sedan dec. 1999 5 874 inlägg 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]
A antar Medlem sedan dec. 2001 289 inlägg 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))
Brimba Medlem sedan dec. 1999 5 874 inlägg 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?