funktions hjälp

function getGroupText(iLevel)
     select iLevel
          case 1 : getGroupText = "medlem"
          case 2 : getGroupText = "admin"
     end select
end function

. . . .

Response.Write getGroupText(1)

Skriver ut det så här nu: <%=RecSet("niva")%>

Infogar funktionen .. Ska det fungera så här då? <%=Response.Write getGroupText(1)%>

<% Response.Write getGroupText(RecSet("niva"))%> eller <%=getGroupText(RecSet("niva"))%>

Feltyp:
Kompileringsfel i Microsoft VBScript (0x800A03FD)
'Case' förväntas.
/admin/admin.asp, line 9, column 7
select iLevel

<%
function getGroupText(iLevel)
select iLevel <-------------------------- Line 9
case 1 : getGroupText = "medlem"
case 2 : getGroupText = "admin"
end select
end function
%>

Tror @nders glömde.. lite

function getGroupText(iLevel)
     Select Case(iLevel)
          Case 1
                 getGroupText = "medlem"
          Case 2
                 getGroupText = "admin"
     End Select
end function

Det funkade kanon :)

Kan man även göra detta åt andra hållet?

Alltså att man skriver tex admin så skrivs 2 in i databasen

function getGroupLevel(strLevel)
     Select Case(lcase(strLevel))
          Case "medlem"
                 getGroupLevel = 1
          Case "admin"
                 getGroupLevel = 2
          Case Else
                  getGroupLevel = 1
     End Select
end function

Case Else här är om man anger något annat än medlem eller admin, ex. om man anger medlemen, så kastar vi ut ett defaultvärde, i detta fall 1. :)

Jag missade ett litet ord ja. Det är klart man kan göra åt andra hållet också, som fredde visar. Det är bara att ändra lite i koden, det borde du kunnat lösa själv.

Hur ska då input se ut?

<input type="text" name="niva">

Ja jag lär mig hela tiden och visst ska jag knåpa lite själv :)

Nej jag går bet på det.

En dum fråga har jag. Har ju min <input type="text" name="niva"> i admin.asp.

Sen RecSet("niva") = Request.Form("niva") i add.asp.

Måste funktionen finnas på båda sidorna?

Om du skall spara nivån, och nivån anges som ex strängen: medlem alt. admin

 RecSet("niva") = getGroupLevel(Request.form("niva"))

Dock ännu bättre skulle vara om man gjorde en select-meny, istället för en enkel textruta:

<select name="niva">
 <option value="">-- Välj medlemstyp --</option>
 <option value="1">Medlem</option>
 <option value="2">Administratör</option>
</select>

add.asp

RecSet("niva") = Request.Form("niva")

Dock får man se till att niva är tvingande (dvs. man måste välja medlemstyp, annars kan man inte posta formuläret.)

Då behöver du bara använda dig av getGrouptext(iLevel), och förmodligen aldrig av motsatta funktionen getGrouplevel(strLevel).

bara en tanke..

Ja select-meny var helt klart modellen. Tackar :)