Ver Mensaje Individual
  #1 (permalink)  
Antiguo 17/01/2006, 11:03
Avatar de mc_quake
mc_quake
 
Fecha de Ingreso: enero-2006
Ubicación: www.ecocargo.cl
Mensajes: 683
Antigüedad: 19 años, 3 meses
Puntos: 8
error al consultar una hoja excel ayuda

hola amigos tengo un problema necesito saber como puedo conectar mi hoja excel para poder crear las consultas en asp miren tengo hasta el momento esto tener en cuenta que la hoja excel tiene 32 columnas si se les puede llamar asi

<%
Path=Server.MapPath("Ejercicio1.xls")

Set ConexionBD = Server.CreateObject("ADODB.Connection")

ConexionBD.Open "DRIVER={Microsoft Excel Driver (*.xls)};DBQ=" & Path

Set rsVac = Server.CreateObject("ADODB.Recordset")

nombre = "ORTIZ C MARIA"
rsVac.Open "Select * From Hoja6 Where Nombre_Cliente = '"& nombre &"' ", ConexionBD,3,3
%>

<body>
<h2><b><center>CONSULTA</center></b></h2>
<hr>
<table border=1 align="center">

<%
rsVac.MoveFirst

Response.Write "<th>" & rsVac.Fields.Item(0).Name & "</th>" & vbCrLf

Do While Not rsVac.EOF
Response.Write "<tr>" & vbCrLf
Response.write "<td>" & rsVac(0) & "</td>"

Response.Write "</tr>" & vbCrLf
rsVac.MoveNext
Loop
Response.Write "</table>"

rsVac.Close
Set rsVac = Nothing

ConexionBD.Close
Set ConexionBD = Nothing

%>