
<%@ Language=VBScript %> 
 <%
'--------------------------------------------------------------------
' Microsoft ADO
'
' (c) 1996-1998 Microsoft Corporation.  All Rights Reserved.
'
'
'
' ADO constants include file for VBScript
'
'--------------------------------------------------------------------

'---- CursorTypeEnum Values ----
Const adOpenForwardOnly = 0
Const adOpenKeyset = 1
Const adOpenDynamic = 2
Const adOpenStatic = 3

'---- CursorOptionEnum Values ----
Const adHoldRecords = &H00000100
Const adMovePrevious = &H00000200
Const adAddNew = &H01000400
Const adDelete = &H01000800
Const adUpdate = &H01008000
Const adBookmark = &H00002000
Const adApproxPosition = &H00004000
Const adUpdateBatch = &H00010000
Const adResync = &H00020000
Const adNotify = &H00040000
Const adFind = &H00080000
Const adSeek = &H00400000
Const adIndex = &H00800000

'---- LockTypeEnum Values ----
Const adLockReadOnly = 1
Const adLockPessimistic = 2
Const adLockOptimistic = 3
Const adLockBatchOptimistic = 4

'---- ExecuteOptionEnum Values ----
Const adRunAsync = &H00000010
Const adAsyncExecute = &H00000010
Const adAsyncFetch = &H00000020
Const adAsyncFetchNonBlocking = &H00000040
Const adExecuteNoRecords = &H00000080

'---- ConnectOptionEnum Values ----
Const adAsyncConnect = &H00000010

'---- ObjectStateEnum Values ----
Const adStateClosed = &H00000000
Const adStateOpen = &H00000001
Const adStateConnecting = &H00000002
Const adStateExecuting = &H00000004
Const adStateFetching = &H00000008

'---- CursorLocationEnum Values ----
Const adUseServer = 2
Const adUseClient = 3

'---- DataTypeEnum Values ----
Const adEmpty = 0
Const adTinyInt = 16
Const adSmallInt = 2
Const adInteger = 3
Const adBigInt = 20
Const adUnsignedTinyInt = 17
Const adUnsignedSmallInt = 18
Const adUnsignedInt = 19
Const adUnsignedBigInt = 21
Const adSingle = 4
Const adDouble = 5
Const adCurrency = 6
Const adDecimal = 14
Const adNumeric = 131
Const adBoolean = 11
Const adError = 10
Const adUserDefined = 132
Const adVariant = 12
Const adIDispatch = 9
Const adIUnknown = 13
Const adGUID = 72
Const adDate = 7
Const adDBDate = 133
Const adDBTime = 134
Const adDBTimeStamp = 135
Const adBSTR = 8
Const adChar = 129
Const adVarChar = 200
Const adLongVarChar = 201
Const adWChar = 130
Const adVarWChar = 202
Const adLongVarWChar = 203
Const adBinary = 128
Const adVarBinary = 204
Const adLongVarBinary = 205
Const adChapter = 136
Const adFileTime = 64
Const adDBFileTime = 137
Const adPropVariant = 138
Const adVarNumeric = 139

'---- FieldAttributeEnum Values ----
Const adFldMayDefer = &H00000002
Const adFldUpdatable = &H00000004
Const adFldUnknownUpdatable = &H00000008
Const adFldFixed = &H00000010
Const adFldIsNullable = &H00000020
Const adFldMayBeNull = &H00000040
Const adFldLong = &H00000080
Const adFldRowID = &H00000100
Const adFldRowVersion = &H00000200
Const adFldCacheDeferred = &H00001000
Const adFldKeyColumn = &H00008000

'---- EditModeEnum Values ----
Const adEditNone = &H0000
Const adEditInProgress = &H0001
Const adEditAdd = &H0002
Const adEditDelete = &H0004

