<% if request.queryString("Submit") = "Create a Wish List" then response.redirect("buyerlogin.asp") end if if request.queryString("Submit") = "Whole Wish List" then set rs = server.CreateObject("ADODB.recordset") strsql = "Select * from buyerslisting order by dist_no" rs.Open strsql , conn , 3 , 3 end if if request.queryString("Submit") = "Search" then if not request.queryString("hdb")="" and not request.queryString("pte")="" then set rs = server.createObject("ADODB.recordset") str = "Select * from buyerslisting where type_hdb = '"&trim(request.queryString("hdb"))&"' or type_pte='"&trim(request.queryString("pte"))&"' and disabled = 0 order by dist_no" rs.open str, conn, 3, 3 if rs.recordcount = 0 then msg = "null" end if elseif not request.queryString("hdb") = "" then set rs = server.createObject("ADODB.recordset") str = "Select * from buyerslisting where type_hdb = '"&trim(request.queryString("hdb"))&"' and disabled = 0 order by dist_no" rs.open str, conn, 3, 3 if rs.recordcount = 0 then msg = "null" end if elseif not request.queryString("pte") = "" then set rs = server.createObject("ADODB.recordset") str = " Select * from buyerslisting where type_pte='"&trim(request.queryString("pte"))&"' and disabled = 0 order by dist_no" rs.open str, conn, 3, 3 if rs.recordcount = 0 then msg = "null" end if else set rs = server.CreateObject("ADODB.recordset") strsql = "Select * from buyerslisting where disabled = 0 order by dist_no" rs.Open strsql , conn , 3 , 3 end if end if if request.queryString("Submit") = "" then set rs = server.CreateObject("ADODB.recordset") strsql = "Select * from buyerslisting where disabled = 0 order by dist_no" rs.Open strsql , conn , 3 , 3 end if dim counter counter = 0 '--------------------- ' code for pagination '--------------------- Dim thePageNo , thePageSize , maxPages, maxRecords , recordStatus thePageNo = request("whichpage") If thePageNo="" then thePageNo=1 End if thePageSize=request("pagesize") If thePageSize="" then thePageSize=20 End if if rs.RecordCount <> 0 then rs.MoveFirst rs.PageSize = thePageSize maxPages = cint(rs.PageCount) maxRecords = cint(rs.PageSize) rs.AbsolutePage = thePageNo recordStatus = 0 bgcolor="#ffffff" end if if request("no") = "" then no = 1 else no = request("no") end if %> Wish List
New! Click Words translated and grammer may not be accurate as we're using online transactor. Read in English for accuracy.
Search Property: <% set rs1 = server.createObject("ADODB.recordset") str = "Select * from propertytype where propertytype = 'HDB' order by property " rs1.open str, conn, 3, 3 %> <%rs1.close str = "Select * from propertytype where propertytype = 'Private' order by property " rs1.open str, conn, 3, 3 %>
Click Icon on the left to input property wanted to Rent or Purchase Today! Donor Agent, please ensure that you entered your buyer's name and contact (to avoid rejection), address by project or Blk No, Rd name or Office. Enter your own email to receive progress update .....more info & procedures

<% if rs.recordcount = 0 then %>

No Wish List Available
<% else %> <% if not rs.eof then do until rs.eof or recordStatus >= maxRecords if not trim(rs("status")) = "no" then counter = counter + 1 %> <% typ = trim(rs("type_hdb")) if typ = "" or typ = "select" then typ = trim(rs("type_pte")) end if %> <% end if recordStatus = recordStatus + 1 rs.movenext loop end if %>
<% call PageNavBar %>
District No: <%= replace(rs("dist_no"),"^","'")%> Land: <%= rs("land")&" "& rs("land_unit")%> Built: <%= rs("built")&" "& rs("built_unit")%> Price: S<%if trim(rs("budget"))<> "" then response.write formatcurrency(trim(rs("budget")),0) end if%>
Type: <%= typ%> Block No: <%= rs("blk_no") %> Floor Level: <%= rs("level_unit") %> <% if not trim(lcase(rs("status"))) = "available" and not trim(lcase(rs("status"))) = "marketing soon" and not trim(lcase(rs("status"))) = "now marketing" and not trim(lcase(rs("status"))) = "sold" and not trim(lcase(rs("status"))) = "rented" then %>Agent: <%=rs("status")%> <% if trim(rs("contact_no")) <> "" and not isnull(trim(rs("contact_no"))) then%>
Contact No: <%=rs("contact_no")%> <%end if%> <%elseif trim(lcase(rs("status"))) = "available" then%> Status: " class="whiteVer" target="_new">Available <%else%> Status: <%=rs("status")%> <% end if%>
Category: <%= rs("catgory") %> Tenure: <%= trim(rs("tenure")) %>
Renovation: <% if trim(rs("renovation")) <> "" and not isnull(trim(rs("renovation"))) then Response.write replace(trim(rs("renovation")),"^","'") end if%>
Facilities: <% if trim(rs("facility")) <> "" and not isnull(trim(rs("facility"))) then Response.write replace(trim(rs("facility")),"^","'") end if%>

