<%@LANGUAGE="VBSCRIPT"%> <% Dim conn Dim conn_cmd Dim conn_numRows Set conn_cmd = Server.CreateObject ("ADODB.Command") conn_cmd.ActiveConnection = MM_qmp_STRING conn_cmd.CommandText = "SELECT * FROM contactes ORDER BY titol_eng" conn_cmd.Prepared = true Set conn = conn_cmd.Execute conn_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 conn_numRows = conn_numRows + Repeat1__numRows %> Qué me pongo. Imagen personal
català | castellano | english
Contact Central Office of Quémepongo

Montse Guals y Elisabet Olivé
Diagonal 512
08006 Barcelona
Phone: 0034 93 217 06 06
Cell: 0034 648 057 178
  Central office:
Media department:
Franchise department:
Training department:
  central@quemepongo.es
prensa@quemepongo.es
franquicias@quemepongo.es
formacion@quemepongo.es


Contact with the nearest Quémepongo franchise in your city

<% While ((Repeat1__numRows <> 0) AND (NOT conn.EOF)) %> <% Repeat1__index=Repeat1__index+3 Repeat1__numRows=Repeat1__numRows-1 if not(conn.eof)then conn.MoveNext end if Wend %>
<%if not(conn.eof) then%> <%=(conn.Fields.Item("titol_eng").Value)%>
<%=Replace((conn.Fields.Item("nom").Value), "y", "&")%>
<%=(conn.Fields.Item("adreca_eng").Value)%>
<%=(conn.Fields.Item("cp").Value)%> <%=(conn.Fields.Item("poblacio_eng").Value)%> <%if(conn.Fields.Item("provincia_eng").Value)<>"" then response.Write("("+conn.Fields.Item("provincia_eng").Value+")")%>
<%=(conn.Fields.Item("tip_tel1_eng").Value)%> 0034 <%=(conn.Fields.Item("telefon1").Value)%> <%if (conn.Fields.Item("telefon2").Value)<>"" then response.Write("
")%> <%=(conn.Fields.Item("tip_tel2_eng").Value)%><%if (conn.Fields.Item("tip_tel2_eng").Value)<>"" then response.Write(" ")%><%if (conn.Fields.Item("telefon2").Value)<>"" then response.Write("0034 ")%><%=(conn.Fields.Item("telefon2").Value)%>
" class="link1 resaltado"><%=(conn.Fields.Item("email").Value)%> <%conn.movenext%> <%end if%>
  <%if not(conn.eof) then%> <%=(conn.Fields.Item("titol_eng").Value)%>
<%=Replace((conn.Fields.Item("nom").Value), "y", "&")%>
<%=(conn.Fields.Item("adreca_eng").Value)%>
<%=(conn.Fields.Item("cp").Value)%> <%=(conn.Fields.Item("poblacio_eng").Value)%> <%if(conn.Fields.Item("provincia_eng").Value)<>"" then response.Write("("+conn.Fields.Item("provincia_eng").Value+")")%>
<%=(conn.Fields.Item("tip_tel1_eng").Value)%> 0034 <%=(conn.Fields.Item("telefon1").Value)%> <%if (conn.Fields.Item("telefon2").Value)<>"" then response.Write("
")%> <%=(conn.Fields.Item("tip_tel2_eng").Value)%><%if (conn.Fields.Item("tip_tel2_eng").Value)<>"" then response.Write(" ")%><%if (conn.Fields.Item("telefon2").Value)<>"" then response.Write("0034 ")%><%=(conn.Fields.Item("telefon2").Value)%>
" class="link1 resaltado"><%=(conn.Fields.Item("email").Value)%> <%conn.movenext%> <%end if%>
  <%if not(conn.eof) then%> <%=(conn.Fields.Item("titol_eng").Value)%>
<%=Replace((conn.Fields.Item("nom").Value), "y", "&")%>
<%=(conn.Fields.Item("adreca_eng").Value)%>
<%=(conn.Fields.Item("cp").Value)%> <%=(conn.Fields.Item("poblacio_eng").Value)%> <%if(conn.Fields.Item("provincia_eng").Value)<>"" then response.Write("("+conn.Fields.Item("provincia_eng").Value+")")%>
<%=(conn.Fields.Item("tip_tel1_eng").Value)%> 0034 <%=(conn.Fields.Item("telefon1").Value)%> <%if (conn.Fields.Item("telefon2").Value)<>"" then response.Write("
")%> <%=(conn.Fields.Item("tip_tel2_eng").Value)%><%if (conn.Fields.Item("tip_tel2_eng").Value)<>"" then response.Write(" ")%><%if (conn.Fields.Item("telefon2").Value)<>"" then response.Write("0034 ")%><%=(conn.Fields.Item("telefon2").Value)%>
" class="link1 resaltado"><%=(conn.Fields.Item("email").Value)%> <%end if%>
 
 
And we are still growing…