<% cadenaSQL="SELECT * FROM tipobuque " Set Ob_Conn = Server.CreateObject("ADODB.Connection") Set Ob_RS = Server.CreateObject("ADODB.Recordset") Ob_Conn.Open = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\consultas\bd\tipobuque.mdb") Ob_RS.Open cadenaSQL,Ob_Conn,3,3 %>
Saltar a los contenidos Inicio

Códigos de tipo de buque

<% do until Ob_RS.Eof %> <% Ob_RS.MoveNext loop %>
Nombre
Código
<%=Ob_RS("Tipo")%> <%=Ob_RS("Codigo")%>

Campo Volantín, 37 - 48007 Bilbao - Bizkaia. Telf. 94 487 12 60 - Fax 94 487 12 88
Atención al cliente 902 101 614
XHTML 1.0 transicional vlido!
CSS vlido!