<% set conntemp=server.createobject("adodb.connection") conntemp.open "primo" %>



Offrir un accueil de qualité à l'ensemble de sa clientèle

Fournir une information claire et précise sur les prestations des adhérents PRIMO avant tout engagement écrit.

Proposer un choix important de biens en location et transaction.

Etre à l'écoute du client et lui proposer des solutions adaptées à sa demande.

Garantir par leurs compétences et la mise à jour régulière de leurs connaissances la rédaction de documents conforme aux législations en vigueur.

Evaluer au prix du marché pour permettre une transaction dans des conditions optimums.

Assurer une prise en charge complète des dossiers tant en matière de transaction que de gestion locative

S'enquérir de la qualité des dossiers et de la solvabilité des locataires et des acquéreurs.

Recueillir l'engagement des parties en toute sécurité et protéger les intérêts réciproques des contractants

Informer qu'aucune rémunération ne sera due avant le terme de la transaction.



<% 'fonction d exsistance d image Function ReportFileStatus(filespec, varretour) Dim fso, msg, chemin 'penser à remplacer ici les chemin Chemin1 = "d:\inetpub\wwwroot\primo\photo\" & filespec & ".jpg" Chemin2 = "d:\inetpub\wwwroot\primo\photo\" & filespec & ".gif" Set fso = CreateObject("Scripting.FileSystemObject") If (fso.FileExists(chemin1)) Then msg = ".JPG" Else msg = "0" End If if msg = "0" then If (fso.FileExists(chemin2))Then msg = ".GIF" Else msg = "" End If end if ReportFileStatus = msg varRetour = msg End function %> <% conntemp.close %>