'---- RecordStatusEnum Values ----
Const adRecOK = &H0000000
Const adRecNew = &H0000001
Const adRecModified = &H0000002
Const adRecDeleted = &H0000004
Const adRecUnmodified = &H0000008
Const adRecInvalid = &H0000010
Const adRecMultipleChanges = &H0000040
Const adRecPendingChanges = &H0000080
Const adRecCanceled = &H0000100
Const adRecCantRelease = &H0000400
Const adRecConcurrencyViolation = &H0000800
Const adRecIntegrityViolation = &H0001000
Const adRecMaxChangesExceeded = &H0002000
Const adRecObjectOpen = &H0004000
Const adRecOutOfMemory = &H0008000
Const adRecPermissionDenied = &H0010000
Const adRecSchemaViolation = &H0020000
Const adRecDBDeleted = &H0040000

'---- GetRowsOptionEnum Values ----
Const adGetRowsRest = -1

'---- PositionEnum Values ----
Const adPosUnknown = -1
Const adPosBOF = -2
Const adPosEOF = -3

'---- enum Values ----
Const adBookmarkCurrent = 0
Const adBookmarkFirst = 1
Const adBookmarkLast = 2

'---- MarshalOptionsEnum Values ----
Const adMarshalAll = 0
Const adMarshalModifiedOnly = 1

'---- AffectEnum Values ----
Const adAffectCurrent = 1
Const adAffectGroup = 2
Const adAffectAll = 3
Const adAffectAllChapters = 4

'---- ResyncEnum Values ----
Const adResyncUnderlyingValues = 1
Const adResyncAllValues = 2

'---- CompareEnum Values ----
Const adCompareLessThan = 0
Const adCompareEqual = 1
Const adCompareGreaterThan = 2
Const adCompareNotEqual = 3
Const adCompareNotComparable = 4

'---- FilterGroupEnum Values ----
Const adFilterNone = 0
Const adFilterPendingRecords = 1
Const adFilterAffectedRecords = 2
Const adFilterFetchedRecords = 3
Const adFilterPredicate = 4
Const adFilterConflictingRecords = 5

'---- SearchDirectionEnum Values ----
Const adSearchForward = 1
Const adSearchBackward = -1

'---- PersistFormatEnum Values ----
Const adPersistADTG = 0
Const adPersistXML = 1

'---- StringFormatEnum Values ----
Const adStringXML = 0
Const adStringHTML = 1
Const adClipString = 2

'---- ConnectPromptEnum Values ----
Const adPromptAlways = 1
Const adPromptComplete = 2
Const adPromptCompleteRequired = 3
Const adPromptNever = 4

'---- ConnectModeEnum Values ----
Const adModeUnknown = 0
Const adModeRead = 1
Const adModeWrite = 2
Const adModeReadWrite = 3
Const adModeShareDenyRead = 4
Const adModeShareDenyWrite = 8
Const adModeShareExclusive = &Hc
Const adModeShareDenyNone = &H10

'---- IsolationLevelEnum Values ----
Const adXactUnspecified = &Hffffffff
Const adXactChaos = &H00000010
Const adXactReadUncommitted = &H00000100
Const adXactBrowse = &H00000100
Const adXactCursorStability = &H00001000
Const adXactReadCommitted = &H00001000
Const adXactRepeatableRead = &H00010000
Const adXactSerializable = &H00100000
Const adXactIsolated = &H00100000

'---- XactAttributeEnum Values ----
Const adXactCommitRetaining = &H00020000
Const adXactAbortRetaining = &H00040000

'---- PropertyAttributesEnum Values ----
Const adPropNotSupported = &H0000
Const adPropRequired = &H0001
Const adPropOptional = &H0002
Const adPropRead = &H0200
Const adPropWrite = &H0400

'---- ErrorValueEnum Values ----
Const adErrInvalidArgument = &Hbb9
Const adErrNoCurrentRecord = &Hbcd
Const adErrIllegalOperation = &Hc93
Const adErrInTransaction = &Hcae
Const adErrFeatureNotAvailable = &Hcb3
Const adErrItemNotFound = &Hcc1
Const adErrObjectInCollection = &Hd27
Const adErrObjectNotSet = &Hd5c
Const adErrDataConversion = &Hd5d
Const adErrObjectClosed = &He78
Const adErrObjectOpen = &He79
Const adErrProviderNotFound = &He7a
Const adErrBoundToCommand = &He7b
Const adErrInvalidParamInfo = &He7c
Const adErrInvalidConnection = &He7d
Const adErrNotReentrant = &He7e
Const adErrStillExecuting = &He7f
Const adErrOperationCancelled = &He80
Const adErrStillConnecting = &He81
Const adErrNotExecuting = &He83
Const adErrUnsafeOperation = &He84

