<%@ Language=VBScript %>
<%Option Explicit%>

<%
	Dim nIdioma
	Dim aSufixIdioma(3)
	aSufixIdioma(0)	= ""
	aSufixIdioma(1)	= "CAST"
	aSufixIdioma(2)	= "ENG"
	
	
	nIdioma	= Request.QueryString("pIdioma")

	If nIdioma="" Then
		nIdioma	= 0
	End If
	
	Session("sIdioma")	=	nIdioma
	
	Server.Transfer("index"& aSufixIdioma(nIdioma) &".asp")
		
	
%>