<% Set oConn = Server.CreateObject("ADODB.Connection") oConn.Open "DSN=actiup.com.asens1" Dim CurrentDate CurrentDate = Date sql = "SELECT * FROM links WHERE id>1 AND id_link=1 ORDER BY ordre" Set rs=oConn.execute(sql) do while not rs.EOF %>
"> <%=rs("titular")%>
<% rs.MoveNext loop rs.Close %>
:: Formulario de contacto ::
nombre*
completo :
empresa*:
nif:
e-mail*:
teléfono*:
fax*:
dirección:
población:
c.p.:
país:
catàlogo a enviar:
seleccione catálogo ---------------
catálogo completo
catálogo botiquines
catálogo camillas
catálogo férulas
observaciones / comentarios:
ASENS,S.L. Fabricación y distribución de material para primeros auxilios.
Tel: (0034) 933096419.
Aviso Legal
