function med select case

jeg har en kode som jeg skal bruge flere gange, så derfor har jeg lavet et function...

problemet er bare at den ikke virker....

<%
    SomeVar = "5"
   
    Function SetImage(var)
        Select Case var
            Case 1, 2
                var = big.jpg
            Case 3
                var = small.jpg
            Case 4
                var = white.jpg
            Case 5
                var = gray.jpg
            Case 6
                var = raw.jpg
            Case 7
                var = small.jpg
            Case 8
                var = ray.jpg
        End Select
    End Function
   
    response.Write SetImage(SomeVar)
%>

hjææp..