<h3 align="center"> <h4><a href="http://www.strikeoption.com/src/Patagon/comentarios.htm">Asesoramiento en inversiones bursatiles,especialistas en inversiones chile</a></h4> <h4><a href="http://www.visitingargentina.com/">Turismo Argentina</a></h4> <h4> <a href="http://www.visitingchile.com/">Chile Turismo</a></h4> <h4><a href="http://www.traducciones.ws/">Traduccion Ingles</a></h4> <h4><a href="http://www.altasenbuscadores.cl/">Alta en buscadores chile </a></h4> <h4><a href="http://www.chiledirectorio.com">Chile Directorio</a></h4> </h3>
 
<% 'abrir el objeto de la tabla de forma directa sin ODBC Set objConn = Server.CreateObject("ADODB.Connection") objConn.Open "DRIVER={Microsoft Excel Driver (*.xls)};DBQ=d:\webroot\strikeoption.com\databases\wdor3.xls;" Set objRS = Server.CreateObject("ADODB.Recordset") objRS.ActiveConnection = objConn objRS.CursorType = 3 'Static cursor. objRS.LockType = 2 'Pessimistic Lock. objRS.Source = "Select * from titulopatagon" objRS.Open%>
 
<%response.write(objRS.Fields.Item(0).Value)%>
 
<% Set objRS = Server.CreateObject("ADODB.Recordset") objRS.ActiveConnection = objConn objRS.CursorType = 3 'Static cursor. objRS.LockType = 2 'Pessimistic Lock. objRS.Source = "Select * from comentariopatagon" objRS.Open While Not objRS.EOF%>
<%objRS.MoveNext Wend objRS.Close Set objRS = Nothing objConn.Close Set objConn = Nothing%>
<%Response.write(objRS.Fields.Item(0).Value)%>

            José Meli Mundi