Nouvelles

<% nof_rootDir="../" nof_scriptDir="scripts" nof_debug=false nof_sitePath = GetSitePath(nof_rootDir) function GetSitePath(RootDir) Dim relPath relPath = split(RootDir, "/") forwardSteps = UBound(relPath) - 1 if forwardSteps = 0 and relPath(0) = "." then forwardSteps = -1 GetSitePath = Server.MapPath(".") for idx=0 to forwardSteps GetSitePath = Left(GetSitePath, inStrRev(GetSitePath, "\") - 1) next GetSitePath = GetSitePath & "\" end function %> <% sub IncludeLib(ByVal lib, ByVal sitePath, ByVal scriptDir) dim fso, f, buf, filePath Set fso = Server.CreateObject("Scripting.FileSystemObject") filePath = sitePath & scriptDir & "\" & lib if fso.FileExists(filePath) then set f = fso.OpenTextFile(filePath, 1, false, -2) buf = f.ReadAll f.close() set f = nothing Dim regEx Set regEx = New RegExp regEx.Pattern = "^\s*<" & chr(37) & "\s*" regEx.IgnoreCase = True regEx.Global = True buf = regEx.Replace(buf,"") regEx.Pattern = "\s*" & chr(37) & ">\s*$" regEx.IgnoreCase = True regEx.Global = True buf = regEx.Replace(buf, "") set regEx = nothing ExecuteGlobal buf else if nof_debug then Response.Write "Could not include the file `" & filePath & "`." else Response.Write "

An error occured. Please contact the site administrator.

" Response.Write "

Error code: 103

" end if Response.End end if set fso = nothing end sub %> <% call IncludeLib("faq_XmlLib.asp", nof_sitePath, nof_scriptDir) %> <% call IncludeLib("faq_search.asp", nof_sitePath, nof_scriptDir) %> Nouvelles

BANNER203

<% set nof_locale = faqLocaleToDictionary(nof_sitePath & nof_scriptDir, "FAQ_en.properties") set search_1189702307718 = new FaqSearch search_1189702307718.mComponentId = "1189702307718" search_1189702307718.mComponentName = "search" search_1189702307718.mXmlPropFile = "FAQ1189702252796.xml.asp" if search_1189702307718.Initialize(nof_sitePath, nof_scriptDir, nof_rootDir, nof_debug) then call search_1189702307718.ShowSearchForm() end if set search_1189702307718 = nothing %>

Welcome to the Maxi-Hobby Newsletter.

This Newsletter was created to provide [NEWS1, INFORMATION1, IDEAS1] on the ever-growing topic of [YOUR NEWSLETTER'S TOPIC]. This Newsletter, updated [FREQUENCY], provides a quick and easy way for you to stay up to date and get the latest information wherever and whenever you need it.


	For questions, comments, or to request additional information about [YOUR NEWSLETTER'S TOPIC], proceed to the Contact Us page to communicate directly with our staff.

Thanks for visiting, browsing the content of our current issue, and putting the resource of [YOUR NEWSLETTER'S NAME] to work for you. If you are new to our company and would like to receive our Newsletter by e-mail, please complete the sign up form below or send us an e-mail at [NEWSLETTER E-MAIL].

[INPUT FORM HERE: Create your own or include a pre-developed solution by clicking on the Forms Manager in the Advanced Tools component section]


	[Bienvenue/Welcome] [A propos de nous/About Us] [Contactez-nous/Contact-us] [Adresse et Directions] [FAQ] [Magasin/Shop] [Liens/Links] [Nouvelles/News] [Evenemment/Events] [Gallerie de photos/Pictures] [Services offerts/Services] [Politiques] [Partenaires] [Franchise disponible] [Search]