Problemer med execute

hejsa
Har lidt problemer med at få execute til at virke korrekt.

Jeg kan ikke lige se hvad jeg gør forkert

-------------- funktion ----------------
function Validation(qryStr, objTest, objTestLen, errMsg)   
    formValidate = true
   
    select case objTest
        case "string"
            formValidate = valStr(qryStr, objTestLen)
        case "int"
            formValidate = valInt(qryStr, objTestLen)
        case "email"
            formValidate = valEmail(qryStr)
    end select
   
    if formValidate=false then

problem ---->    execute(qryStr&"Err = ""errMsg""")

    end if   
end function

function valStr(qryStr, objTestLen)
    valStr = true
    qryStr = request.Form(qryStr) 'Forspørgelse til givne input fra form
   
    if qryStr="" then
        valStr = false
    else
        if not objTestLen="" then
            if not qryStr=<objTestLen then
                valStr = false
            end if
        else
            'session(qryStr)=request.Form(qryStr)
        end if
    end if
end function


if request.Form("sbm") = "Send" then
    Validation "name", "string", 9, "Fejl!"
end if

Er der nogen der lige kan se hvad jeg gør forkert ??
//Djalfe