15/04/2008, 05:20
|
| | | Fecha de Ingreso: abril-2008 Ubicación: Jamaica
Mensajes: 176
Antigüedad: 16 años, 8 meses Puntos: 1 | |
Re: Error Microsoft OLE DB Provider for ODBC Drivers (0x80004005) Se me olvidava, aqui dejo el codigo de la pagina.
----------------------------------------------------------------
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="Inaug.asp" -->
<%
Dim Recordset3
Dim Recordset3_numRows
Set Recordset3 = Server.CreateObject("ADODB.Recordset")
Recordset3.ActiveConnection = MM_Inaug_STRING
Recordset3.Source = "SELECT * FROM referencia ORDER BY Nombre ASC"
Recordset3.CursorType = 0
Recordset3.CursorLocation = 2
Recordset3.LockType = 1
Recordset3.Open()
Recordset3_numRows = 0
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>Documento sin título</title>
<style type="text/css">
<!--
.Estilo1 {
color: #0000CC;
font-weight: bold;
}
-->
</style>
</head>
<body>
<table width="400" border="1" align="center">
<tr>
<td><div align="center"><%=(Recordset3.Fields.Item("Nombre" ).Value)%></div></td>
</tr>
</table>
<table width="400" border="0" align="center">
<tr>
<td><span class="Estilo1">Descripción:</span></td>
</tr>
<tr>
<td><%=(Recordset3.Fields.Item("Descripcion").Valu e)%></td>
</tr>
</table>
<table width="400" border="0" align="center">
<tr>
<td><span class="Estilo1">Recubrimientos disponibles :</span></td>
</tr>
<tr>
<td><%=(Recordset3.Fields.Item("Recubrimiento").Va lue)%></td>
</tr>
</table>
<table width="400" border="0" align="center">
<tr>
<td><span class="Estilo1">Presentación:</span></td>
</tr>
<tr>
<td><%=(Recordset3.Fields.Item("Presentacion").Val ue)%></td>
</tr>
</table>
<p> </p>
<table width="400" border="1" align="center">
<tr>
<td><%=(Recordset3.Fields.Item("Imagen").Value)% ></td>
</tr>
</table>
<p align="center"> </p>
<p align="center"> </p>
<p align="center"> </p>
<p align="center"> </p>
</body>
</html>
<%
Recordset3.Close()
Set Recordset3 = Nothing
%> |