<% If Request.Form("Usuario")=Empty Then %>

Ingrese por favor su Número de Instituto que
figura en el encabezado de las replicas de facturación, en caso de no tenerlo comuníquese al (0351)460-9900 o solicítelo via email a administracion@parquesalud.com.ar

<% Else set rsUsuarios = Server.CreateObject("ADODB.Recordset") '' 24/10/2008 'rsUsuarios.open "SELECT * FROM Prestadores Where CODIGO=" & Request.Form("Usuario"),xBase rsUsuarios.open "SELECT * FROM preprestadores Where Id_Empresa='PS' AND Id_Prestador='" & Request.Form("Usuario") & "'",xBaseMySQL If Not rsUsuarios.EOF THEN Session("Prestador_Autentificado")=True Session("Id_Prestador") = UCase(Request.Form("Usuario")) '' 24/10/2008 'Session("Nombre_Prestador") = UCase(rsUsuarios("INSTITUTO")) 'Session("Id_Categoria") = UCase(rsUsuarios("CATEG")) 'Session("Id_Grupo") = UCase(rsUsuarios("GRUPO")) Session("Nombre_Prestador") = UCase(rsUsuarios("Nombre_Prestador")) Session("Id_Categoria") = rsUsuarios("Id_CategoriaPrestador") Session("Id_Grupo") = rsUsuarios("Id_GrupoPrestador") If Session("Pagina_Destino")=Empty then Session("Pagina_Destino")= "prestadores_index.asp" End If If Session("Pagina_Destino")<>Empty then Response.Redirect("prestadores_redirect.asp") 'Response.End() End If Else Session("Prestador_Autentificado")=False %>

Ingrese por favor el Número que figura en el encabezado
de las replicas de facturación, en caso de no tenerlo comuníquese al (0351)460-9900 o solicítelo via email a administracion@parquesalud.com.ar

Usuario Incorrecto !!!
Por favor intente de nuevo.

<% End If End If %>