San Antonio 486 Of. 111-
F: 6325971 Fax: 6327227-
mail: elatric@elatric.cl-
   
<%set coneccion=Server.CreateObject("ADODB.Connection") coneccion.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.MapPath("databases/informacion.mdb") set tabla=Server.CreateObject("ADODB.recordset") ' cargando el recordst con la tabla en disco tabla.Open "noticias", coneccion Response.Write "" & vbNewLIne Response.Write "" & vbNewLine For col = 3 To tabla.Fields.Count-1 Response.Write "" & vbNewLine Next Response.Write "" & vbNewLine Do Until tabla.EOF Response.Write "" & vbNewLine For col = 1 To tabla.Fields.Count-1 Response.Write "" & vbNewLine Next Response.Write "" & vbNewLine tabla.MoveNext Loop Response.Write "
" & tabla.Fields(col).Name & "
" & tabla.Fields(col).Value & "
" & vbNewLine tabla.Close set tabla = nothing coneccion.Close set coneccion = nothing%>
 

 

   
 
Páginas Web