Richard Perreault

<% Dim noBrp strSQL = " SELECT Last_brp FROM tblBrp" RS2.Open strSQL, CNRS noBrp = RS2.Fields(0) RS2.Close noBrp = noBrp & "Web.html"%>

Acheteur / Vendeur

<%if Request.QueryString("p") = "mandats" then Response.Write "
Liste des mandats
" else Response.Write "Liste des mandats" end if %>
" target="_blank"> Comparez mandats
Comparez mandats
<% if Request.QueryString("p") = "motdepasse" then Response.Write "
Achat / mot de passe
" else Response.Write "Achat / mot de passe" end if %>
<% if Request.QueryString("p") = "faq" then Response.Write "
F.A.Q.- mandat acheteur
" else Response.Write "F.A.Q.- mandat acheteur" end if %>
<% if Request.QueryString("p") = "vente" then Response.Write "
Vente de résidence
" else Response.Write "Vente de résidence" end if %>
<% if Request.QueryString("p") = "loyers" then Response.Write "
Types d'hebergement
" else Response.Write "Types d'hebergement" end if %>

Chercher Mandat

Calculez

<% if Request.QueryString("p") = "calculhypotheque" then Response.Write "
Hypothèque
" else Response.Write "Hypothèque" end if %>
<% if Request.QueryString("p") = "taxemutation" then Response.Write "
Taxe de mutation
" else Response.Write "Taxe de mutation" end if %>
<% if Request.QueryString("p") = "tpstvq" then Response.Write "
TPS & TVQ
" else Response.Write "TPS & TVQ" end if %>
<% if Request.QueryString("p") = "ajustements" then Response.Write "
Calcul d'ajustement
" else Response.Write "Calcul d'ajustement" end if %>
<% if Request.QueryString("p") = "commentaire" then Response.Write "
Laissez vos commentaires
" else Response.Write "Laissez vos commentaires" end if %>

<%if session("user") <> "" then%>

Identification

<%else%> <%if vMess = "" then%> <%end if%> <%end if%>

<%if ShowContent then %>

Pour obtenir un nom d'utilisateur ainsi qu'un mot de passe, vous devez remplir ce formulaire.

<% ShowFields %>

ÉTAPE #3

A. Dans quel secteur désirez-vous acquérir une résidence d'aînès?

Vous pouvez sélectionner plus d'une région

<% strSQL = "SELECT -1, COUNT(ID_Lieu), '1' FROM tblLieu UNION SELECT ID_Lieu, Nom_Lieu, Type_Lieu FROM tblLieu where ID_Lieu not in (36,25,21,31,30,23) UNION SELECT 0, 'Autre', 'E' FROM tblLieu ORDER BY 3 ASC" RS.Open strSQL, CNRS dim vCount,typeL vCount = cint(RS.Fields(1)) RS.MoveNext I = 0 typeL = "A) MONTREAL" do while not RS.EOF if I mod 3 = 0 then %> <% end if %> <%if typeL<>RS.Fields(2) then %> <% end if if (I + 1) mod 3 = 0 then %> <% end if RS.MoveNext I = I + 1 loop RS.Close %>

colspan=<%=(3 - (vCount mod 3))%><% end if %>><%end if %> <%if typeL<>RS.Fields(2) or I=0 then %>
onclick="chkLocAutre_onclick()" <% end if if Request.Form("chkLoc" & RS.Fields(0)) <> "" then Response.Write " checked" %>><%end if %><%if typeL=RS.Fields(2) and I<>0 then %>
<%end if %> <%=RS.Fields(1)%><% if I = vCount then %>><% end if %><%if typeL<>RS.Fields(2) then %>

B. Grandeur

De unités à unités

C. Quel type d'acquéreur êtes-vous?

D. Quelle mise de fonds seriez-vous prêt à investir ?

">$

E. Pourquoi voulez-vous acquérir une résidence d'aînès ?

F. Chiffre d'affaires annuel désiré?

">$

G. Comment avez-vous entendu parler de nous?

Informations sur le courtier

ÉTAPE #1

Prénom ">

Nom ">

Addresse

Ville ">

Prov. ">

Code Postal / Zip ">

ÉTAPE #2

Téléphone ">

Travail ">

Cellulaire ">

Courriel ">

# de permis:

Commentaires et autres informations.

<%else %>

Vous recevrez une réponse par courriel d'ici 24 heures contenant votre mot de passe pour consulter les fiches de mandats.

Merci.

<%end if %>

<% EndConnect %>

Qui suis-je ?

Contacts

Liens utiles






9 unités et moins	10 unités et plus