problema asp y w2000
Publicado por visinic (11 intervenciones) el 10/07/2001 10:10:20
este es el codigo asp que intento ejecutar
y el w2000 me da un error justo en la linea
Set Conexion=CreateObject("adodb.connection")
, si que he creado la base de datos con ODBC
<%@ Language="VBScript" %>
<html>
<head>
<title>Listado de la Base de Datos</title>
</head>
<body>
<big><big><p>Listado de Cuentas de Correo</big></big> <br><br></p>
<div align="center"><center>
<table border="3" cellpadding="0" cellspacing="0" width="100%">
<tr>
<td width="33%"><big>Nombre</big></td>
<td width="33%"><big>Apellido</big></td>
<td width="33%"><big>Email</big></td>
</tr>
<%
Dim Conexion,Tabla
Set Conexion=CreateObject("adodb.connection")
Set Tabla=CreateObject("adodb.recordset")
Conexion.Open "prueba"
Tabla.Open "Tabla1",Conexion
While Not Tabla.EOF
%>
<tr>
<td width="33%"><%=Tabla.Fields("Nombre")%></td>
<td width="33%"><%=Tabla.Fields("Apellido")%></td>
</tr>
<%
Tabla.MoveNext
Wend
%>
</table>
</center></div>
</body>
</html>
y el w2000 me da un error justo en la linea
Set Conexion=CreateObject("adodb.connection")
, si que he creado la base de datos con ODBC
<%@ Language="VBScript" %>
<html>
<head>
<title>Listado de la Base de Datos</title>
</head>
<body>
<big><big><p>Listado de Cuentas de Correo</big></big> <br><br></p>
<div align="center"><center>
<table border="3" cellpadding="0" cellspacing="0" width="100%">
<tr>
<td width="33%"><big>Nombre</big></td>
<td width="33%"><big>Apellido</big></td>
<td width="33%"><big>Email</big></td>
</tr>
<%
Dim Conexion,Tabla
Set Conexion=CreateObject("adodb.connection")
Set Tabla=CreateObject("adodb.recordset")
Conexion.Open "prueba"
Tabla.Open "Tabla1",Conexion
While Not Tabla.EOF
%>
<tr>
<td width="33%"><%=Tabla.Fields("Nombre")%></td>
<td width="33%"><%=Tabla.Fields("Apellido")%></td>
</tr>
<%
Tabla.MoveNext
Wend
%>
</table>
</center></div>
</body>
</html>
Valora esta pregunta
0