'---- ParameterAttributesEnum Values ----
Const adParamSigned = &H0010
Const adParamNullable = &H0040
Const adParamLong = &H0080

'---- ParameterDirectionEnum Values ----
Const adParamUnknown = &H0000
Const adParamInput = &H0001
Const adParamOutput = &H0002
Const adParamInputOutput = &H0003
Const adParamReturnValue = &H0004

'---- CommandTypeEnum Values ----
Const adCmdUnknown = &H0008
Const adCmdText = &H0001
Const adCmdTable = &H0002
Const adCmdStoredProc = &H0004
Const adCmdFile = &H0100
Const adCmdTableDirect = &H0200

'---- EventStatusEnum Values ----
Const adStatusOK = &H0000001
Const adStatusErrorsOccurred = &H0000002
Const adStatusCantDeny = &H0000003
Const adStatusCancel = &H0000004
Const adStatusUnwantedEvent = &H0000005

'---- EventReasonEnum Values ----
Const adRsnAddNew = 1
Const adRsnDelete = 2
Const adRsnUpdate = 3
Const adRsnUndoUpdate = 4
Const adRsnUndoAddNew = 5
Const adRsnUndoDelete = 6
Const adRsnRequery = 7
Const adRsnResynch = 8
Const adRsnClose = 9
Const adRsnMove = 10
Const adRsnFirstChange = 11
Const adRsnMoveFirst = 12
Const adRsnMoveNext = 13
Const adRsnMovePrevious = 14
Const adRsnMoveLast = 15

'---- SchemaEnum Values ----
Const adSchemaProviderSpecific = -1
Const adSchemaAsserts = 0
Const adSchemaCatalogs = 1
Const adSchemaCharacterSets = 2
Const adSchemaCollations = 3
Const adSchemaColumns = 4
Const adSchemaCheckConstraints = 5
Const adSchemaConstraintColumnUsage = 6
Const adSchemaConstraintTableUsage = 7
Const adSchemaKeyColumnUsage = 8
Const adSchemaReferentialConstraints = 9
Const adSchemaTableConstraints = 10
Const adSchemaColumnsDomainUsage = 11
Const adSchemaIndexes = 12
Const adSchemaColumnPrivileges = 13
Const adSchemaTablePrivileges = 14
Const adSchemaUsagePrivileges = 15
Const adSchemaProcedures = 16
Const adSchemaSchemata = 17
Const adSchemaSQLLanguages = 18
Const adSchemaStatistics = 19
Const adSchemaTables = 20
Const adSchemaTranslations = 21
Const adSchemaProviderTypes = 22
Const adSchemaViews = 23
Const adSchemaViewColumnUsage = 24
Const adSchemaViewTableUsage = 25
Const adSchemaProcedureParameters = 26
Const adSchemaForeignKeys = 27
Const adSchemaPrimaryKeys = 28
Const adSchemaProcedureColumns = 29
Const adSchemaDBInfoKeywords = 30
Const adSchemaDBInfoLiterals = 31
Const adSchemaCubes = 32
Const adSchemaDimensions = 33
Const adSchemaHierarchies = 34
Const adSchemaLevels = 35
Const adSchemaMeasures = 36
Const adSchemaProperties = 37
Const adSchemaMembers = 38

'---- SeekEnum Values ----
Const adSeekFirstEQ = &H1
Const adSeekLastEQ = &H2
Const adSeekAfterEQ = &H4
Const adSeekAfter = &H8
Const adSeekBeforeEQ = &H10
Const adSeekBefore = &H20

'---- ADCPROP_UPDATECRITERIA_ENUM Values ----
Const adCriteriaKey = 0
Const adCriteriaAllCols = 1
Const adCriteriaUpdCols = 2
Const adCriteriaTimeStamp = 3

