Error al ingresar a BD con ASP

En que momento haces tu conexion a la base de datos?

Saludos.

Microsoft MVP
Orador Regional INETA


"JDRapido" wrote:

Hola Amigos
tengo el siguiente, estoy tratando de ingresar a una base de datos que tengo
en un servidor en la intranet, a travez de una aplicacion ASP, cuando me
trato de logear, ingreso la cuenta de usuario y la password, me devulve este
error:
El Sistema no Tiene Acceso a la Aplicacion.[Microsoft][ODBC SQL Server
Driver][DBNETLIB]No existe el servidor SQL Server o se ha denegado el acceso
al mismo.
tengo la base de dato registrada en el servidor que se llama "SERVER1", y
los servicios estan arriba, pero no se porque no logra ingresar a la BD.
tengo este string para redireccionar el servidor, en la pagina...
CHARFECHA="#"
USE_DSN=true
DSN_NAME = ""
USE_MSSQL=true
if (USE_MSSQL) then SSQL_HOST="(SERVER1)" MSSQL_DB="DataSohi"
CHARFECHA="'"
USE_DSN=true
end if
uid="sohi"
acc="so9009"
MDB_PATH = Server.MapPath("../db.mdb")
por su ayuda gracias
saludos
Jose D:

Cuando abro la pagina ASP, tengo una pagina inicio que me pregunta la cuenta
del usuario y la clave, en ese momento va a consultar a la base de datos si
existe dicha cuenta y clave...
saludos
Jose D.
"Matias Iacono" escribió en el
mensaje news:

En que momento haces tu conexion a la base de datos?

Saludos.

Microsoft MVP
Orador Regional INETA


"JDRapido" wrote:

Hola Amigos
tengo el siguiente, estoy tratando de ingresar a una base de datos que
tengo
en un servidor en la intranet, a travez de una aplicacion ASP, cuando me
trato de logear, ingreso la cuenta de usuario y la password, me devulve
este
error:
El Sistema no Tiene Acceso a la Aplicacion.[Microsoft][ODBC SQL Server
Driver][DBNETLIB]No existe el servidor SQL Server o se ha denegado el
acceso
al mismo.
tengo la base de dato registrada en el servidor que se llama "SERVER1", y
los servicios estan arriba, pero no se porque no logra ingresar a la BD.
tengo este string para redireccionar el servidor, en la pagina...
CHARFECHA="#"
USE_DSN=true
DSN_NAME = ""
USE_MSSQL=true
if (USE_MSSQL) then SSQL_HOST="(SERVER1)" MSSQL_DB="DataSohi"
CHARFECHA="'"
USE_DSN=true
end if
uid="sohi"
acc="so9009"
MDB_PATH = Server.MapPath("../db.mdb")
por su ayuda gracias
saludos
Jose D:

Me referia al codigo.

En el codigo posteado no veo donde tratas de abrir la conexion.

Saludos.

Microsoft MVP
Orador Regional INETA


"JDRapido" wrote:

Cuando abro la pagina ASP, tengo una pagina inicio que me pregunta la cuenta
del usuario y la clave, en ese momento va a consultar a la base de datos si
existe dicha cuenta y clave...
saludos
Jose D.
"Matias Iacono" escribió en el
mensaje news:
> En que momento haces tu conexion a la base de datos?
>
> Saludos.
>
> Microsoft MVP
> Orador Regional INETA
>
>
> "JDRapido" wrote:
>
>> Hola Amigos
>> tengo el siguiente, estoy tratando de ingresar a una base de datos que
>> tengo
>> en un servidor en la intranet, a travez de una aplicacion ASP, cuando me
>> trato de logear, ingreso la cuenta de usuario y la password, me devulve
>> este
>> error:
>> El Sistema no Tiene Acceso a la Aplicacion.[Microsoft][ODBC SQL Server
>> Driver][DBNETLIB]No existe el servidor SQL Server o se ha denegado el
>> acceso
>> al mismo.
>> tengo la base de dato registrada en el servidor que se llama "SERVER1", y
>> los servicios estan arriba, pero no se porque no logra ingresar a la BD.
>> tengo este string para redireccionar el servidor, en la pagina...
>> CHARFECHA="#"
>> USE_DSN=true
>> DSN_NAME = ""
>> USE_MSSQL=true
>> if (USE_MSSQL) then SSQL_HOST="(SERVER1)" MSSQL_DB="DataSohi"
>> CHARFECHA="'"
>> USE_DSN=true
>> end if
>> uid="sohi"
>> acc="so9009"
>> MDB_PATH = Server.MapPath("../db.mdb")
>> por su ayuda gracias
>> saludos
>> Jose D:
>>
>>
>>

