<%Language=VBScript%>
<%
Response.AddHeader "Pragma", "no-cache"
Response.Expires = 0
%>
<%
cadena=Split(ID," ,")
For i =0 to Ubound(cadena)
set oConn=Server.CreateObject("ADODB.Connection")
oConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../db/acceso.mdb") & "; Password=bonilla "
SQL="SELECT * FROM " & _
"ventas where [ID] = " & Cadena(i)
set rs=oConn.Execute(SQL)
Next
%>
<html>
<head>
<meta http-equiv="Content-Language" content="es-mx">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Pagina nueva 1</title>
</head>
<body bgcolor="#F7F7F7">
<div align="center">
<center>
<table border="0" style="border-collapse: collapse" bordercolor="#111111" width="86%" id="AutoNumber1">
<tr>
<td width="100%">
<p align="center"><b><font face="Arial" size="2" color="#003366">Aquí solo
podrás modificar el campo de PAGO de Disquette; sí ya fue pagado, favor de
agregarle un SI.</font></b></td>
</tr>
<tr>
<td width="100%"><hr color="#800000" size="1"></td>
</tr>
<form method="POST" action="modificarOK.asp">
<tr>
<td width="100%">
<div align="center">
<center>
<table border="1" style="border-collapse: collapse" bordercolor="#003366" width="100%" id="AutoNumber2" height="43">
<tr>
<td width="14%" align="center" height="19">
<font face="Arial" color="#790000" size="2"><b>Apellido Paterno</b></font></td>
</tr>
<tr>
<td width="14%" height="19"><b>
<font size="2" face="Arial" color="#003366">
<%=rs("Apellidop")%></font></b></td>
</tr>
Aqui termina las donde quiero mostrar, claro, eran mas pero le resumi...
cheque la BD y el campo si existe.
Saludos, Gracias
Owen