function

<%
Function makePass()
        randomize
        lenpwd=7            'Hvor mange karakterer i passwordet
        pwd=""
        pwdchr="abcdefghjkmpqrstuvwxyzABCDEFGHJKMNPQRSTUVWXYZ123456789"  'Disse Karakterer må bruges
        lenchr=len(pwdchr)
        for n=1 to lenpwd
            x=Int((lenchr - 1 + 1) * Rnd + 1)
            pwd=pwd & mid(pwdchr,x,1)
        next
        Response.Write(pwd)
End Function

Call makePass()
%>

//>Rune

<%
Function makePass()
        randomize
        lenpwd=7            'Hvor mange karakterer i passwordet
        pwd=""
        pwdchr="abcdefghjkmpqrstuvwxyzABCDEFGHJKMNPQRSTUVWXYZ123456789"  'Disse Karakterer må bruges
        lenchr=len(pwdchr)
        for n=1 to lenpwd
            x=Int((lenchr - 1 + 1) * Rnd + 1)
            pwd=pwd & mid(pwdchr,x,1)
        next
makePass = pwd
End Function

response.write makePass()
%>

<%
Function makePass(udskriv)
        randomize
        lenpwd=7            'Hvor mange karakterer i passwordet
        pwd=""
        pwdchr="abcdefghjkmpqrstuvwxyzABCDEFGHJKMNPQRSTUVWXYZ123456789"  'Disse Karakterer må bruges
        lenchr=len(pwdchr)
        for n=1 to lenpwd
            x=Int((lenchr - 1 + 1) * Rnd + 1)
            pwd=pwd & mid(pwdchr,x,1)
        next
        udskriv = pdw
End Function

Response.Write(makePass(udskriv))
%>

eller!
//>Rune

medions, den sidste kommer vist næppe til at virke. Funktionen makePass returnerer ikke noget og der vil derfor heller ikke blive udskrevet noget.

ups :-)

//>Rune

medions:> hvad gør: Call makePass()

cbp:> response.write makePass() udskriver rigtigt nok 'pdw', men lad os nu sige at jeg ville kalde function makePass og så have 'pdw' retur for at skrive ned i en variabel som jeg så selvfølgelig skal lægge ned i en database? er det så måden?

Den "ringer funktionen op"...

//>Rune

det er jo også det jeg gerne vil. Hvordan får jeg så værdien af pdw med ud?

Ja

//>Rune

dvs...
1. call makePass()
2. strPassword = makePass()
og så har jeg 'pdw' i strPassword?

makePass() returnerer værdien så i stedet for at udskrive værdien kan du eks. gemme den i en variabel og udskrive den senere:

myPassword = makePass()
Response.Write(myPassword)

Dette eksempel virker:

<%
Function makePass()
        randomize
        lenpwd=7            'Hvor mange karakterer i passwordet
        pwd=""
        pwdchr="abcdefghjkmpqrstuvwxyzABCDEFGHJKMNPQRSTUVWXYZ123456789"  'Disse Karakterer må bruges
        lenchr=len(pwdchr)
        for n=1 to lenpwd
            x=Int((lenchr - 1 + 1) * Rnd + 1)
            pwd=pwd & mid(pwdchr,x,1)
        next
        Response.Write(pwd)
End Function

Call makePass()
%>

Her kan du bare skrive Response.Write ved alle de ting du vil ha' ud fra funktionen!
//>Rune

Tak til begge
der er 15 point til jer hver, tak

Thx 4 Poinz
//>Rune