Frecuencia Inicial:
Frecuencia Final:
Marcar Desmarcar

<% dbpath="DBQ=" & Server.MapPath("bd/bd1.mdb") Set dbg = Server.CreateObject("ADODB.Connection") dbg.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & dbpath SQL="select * from servicios order by servicio" Set doc = dbg.Execute(SQL) n=1 %>

<%do until doc.eof%> <%doc.movenext n=n+1 loop doc.close dbg.close%>
" onClick="cambiar('Image<%=doc("servicio")%>','<%=doc("servicio")%>')" align="top"> " background="nada2.gif">  <%=doc("servicio")%> -<%=doc("titulo")%>
ir al inicio