'---- ADCPROP_ASYNCTHREADPRIORITY_ENUM Values ----
Const adPriorityLowest = 1
Const adPriorityBelowNormal = 2
Const adPriorityNormal = 3
Const adPriorityAboveNormal = 4
Const adPriorityHighest = 5

'---- CEResyncEnum Values ----
Const adResyncNone = 0
Const adResyncAutoIncrement = 1
Const adResyncConflicts = 2
Const adResyncUpdates = 4
Const adResyncInserts = 8
Const adResyncAll = 15

'---- ADCPROP_AUTORECALC_ENUM Values ----
Const adRecalcUpFront = 0
Const adRecalcAlways = 1
%>

 [an error occurred while processing this directive]

<%

Dim objCDOMail 'The CDO object

'Variables for database processing
Dim CurrentDateTime
Dim dcnDB	'As ADODB.Connection
Dim rsReg	
Dim ServerPath
ServerPath = Server.MapPath(".")
Dim DBLocation
DBLocation = ServerPath & "..\databases\FFS_emailaddr.mdb"

%>
<%
if isempty(Request.Form("SubmitRequest")) then
	TheMessage1 = "<b>Fast Feng Shui Newsletter Subscription Form</b>"
	TheMessage2 = "Note that fields with ** are required.<BR>"
else
	TheName = Request.Form("Name")
	TheEmailAddress = Request.Form("EmailAddress")
	If Request.Form("HTML") = "HTML" then TheFormat = "HTML" else TheFormat = "Text"

	TheMessage = Request.Form("Message")

        FutureTitle = Request.Form("FFSProsperity") & vbCrLf & Request.Form("FFSWriters") & vbCrLf & Request.Form("FFSNewlyweds")
	TheInterest = Request.Form("career") & vbCrLf & Request.Form("creativity") & vbCrLf & Request.Form("fame") & vbCrLf & Request.Form("family") & vbCrLf & Request.Form("travel") & vbCrLf & Request.Form("love") & vbCrLf & Request.Form("prosperity") & vbCrLf & Request.Form("spirituality")

	if isempty(Request.Form("Name")) or Request.Form("Name") = "" then
		TheMessage1 = "The form was not submitted."
 		TheMessage2 = "Name is required!"  
	elseif isempty(Request.Form("EmailAddress")) or Request.Form("EmailAddress") = "" then
		TheMessage1 = "The form was not submitted."
		TheMessage2 = "Email Address is required!"
	elseif instr(Request.Form("EmailAddress"),"@") = 0 then
		TheMessage1 = "The form was not submitted."
		TheMessage2 = "Email Address is invalid!"		
	elseif instr(Request.Form("EmailAddress"),".") = 0 then
		TheMessage1 = "The form was not submitted."
		TheMessage2 = "Email Address is invalid!"
	end if		
		
	if TheMessage1 <> "The form was not submitted." then
		Set dcnDB = Server.CreateObject("ADODB.Connection")
		cString = "fastfeng01"

		dcnDB.Open cString
		CurrentDateTime = Now
		Set rsReg = Server.CreateObject("ADODB.Recordset")
		rsReg.Open "SELECT * FROM subscribers", dcnDB, adOpenKeyset, adLockOptimistic

		rsReg.AddNew
		rsReg("date_entered") = CurrentDateTime
		rsReg("name") = TheName
		rsReg("email") = TheEmailAddress
		rsReg("format") = TheFormat
		rsReg("futuretitle") = FutureTitle
		rsReg("interest") = TheInterest
		rsReg("message") = TheMessage

		rsReg.Update
		rsReg.Close
		dcnDB.Close
		Set dcnDB = Nothing
	


		TheMessage1 = "Thanks for subscribing with us."
		TheMessage2 = "Your request has been submitted!<BR>Please enjoy the rest of the site."

		EmailMessage = "Fast Feng Shui, request info/subscribe details:" _
		 & chr(13) & chr(13)
		EmailMessage = EmailMessage & "Name: " & TheName & chr(13)
		EmailMessage = EmailMessage & "Email Address: " & TheEmailAddress & chr(13)
  		EmailMessage = EmailMessage & "Email format: " & TheFormat & chr(13)
		EmailMessage = EmailMessage & "Future Title(s): " & FutureTitle & chr(13)		
           	EmailMessage = EmailMessage & "Interest(s): " & TheInterest & chr(13)
		EmailMessage = EmailMessage & "Message: " & TheMessage & chr(13)	


			WelcomeMessage = "Dear " & TheName & "," & vbCrLf & vbCrLf
			WelcomeMessage = WelcomeMessage & AutoReply
	              ' Create an instance of the NewMail object.
		      ' Send auto reply to signee
			Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
	
		      ' Set the properties of the object
			objCDOMail.From = "Stephanie Roberts<stephanie@fastfengshui.com>"
			objCDOMail.To = TheEmailAddress
			objCDOMail.Subject = "Welcome to Fast Feng Shui"
			objCDOMail.Body = WelcomeMessage
	
			' Send the message!
			objCDOMail.Send

			' Set the object to nothing because it immediately becomes
			' invalid after calling the Send method.
			Set objCDOMail = Nothing		



	      ' Create an instance of the NewMail object.
              ' Send info request to HM
		Set objCDOMail = Server.CreateObject("CDONTS.NewMail")
	
	      ' Set the properties of the object
	
		objCDOMail.From = TheName & "<" & TheEmailAddress & ">"
		objCDOMail.To = "lotuspnd@pixi.com"
		objCDOMail.Subject = "New Subscriber!"
		objCDOMail.Body = EmailMessage

		' Send the message!
		objCDOMail.Send
		Set objCDOMail = Nothing
	end if