Hola matias...bueno en ese codigo lo que hago es definir el nombre del
servidor donde reside la BD, el codigo donde abro la base está aca...
CONST SESSION_NAME="USUARIO_SITIO" CONST
SESSION_FULLNAME="NOMBRE_COMPLETO_USUARIO" CONST SESSION_TYPE="TIPO_USUARIO"
ACCION=Request.QueryString("accion") 'TARGET=Request.QueryString("target")
if (ACCION="logout") then Session(SESSION_NAME)="" end if
USER=Request.Form(FORM_USER) PASSWORD=Request.Form(FORM_PASSWORD) if
(USER<>"" AND PASSWORD<>"") then
MENSAJE_ERROR_LOGIN=comprobarLogin(USER,PASSWORD) if
(MENSAJE_ERROR_LOGIN<>"") then LoginForm
MENSAJE_ERROR_LOGIN,"default.asp",USER end if elseif (USER="" AND
PASSWORD<>"") then LoginForm "Ingrese " & LABEL_USER,"default.asp",null
elseif (USER<>"" AND PASSWORD="") then LoginForm "Ingrese " &
LABEL_PASSWORD,"default.asp",USER else if session(SESSION_NAME)="" then
LoginForm "Inicie una Sesión","default.asp",null else Session.Timeout`
valores_sesion(session(SESSION_NAME)) end if end if function
comprobarLogin(usuario,password) comprobarLogin="" DBUSER=DbValue("SELECT
UserName from tUsuario WHERE UserName= '" & usuario & "'","")
DBPASSWORD=DbValue("SELECT UserPass from tUsuario WHERE UserName = '" &
DBUSER & "'","") 'response.write "(" & DBPASSWORD & ")" & "(" & password &
")" if (DBPASSWORD=password) then session(SESSION_NAME)ÛUSER
valores_sesion(usuario) DbExec("UPDATE usuario SET DFecha_Ingreso = Date()
WHERE UserName = '" & usuario & "'") else comprobarLogin= "Su " & LABEL_USER
& " o " &LABEL_PASSWORD & " no son validos" end if end function sub
valores_sesion(usuario) NOMBREUSUARIO=DbValue("SELECT NUsuario from tUsuario
WHERE UserName = '" & usuario & "'","") 'TIPOUSUARIO=DbValue("SELECT NTipo
from usuario WHERE UserName = '" & usuario & "'","") 'if (TIPOUSUARIO="" OR
isNull(TIPOUSUARIO)) then LoginForm "Usted no tiene permiso para acceder a
esta pagina",null,null session(SESSION_FULLNAME)=NOMBREUSUARIO
session(SESSION_TYPE)=TIPOUSUARIO end sub
"Matias Iacono" escribió en el
mensaje news:

Me referia al codigo.

En el codigo posteado no veo donde tratas de abrir la conexion.

Saludos.

Microsoft MVP
Orador Regional INETA


"JDRapido" wrote:

Cuando abro la pagina ASP, tengo una pagina inicio que me pregunta la
cuenta
del usuario y la clave, en ese momento va a consultar a la base de datos
si
existe dicha cuenta y clave...
saludos
Jose D.
"Matias Iacono" escribió en el
mensaje news:
> En que momento haces tu conexion a la base de datos?
>
> Saludos.
>
> Microsoft MVP
> Orador Regional INETA
>
>
> "JDRapido" wrote:
>
>> Hola Amigos
>> tengo el siguiente, estoy tratando de ingresar a una base de datos que
>> tengo
>> en un servidor en la intranet, a travez de una aplicacion ASP, cuando
>> me
>> trato de logear, ingreso la cuenta de usuario y la password, me
>> devulve
>> este
>> error:
>> El Sistema no Tiene Acceso a la Aplicacion.[Microsoft][ODBC SQL Server
>> Driver][DBNETLIB]No existe el servidor SQL Server o se ha denegado el
>> acceso
>> al mismo.
>> tengo la base de dato registrada en el servidor que se llama
>> "SERVER1", y
>> los servicios estan arriba, pero no se porque no logra ingresar a la
>> BD.
>> tengo este string para redireccionar el servidor, en la pagina...
>> CHARFECHA="#"
>> USE_DSN=true
>> DSN_NAME = ""
>> USE_MSSQL=true
>> if (USE_MSSQL) then SSQL_HOST="(SERVER1)" MSSQL_DB="DataSohi"
>> CHARFECHA="'"
>> USE_DSN=true
>> end if
>> uid="sohi"
>> acc="so9009"
>> MDB_PATH = Server.MapPath("../db.mdb")
>> por su ayuda gracias
>> saludos
>> Jose D:
>>
>>
>>

Desde el web no se pueden ver archivos adjuntos :(

Si pudieras pegar el codigo seria ideal.

Saludos.

Microsoft MVP
Orador Regional INETA


"JDRapido" wrote:

perdon aca...en el adjunto es donde voy abrir la base de datos...


"Matias Iacono" escribió en el
mensaje news:
> Me referia al codigo.
>
> En el codigo posteado no veo donde tratas de abrir la conexion.
>
> Saludos.
>
> Microsoft MVP
> Orador Regional INETA
>
>
> "JDRapido" wrote:
>
>> Cuando abro la pagina ASP, tengo una pagina inicio que me pregunta la
>> cuenta
>> del usuario y la clave, en ese momento va a consultar a la base de datos
>> si
>> existe dicha cuenta y clave...
>> saludos
>> Jose D.
>> "Matias Iacono" escribió en el
>> mensaje news:
>> > En que momento haces tu conexion a la base de datos?
>> >
>> > Saludos.
>> >
>> > Microsoft MVP
>> > Orador Regional INETA
>> >
>> >
>> > "JDRapido" wrote:
>> >
>> >> Hola Amigos
>> >> tengo el siguiente, estoy tratando de ingresar a una base de datos que
>> >> tengo
>> >> en un servidor en la intranet, a travez de una aplicacion ASP, cuando
>> >> me
>> >> trato de logear, ingreso la cuenta de usuario y la password, me
>> >> devulve
>> >> este
>> >> error:
>> >> El Sistema no Tiene Acceso a la Aplicacion.[Microsoft][ODBC SQL Server
>> >> Driver][DBNETLIB]No existe el servidor SQL Server o se ha denegado el
>> >> acceso
>> >> al mismo.
>> >> tengo la base de dato registrada en el servidor que se llama
>> >> "SERVER1", y
>> >> los servicios estan arriba, pero no se porque no logra ingresar a la
>> >> BD.
>> >> tengo este string para redireccionar el servidor, en la pagina...
>> >> CHARFECHA="#"
>> >> USE_DSN=true
>> >> DSN_NAME = ""
>> >> USE_MSSQL=true
>> >> if (USE_MSSQL) then SSQL_HOST="(SERVER1)" MSSQL_DB="DataSohi"
>> >> CHARFECHA="'"
>> >> USE_DSN=true
>> >> end if
>> >> uid="sohi"
>> >> acc="so9009"
>> >> MDB_PATH = Server.MapPath("../db.mdb")
>> >> por su ayuda gracias
>> >> saludos
>> >> Jose D:
>> >>
>> >>
>> >>
>>
>>
>>