<%@LANGUAGE="VBSCRIPT"%> <% set rsNavigation = Server.CreateObject("ADODB.Recordset") rsNavigation.ActiveConnection = MM_connCategories_STRING rsNavigation.Source = "SELECT category_ID, category_name FROM categories ORDER BY order_by ASC" rsNavigation.CursorType = 0 rsNavigation.CursorLocation = 2 rsNavigation.LockType = 3 rsNavigation.Open() rsNavigation_numRows = 0 %> <% Dim Repeat1__numRows Repeat1__numRows = -1 Dim Repeat1__index Repeat1__index = 0 rsNavigation_numRows = rsNavigation_numRows + Repeat1__numRows %> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" MM_keepURL="":MM_keepForm="":MM_keepBoth="":MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each Item In Request.QueryString NextItem = "&" & Item & "=" If (InStr(1,MM_removeList,NextItem,1) = 0) Then MM_keepURL = MM_keepURL & NextItem & Server.URLencode(Request.QueryString(Item)) End If Next ' add the Form variables to the MM_keepForm string For Each Item In Request.Form NextItem = "&" & Item & "=" If (InStr(1,MM_removeList,NextItem,1) = 0) Then MM_keepForm = MM_keepForm & NextItem & Server.URLencode(Request.Form(Item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm if (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) if (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) if (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %> City Creek Mortgage

<% While ((Repeat1__numRows <> 0) AND (NOT rsNavigation.EOF)) %>
" class="lnk"><%=(rsNavigation.Fields.Item("category_name").Value)%>
<% Repeat1__index=Repeat1__index+1 Repeat1__numRows=Repeat1__numRows-1 rsNavigation.MoveNext() Wend %>

"The Highest Compliment I can ever receive is a personal referral
from you."

Request a Rate Quote

City Creek Mortgage Corporation (CCM) has created a lending network that makes comparing rate quotes amazingly easy. We can help you select the right mortgage from a myriad of choices, allowing you to bypass checking the rates of multiple banks and mortgage companies. Because interest rates and the positioning of lenders in the marketplace often change, CCM does not post interest rates online; however, we continually shop interest rates and discount points with dozens of lenders. As a result, we are able to offer you the best overall price on various products with numerous lenders.
For people who register with us, we also provide access to the current average interest rates for the top mortgage wholesalers in the country. To register, please fill out the form below and we will email you a user name and a password that will allow you access to the system.


For more information visit Rate Watch or Low Cost Guarantee.

Name:
Address:
City:
State:
Zip:
Email Address:
Phone Number:
Loan Purpose:
Loan Program:
Loan Type:
if variable:
Loan Term:
Loan Amount:
Approx. Value of Home:
Purchase price (if applicable):




 


 

<% rsNavigation.Close() %>