% if Session("SQLVENDSTATUS")="" then Response.Redirect "sqlvendstatus.asp" End if qpro=Session("SQLVENDSTATUS") Set RSpro=Conexao.Execute(qpro) %>