dim estIvra = request.Cookies("IVRA")
if estIvra is Nothing then
Response.Redirect("accesso.aspx")
end if

oppure al posto di "is" metti "=" .
il tuo codice, nonostante funzioni, non credo sia formalmente corretto.. o almeno io nn l'ho mai visto (e nemmeno mai usato..)