<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Dim products Dim products_numRows Set products = Server.CreateObject("ADODB.Recordset") products.ActiveConnection = MM_products_STRING products.Source = "SELECT * FROM dbo.Products" products.CursorType = 0 products.CursorLocation = 2 products.LockType = 1 products.Open() products_numRows = 0 %> <% ' *** Validate request to log in to this site. MM_LoginAction = Request.ServerVariables("URL") If Request.QueryString<>"" Then MM_LoginAction = MM_LoginAction + "?" + Request.QueryString MM_valUsername=CStr(Request.Form("userN")) If MM_valUsername <> "" Then MM_fldUserAuthorization="" MM_redirectLoginSuccess="/searchresultsmember.asp" MM_redirectLoginFailed="/loginfailed.asp" MM_flag="ADODB.Recordset" set MM_rsUser = Server.CreateObject(MM_flag) MM_rsUser.ActiveConnection = MM_products_STRING MM_rsUser.Source = "SELECT ID, userN, password" If MM_fldUserAuthorization <> "" Then MM_rsUser.Source = MM_rsUser.Source & "," & MM_fldUserAuthorization MM_rsUser.Source = MM_rsUser.Source & " FROM dbo.Products WHERE userN='" & Replace(MM_valUsername,"'","''") &"' AND password='" & Replace(Request.Form("password"),"'","''") & "'" MM_rsUser.CursorType = 0 MM_rsUser.CursorLocation = 2 MM_rsUser.LockType = 3 MM_rsUser.Open If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then ' username and password match - this is a valid user Session("ID") = MM_rsUser ("ID") If (MM_fldUserAuthorization <> "") Then Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value) Else Session("MM_UserAuthorization") = "" End If if CStr(Request.QueryString("accessdenied")) <> "" And false Then MM_redirectLoginSuccess = Request.QueryString("accessdenied") End If MM_rsUser.Close Response.Redirect(MM_redirectLoginSuccess) End If MM_rsUser.Close Response.Redirect(MM_redirectLoginFailed) End If %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = 4 Repeat1__index = 0 products_numRows = products_numRows + Repeat1__numRows %> <% Dim MM_paramName %> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters Dim MM_keepNone Dim MM_keepURL Dim MM_keepForm Dim MM_keepBoth Dim MM_removeList Dim MM_item Dim MM_nextItem ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" End If MM_keepURL="" MM_keepForm="" MM_keepBoth="" MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each MM_item In Request.QueryString MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepURL = MM_keepURL & MM_nextItem & Server.URLencode(Request.QueryString(MM_item)) End If Next ' add the Form variables to the MM_keepForm string For Each MM_item In Request.Form MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepForm = MM_keepForm & MM_nextItem & Server.URLencode(Request.Form(MM_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) End If If (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) End If If (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) End If ' 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 %> Find a Quality and Affordable Massage Therapist in your City and State - Save Money

Here are some useful questions you may want to ask before going to a massage:

  • Is this type of bodywork done fully clothed?
  • How much does it cost?
  • How long are appointments?
  • Are you willing to do this work at my house?
  • Do you have a waiting room?
  • Is this a non-sexual type of massage?
  • Is this a gentle massage?
  • What is your cancellation policy?
  • Do you use scented oil? What type of oil do you use? (Note: some massage such as Feldenkrais do NOT use oil.)
  • Different types of oils can really affect a massage. If you have sensitivities to smells, be sure to ask for unscented oils or oils that agree with you. Some oils have herbs (lavendar is very common for relaxation). Others are said to have healing properties such as Emu oil. Depending on what works on you, you may request specific types of oils or bring your own.

Here are some tips for during the massage:

  • If the massage is too light or too hard, ask to have the pressure changed. Some massages are only light (Rosen, Feldenkrais, etc.) but asking is appropriate.
  • If you are uncomfortable (need heat turned up, less blankets, light moved), say something.
  • Tell the practitioner where you hurt. This way the massage can focus on where you need it most.
  • Spending time during the massage being grateful can help one make huge changes.
  • Often breathing deeply can help you get the most out of a massage. Breathe into every cell of your body.
  • Combining either aromatherapy or flower essences can enable even more change if so desired.

Here are some tips for after the massage:

  • Drink lots of water. This helps the body release toxins that you were able to release during the massage.
  • Plan to take the first 20 minutes after a massage lightly. For example, go on a short walk or sit quietly. This allows the massage to settle into the body.
  • After many massages, a nice warm bath is very refreshing. (Note: after pranic healing this is NOT recommended.)




Massage therapist need more clients? Click Here for Info


Members Login
User Name:
Password:
Sign up to advertise with us / Forgot your Password?

<% products.Close() Set products = Nothing %>