end if	
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN">
<html>
<head>
<title>Fast Feng Shui Newsletter</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style type="text/css">
<!--
.util_heading {  font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 10pt; font-style: normal; line-height: normal; font-weight: bold; color: #339966}
-->
</style><link rel="stylesheet" href="master.css">
<script src="quicknav.js"></script>
<link rel="stylesheet" href="colortext"><link rel="stylesheet" href="navigation"></head>

<body topmargin="0" bottommargin="0" leftmargin="0" rightmargin="0" marginheight="0" marginwidth="0" bgcolor="#FFFFFF">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
  <tr> 
    <td width="144" rowspan="2" valign="top" bgcolor="#339966" align="center"> 
      <table width="144" border="0" cellspacing="0" cellpadding="0">
        <tr bgcolor="#339966" valign="top"> 
          <td height="212" width="144"> 
            <p><img src="images/path%20Kaenae.jpg" width="144" height="194"></p>
          </td>
        </tr>
        <tr bgcolor="#339966" valign="top"> 
          <td> 
            <div align="center"> 
              <p><img src="images/subscribe_title.gif" width="129" height="33"><br>
              </p>
            </div>
          </td>
        </tr>
      </table>

    <p align="center" class="sidebar_text_sub"><br>
        More FREE Feng Shui information:</p>
      <p align="center"><a href="faqs.htm" class="sidebar_text_sub">FAQs</a><br>
        <a href="articles.htm" class="sidebar_text_sub">Articles</a> <br>
        <a href="ffsbook_quicktips.htm" class="sidebar_text_sub">Quick Tips</a><br>
        <a href="books.htm" class="sidebar_text_sub">Book Excerpts</a><br>
        <a href="free_downloads.htm" class="sidebar_text_sub">Free Downloads</a><br>
      </p>
      <p align="center">&nbsp;</p>
      <p align="center">&nbsp;</p>
      <table width="90%" border="1" cellspacing="0" cellpadding="1" bordercolor="#66FF66">
        <tr align="center"> 
          <td> 
            <p><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><b><font color="#FFFFFF">Partners</font></b></font></p>
          </td>
        </tr>
      </table>
      <table width="90%" border="0" cellspacing="0" cellpadding="5">
        <tr valign="top"> 
          <td height="69"><span class="sidenav_blk8"><a href="http://www.jamilin.com" target="_blank" class="sidebar_text">Feng 
            Shui Interior Design<br>
            </a> <a href="http://www.feng-shui-ebooks.com"  class="sidebar_text" target="_blank">Feng-Shui-Ebooks<br>
            </a> <a href="http://www.clutter-free-forever.com"  class="sidebar_text" target="_blank">Clutter-Free 
            Forever<br>
            </a> <a href="http://www.allaboutprosperity.com"  class="sidebar_text" target="_blank">All 
            About Prosperity<br>
            </a> <a href="http://www.emf-health.com"  class="sidebar_text" target="_blank">EMF-Health-BIOPRO</a> 
            </span></td>
        </tr>
      </table>
      <p align="center">&nbsp; </p>
    </td>
    <td height="55" width="900" valign="top"> 
      <table width="100%" border="0" cellspacing="0" cellpadding="0" height="66">
        <tr bgcolor="#FFFFFF"> 
          <td height="24" colspan="2"> &nbsp;&nbsp;&nbsp; <a href="index.htm" class="ffs_logo_util">FAST 
            FENG SHUI.com</a></td>
        </tr>
        <tr bgcolor="#339966"> 
          <td height="42" valign="top" width="500"> 
            <table border="0" cellspacing="0" cellpadding="0" height="26">
              <tr> 
                <td height="26"><img src="images/util_topnav.gif" width="447" height="26" hspace="2" usemap="#utilnavmap" border="0"></td>
              </tr>
            </table>
            <table border="0" cellspacing="0" cellpadding="0" height="16" width="450">
              <tr valign="top"> 
                <td><span class="util_nav_util">&nbsp;&nbsp;&nbsp;&nbsp; <a href="index.htm" class="util_nav_util">Home</a> 
                  &nbsp;&nbsp; <a href="contact.htm" class="util_nav_util">Contact</a> 
                  &nbsp;&nbsp; <b>Subscribe</b> &nbsp;&nbsp; <script src="tellafriend2.js"></script> 
                  &nbsp;&nbsp; <a href="links_main.htm" class="util_nav_util">Links 
                  &amp; Resources</a> &nbsp;&nbsp; <a href="sitemap.htm" class="util_nav_util">Site 
                  Map</a></span></td>
              </tr>
            </table>
          </td>
          <td align="left" valign="middle">&nbsp; </td>
        </tr>
      </table>
    </td>
  </tr>
  <tr> 
    <td width="900" bgcolor="#FFFFFF" valign="top" height="740"> 
      <table width="647" border="0" cellspacing="0" cellpadding="4">
        <tr valign="top"> 
          <td height="30" width="4"> 
            <p><span class="util_nav"> </span> </p>
          </td>
          <td height="30" width="147"> 
            <table width="100" border="0" cellspacing="0" cellpadding="0">
              <tr align="left" valign="bottom"> 
                <form name="dropdown">
                  <td width="205"> 
                    <select name="site" class="fine_text7" onChange='newpage();'>
                      <option selected>-Quick navigation- 
                      <option>&#149; Home page 
                      <option>&#149; Books 
                      <option>&nbsp&nbsp&nbsp Fast Feng Shui 
                      <option>&nbsp&nbsp&nbsp&nbsp&nbsp . Excerpts 
                      <option>&nbsp&nbsp&nbsp&nbsp&nbsp . Reviews 
                      <option>&nbsp&nbsp&nbsp&nbsp&nbsp . Author bio 
                      <option>&nbsp&nbsp&nbsp&nbsp&nbsp . Your Power Spots 
                      <option>&nbsp&nbsp&nbsp&nbsp&nbsp . Quick Tips 
                      <option>&nbsp&nbsp&nbsp FFS for Singles 
                      <option>&nbsp&nbsp&nbsp&nbsp&nbsp . Excerpts 
                      <option>&nbsp&nbsp&nbsp&nbsp&nbsp . Reviews 
                      <option>&nbsp&nbsp&nbsp&nbsp&nbsp . Author bio 
                      <option>&nbsp&nbsp&nbsp FFS for Prosperity 
                      <option>&nbsp&nbsp&nbsp FFS for Artists 
                      <option>&nbsp&nbsp&nbsp FFS for Newlyweds 
                      <option>&#149; Products 
                      <option>&nbsp&nbsp&nbsp Bells/Gongs 
                      <option>&nbsp&nbsp&nbsp Candles 
                      <option>&nbsp&nbsp&nbsp Mobiles 
                      <option>&nbsp&nbsp&nbsp Water Fountains 
                      <option>&nbsp&nbsp&nbsp Wind Chimes 
                      <option>&#149; FAQs 
                      <option>&nbsp&nbsp&nbsp About Feng Shui 
                      <option>&nbsp&nbsp&nbsp Ba Gua/Floor Plans 
                      <option>&nbsp&nbsp&nbsp Cleaning/Decorating 
                      <option>&nbsp&nbsp&nbsp Correct Influences 
                      <option>&#149; Articles 
                      <option>&#149; eBooks 
                      <option>======== 
                      <option>FREE downloads 
                      <option>Newsletter Archives 
                    </select>
                  </td>
                </form>
              </tr>
            </table>
          </td>
          <td height="30" width="281" align="left" class="fine_text7" valign="middle">&nbsp;</td>
          <td height="30" width="183" align="center" class="fine_text7" valign="middle">&nbsp;</td>
        </tr>
      </table>
      <table width="600" border="0" cellspacing="0" cellpadding="22">
        <tr> 
          <td> 
            <p class="main_text_heading">Fast Feng Shui Newsletter</p>
            <p class="main_text">Create a home environment that supports your 
              life aspirations. Do you wish to improve your relationships, career, 
              cash flow, health, etc.? Learn how to enhance the flow of chi in 
              your home and invite harmony in your life. <a href="fast_fengshui_book.htm">Click 
              here</a> to get your copy of our highly-acclaimed best-selling book, 
              <a href="fast_fengshui_book.htm">Fast Feng Shui: 9 Simple Principles 
              for Transforming Your Life by Energizing Your Home</a>.</p>
            <p class="main_text">We also invite you to fill in the form below 
              to subscribe to our twice-monthly newsletter. Each informative issue 
              provides one or more of the following:</p>
            <ul>
              <li><span class="main_text">FREE <b>feng shui tips</b> to enhance 
                a particular area of your life and home</span></li>
              <li><span class="main_text">Announcements when <b>new articles and/or 
                ebooks</b> are made available on the site</span></li>
              <li><span class="main_text">Special product/services <b>discount 
                offers</b> available to subscribers only</span></li>
              <li><span class="main_text">Occasionally, <b>FREE beta-testing</b> 
                information products (ebooks and/or home study courses) available 
                to volunteers selected from our subscriber base</span></li>
            </ul>
            <p class="main_text"><a href="nlt_feb12_2008lovepotion.htm">Click 
              here to read our current issue</a><br>
              <a href="newsletter_archives.htm">Click here to browse our newsletter 
              back issues</a></p>
            <p class="main_text"><a href="#rss"><b>Do you RSS?</b></a></p>

            </td>
        </tr>
      </table>
      <br>
      <table width="265" border="0" cellspacing="0" cellpadding="5" bgcolor="#99FF66" align="center">
        <tr> 
          <td height="112"> 
              <form method="post" action="http://www.aweber.com/scripts/addlead.pl"><input type="hidden" name="PHPSESSID" value="acbf935fa43e53b3f55ed54b0a63ac12" />
<input type="hidden" name="meta_web_form_id" value="569486673">
<input type="hidden" name="meta_split_id" value="">
<input type="hidden" name="unit" value="fastfengshui1">
<input type="hidden" name="redirect" value="http://www.fastfengshui.com/subscribe_thanks.htm">
<input type="hidden" name="meta_adtracking" value="inpg">
<input type="hidden" name="meta_message" value="1">
<input type="hidden" name="meta_required" value="from,name">
<input type="hidden" name="meta_forward_vars" value="0">              <div align="center"><span class="main_text"> <font color="#CC0000"><b><font color="#000000">FREE 
                FENG SHUI TIPS</font></b></font> <br>
                in every issue of our newsletter <br>&nbsp
                </span> </div>
              <table width="100%" border="0" cellspacing="4" cellpadding="0">
                <tr> 
                  <td height="19" width="69" align="center" class="fine_text7"> 
                    Name: </td>
                  <td height="19" valign="bottom" width="174"> 
                    <input name="name" type="text" value="" size="20" maxlength="50">
                  </td>
                </tr>
                <tr> 
                  <td height="9" width="69" align="center"><span class="fine_text7">Email:</span><br>
                  </td>
                  <td height="9" valign="bottom" width="174"> 
                    <input type="text" name="from" size="20" maxlength="50">
                  </td>
                </tr>
                <tr> 
                  <td height="34" valign="bottom" width="69" align="center"> </td>
                  <td height="34" valign="bottom" width="174"> <span class="main_text"> 
                    <input type="submit" name="submit" value="Subscribe Me">
                    </span> </td>
                </tr>
              </table>
              <div align="center" class="fine_text7">Read our <a href="privacy_policy.htm" class="fine_text7"> 
                Privacy policy</a> </div>
            </form>
          </td>
        </tr>
      </table>
      <p>&nbsp;</p>
      <table width="600" border="0" cellspacing="0" cellpadding="12">
        <tr>
          <td> 
            <p><a name="rss"></a>-------------------------------------------------------------------------------</p>
            <p><a href="http://www.fastfengshui.com/blog/"><img src="http://feeds.feedburner.com/fastfengshui.gif" height="67" width="200" style="border:0" alt="&quot;Latest FFS Blog Postings&quot;"/></a></p>
            <p><font face="Verdana, Arial, Helvetica, sans-serif" size="2"><b>RSS 
              FEEDS</b></font></p>
            <p class="main_text">Add the <b>Fast Feng Shui Blog (RSS)</b> to your 
              feed list today to receive directly our FREE feng shui tips, important 
              announcements and updates. <br>
              <br>
              <font color="#990000">http://feeds.feedburner.com/fastfengshui</font> 
              <br>
              <br>
              <b>RSS by Software Use:</b> If you are currently using a <i>RSS 
              Feed Reader</i>, simply copy the url for the News Feed into your 
              reader. <br>
              <br>
              <b>RSS by Browser: </b>If you are currently using an <i>RSS Feed 
              Service</i>, search for Fast Feng Shui Blog in your service directory 
              window and add us to your list of feeds. <br>
              <br>
              <b>Need more RSS info?</b> Here's some basic <a href="http://www.feedburner.com/fb/a/aboutrss" target="_blank">information 
              about RSS</a>. For web business owners: get the newest ebook on 
              <a href="http://www.stampedesecret.com/?hop=lotuspond" onMouseOver="window.status='http://www.stampedesecret.com';return true;" onMouseOut="window.status='';return true;" target="_blank"><b>Marketing 
              with RSS feeds</b></a> (supplying you with information, examples 
              and advice, plus some great tools) to get your marketing kick-started 
              with this dynamic media!</p>
          </td>
        </tr>
      </table>
      <p align="center">&nbsp;</p>
      <p>&nbsp;</p>
      <table width="600" border="0" cellspacing="0" cellpadding="0">
        <tr> 
          <td height="37"> 
            <div align="center" class="copyright"> 
              <p><a href="books.htm">Books</a> | <a href="products.htm">Products</a> 
                | <a href="services.htm">Services</a> | <a href="faqs.htm">FAQs</a> 
                | <a href="articles.htm">Articles</a> | <a href="free_downloads.htm">eBooks</a></p>
              <p>&#169; Copyright 2001-<span class="copyright_home"><script src="currentyear.js"></script></span> Stephanie Roberts <br>
                All rights reserved.<br>   </p>
              <p>&nbsp;</p>
            </div>
          </td>
        </tr>
      </table>
      
    </td>
  </tr>
</table>
<map name="utilnavmap">
  <area shape="rect" coords="389,7,440,23" href="free_downloads.htm" alt="Feng Shui eBooks">
  <area shape="rect" coords="313,8,366,22" href="articles.htm" alt="Articles">
  <area shape="rect" coords="253,7,292,20" href="faqs.htm" alt="Frequently Asked Questions">
  <area shape="rect" coords="170,7,230,22" href="services.htm" alt="Services">
  <area shape="rect" coords="83,7,145,21" href="products.htm" alt="Products">
  <area shape="rect" coords="7,6,54,21" href="books.htm" alt="Books">
</map>
</body>
</html>