14/08/2008, 23:43
|
 | | | Fecha de Ingreso: noviembre-2007 Ubicación: C:\inetpub\wwwroot\Guayaquil
Mensajes: 1.507
Antigüedad: 17 años, 5 meses Puntos: 54 | |
| Respuesta: Problema al cargar datos de una base de datos
Trata poniendo así:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!--#include file="Connections/inventarios.asp" -->
<%
usuario = request.QueryString("us")
Dim Recordset1
Dim Recordset1_numRows
Set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = MM_inventarios_STRING
Recordset1.Source = "SELECT * FROM dbo.equipos where Usuario = '"& usuario &"' "
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 1
Recordset1.Open()
Recordset1_numRows = 0
while NOT Recordset1.EOF
%>
<!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>
</head>
<body>
<%
response.Write(Recordset1.Fields.Item("Antivirus") .value) ' lo muestra
response.Write(Recordset1.Fields.Item("Departament o").value) 'no lo muestra
response.Write(Recordset1.Fields.Item("Dir_ip").va lue) ' lo muestra
response.Write(Recordset1.Fields.Item("Disco").val ue) ' lo muestra
response.Write(Recordset1.Fields.Item("Cpu").value ) ' lo muestra
Recordset1.movenext()
wend
%>
</body>
</html>
<%
Recordset1.Close()
Set Recordset1 = Nothing
%>
En pocas palabras pon lo referente a la conexion arriba del code HTML para que el ASP no interfiera con el resto HTML. |