Remarks: <% if trim(rs("remarks")) <> "" and not isnull(trim(rs("remarks"))) then Response.write replace(trim(rs("remarks")),"^","'") %>
Description:<% if trim(rs("description")) <> "" and not isnull(trim(rs("description"))) then Response.write replace(trim(rs("description")),"^","'") end if %>
 
<% call PageNavBar %>
<% end if if rs.recordcount <> 0 and counter = 0 then %>
No Wish List Available
<% end if %>

Donor Agent = The person who input buyer or buyers into wishlist to collect 20% referral fee. Anyone from the public can be a Donor Agent. Heard of friends or relative wanted to purchase a property? Donor them into 'Wishlist Online' and collect 20% referral fee. Free and easy sign-up. Must have email to work. Seek permission first. Do not go for agents who promised you 30% to even 60% referral. Most of the time they can swing to other agent and there is no trace and no proof for you to redeem your referral fee and you'll get nothing for you effort. Obviously, the amount of work they'll have to do couldn't support the fee they will get, so they will not fufill their promise. Our system generate email proof. To service you better, you can also raise Trouble Tickets.
All welcome to input properties wanted. First time user, please register, it is free! Your particulars WILL NOT be shown online. We'll try our best to fulfill your wish. Referral fee payable for all referred cases upon completion. Agent interested to bring out buyers detail to serve them must have specially issued User ID and Password.
Q1 What do I need to do in order to have this Special User ID?
A1 Sent email to admin@homestanley.net and in the email subject enter "Want to join Affiliated Agent Program" Upon recieving your email, we will conduct a simple interview process and a training will be provided to equip you with the know-how of using the TOTAL system.
Q2 How do I make sure that I will be entitled to my fair share of commission (20% referral) ?
A2 You will be notified by email whenever Affiliated Agent click 'Available' to retrieve the buyers' contact and particular. As a courtesy, spare some time to call the serving agent asap to assist him or her, provide more useful information necessary for better chance of closing.
Our Assurance! Affiliated Agent had gone through interview process and one of the criteria is practice GOOD ETHICS, naturally, agent who always call another agent by posing as buyer to seek out information, we WILL NOT take in this group of agent as Affiliated Agent, they have the intention to deceive.
Q3 If I change my mind and decided to serve the buyer myself, how do I do it?
A3 Firstly, check if the buyer is 'Available' If an affiliated agent already taken the buyer to serve, then it is best that you leave the buyer with the agent. But on the other hand the if status still reflect as 'Available' You can retrieve the buyer by clicking 'Available' the system will not only sent emails but also automatically insert your name and contact as serving agent.
Q4 What is the different between Affiliated Agent and Non-Affiliated Agent?
A4 Affiliated Agents can input as many buyers as they like with the same User ID and retrieve buyers' contact and particulars whereas Non-Affiliated agent can only input one buyer at one time, that means another buyer, they will have to do the sign-up again. ENSURE THAT BUYERS' NAME AND CONTACT IS ENTERED ACCORDINGLY. Donor agent entering their own name and contact in the Buyers' input box WILL BE REJECTED!

©2003-2004 Copyright Homestanley.com All Right Reserved
Increasing number of web sites using this FREE SERVICE:-
AllSGrealtors.com, Next-Property.com, AllSGrent.com, AllSGproperties.com, Profitmind.com, Chonghok.com,
Propertych.com, Ideal-Sghome.com, Propertyeric.com, Property-hub.com, AllSGproperties.com
Powered by Homestanley.net Website Designer