<%
function openlink(link,tipex)
%>
<%
end function
%>
<%
'ONDE = Request.ServerVariables("HTTP_REFERER")
'PATH_INFO
ONDE = Request.ServerVariables("ALL_HTTP")
if instr(onde,"veronde")>0 then
openlink "https://www.bomgia.com.br/bg/pages/veronde1.asp","_self"
response.end
end if
if instr(onde,"vapvup")>0 then
openlink "https://www.bomgia.com.br/land1/vapvup.asp","_self"
response.end
end if
if instr(onde,"meklin")>0 then
openlink "https://www.bomgia.com.br/mk.asp","_self"
response.end
end if
if instr(onde,"meklab")>0 then
openlink "https://www.bomgia.com.br/meklab/1/index.html","_self"
response.end
end if
openlink "https://www.bomgia.com.br/bg/pages/bgia.asp","_self"
response.end
%>