Modulus-11 kontrolciffer

hvad mener du med kontrolcifre..??

modulus er jo indbygget i ASP i forvejen..
funktionen hedder mod.
dvs.

dit_tal mod 11 = resultatet..

Det sidste ciffer i et cprnr. er eksempelvis et modulus-11 kontrolciffer. Mod funktionen er division.

mod funktionen returnere resten af divisionen med 11..

altså
13 mod 11 = 2
17 mod 11 = 6

hvordan er det det skal regnes ud..?
Kan du give et eksempel..?

Har selv lavet den:

Function CalcModulus11(n)
    If Not IsNumeric(n) Then Exit Function

    Dim v
    Dim p
    Dim k

    p = 0
    v = 2
    Do While Len(n) > 0
        p = p + (Mid(n, Len(n), 1) * v)
        n = Left(n, Len(n) - 1)
        If v = 7 Then v = 1
        v = v + 1
    Loop

    k = 11 - (p Mod 11)
    If k = 10 Then
        CalcModulus11 = ""
    Else
        CalcModulus11 = k
    End If
   
End Function


Du havde ret med Mod funktionen - den gør faktisk delvist det, som jeg havde behov for!

hmm...

Den funktion havde jeg så i hvert fald aldrig luret..

Tak for bidraget anyhow...

u are welcome ;-)