Foros del Web » Programando para Internet » ASP Clásico »

problemas de conexion

Estas en el tema de problemas de conexion en el foro de ASP Clásico en Foros del Web. Hola amigos soy nuevo en este foro y vereis hace un par de años realice una aplicacion con ASP y access y me funcionaba a ...
  #1 (permalink)  
Antiguo 23/11/2004, 06:14
 
Fecha de Ingreso: octubre-2004
Mensajes: 230
Antigüedad: 19 años, 7 meses
Puntos: 0
problemas de conexion

Hola amigos soy nuevo en este foro y vereis hace un par de años realice una aplicacion con ASP y access y me funcionaba a la perfeccion...y hoy me he puesto a revisarla y lo primero que me encuentro esk no se conecta a la db Los pasos que he seguido son los siguiente 1º me cree un dsn de usuario Microsoft Access Driver .mdb le asigne el nombre "partes" y le asigne la db access partes.mdb hasta hay creo que lo hago bien y este es el codigo [CODE]<%
Dim usuario, password, oConn,RS

'Primero nos fijamos si ambos campos fueron completados.
'Si no se cumple, redireccionamos a pagina1.asp
If Request.Form("usuario") = "" OR Request.Form("pass") = "" then
%>
<script language="Javascript">
var pagina="javascript:history.go(-1)";
location.href=pagina;
alert ("Introduce el usuario y el password.")
</script>
<%

Else
'Guardamos los datos del Form en variables y evitamos la comilla simple
usuario = Trim(Request.Form("usuario"))
password = Trim(Request.Form("pass"))
usuario = Replace(usuario,"'","''")
password = Replace(password,"'","''")

'Conectamos a nuestra BD.
'on error resume next
dsn="dsn=partes"
Set oConn = Server.CreateObject ("ADODB.Connection")
oConn.open (dsn)
strsql = ("SELECT * FROM DATOSOFICIALES WHERE LOGIN = '"& usuario &"'")
oConn.Execute (strsql)
'Seleccionamos de la tabla solo los registros que concuerden con el usuario del Form.
Set RS = Server.CreateObject ("ADODB.RecordSet")
RS.Open strsql,"DSN=partes"
'Si el valor EOF (fin de la tabla elegida) es verdadero, no existe el usuario.
If (RS.EOF = true) then
%>
<script language="Javascript">
var pagina="javascript:history.go(-1)";
location.href=pagina;
alert ("Este usuario no existe.")

</script>
<% ElseIf RS.Fields("password") = password then
'Si el campo de la tabla es igual a nuestra variable, estas logueado.
'Response.Write "Login aceptado ... Bienvenido <B>"& nomb &"</B>"
'?cl=" & password (cl:Es una variable donde le asignas password)
Response.Redirect "registrosincidencias.asp?cl=" & password
Else 'Otra cosa, seria cuando el password no es la que seleccionamos.
Código:
Información técnica (para personal de soporte técnico)
%>
<script language="Javascript">
var pagina="javascript:history.go(-1)";
location.href=pagina;
alert ("Esa contraseña no concuerda con el login ingresado.")

</script>
<%End If

'Limpiamos y cerramos.
RS.CLOSE
SET RS=NOTHING
oConn.close
SET oConn=NOTHING
End If
%>
Cita:
Información técnica (para personal de soporte técnico)

Tipo de error:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][Administrador de controladores ODBC] No se encuentra el nombre del origen de datos y no se especificó ningún controlador predeterminado
/pagina2.asp, línea 43


Tipo de explorador:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)

Página:
POST 21 bytes to /pagina2.asp

Datos de POST:
usuario=ana&pass=flor
como si no estubiera la db Alguien podria echarme una mano
  #2 (permalink)  
Antiguo 23/11/2004, 06:47
 
Fecha de Ingreso: noviembre-2004
Ubicación: trelew - chubut
Mensajes: 134
Antigüedad: 19 años, 6 meses
Puntos: 0
fijate y
borra --->dsn="dsn=partes"
y pone
oConn.open "DSN=partes"

esto siempre y cuando no hayas establecido UID y PASS
  #3 (permalink)  
Antiguo 23/11/2004, 06:50
 
Fecha de Ingreso: noviembre-2004
Ubicación: trelew - chubut
Mensajes: 134
Antigüedad: 19 años, 6 meses
Puntos: 0
fijate de sacarle los parentesis a la linea

oConn.open (dsn)

oConn.open dsn
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 20:58.