QuickerSite Developer Guidelines

A practical reference for extending QuickerSite — an all-in-one CMS written in classic ASP / VBScript that runs on IIS (5+) and IIS Express. This guide focuses on the parts you actually touch when writing custom code: the object model, the helper library, and the constant engine that lets you embed VBScript anywhere in a page.

Who this is for. Site developers and AI coding agents writing custom scripts inside QuickerSite. Every signature and rule below was extracted directly from the source in asp/includes/. File and line references point at the real implementation so you can verify anything.

The two ways to add custom logic

Constants (recommended). Author a VBScript function in the backsite (bs_constantEdit.asp), stored as a constant of type QS_VBScript. Invoke it anywhere in page content with a shortcode like [MYCODE] or [MYCODE(arg)]. This is the safe, supported path — see chapter 3.
Module / application scripts. Stand-alone .asp files (see modules/) run via the page’s Application path or run() / Server.Execute. Useful for larger features and AJAX endpoints.

Ground rules (read before writing anything)

Option Explicit is enforced site-wide (asp/begin.asp:3) — declare every variable with Dim.
The page is UTF-8, Response.Buffer = true, no-cache.
In production, runtime errors in constants are swallowed — a broken script silently outputs nothing. Always code defensively and test with the Test! button first.
Never trust Request(...). Sanitize for output, escape for SQL.

2. Architecture & request flow #

Every public request lands on default.asp, which is a three-line orchestrator:

<!-- #include file="asp/begin.asp"-->
<%=run(execBeforePageLoad)%>
<!-- #include file="asp/process.asp"-->

What `begin.asp` sets up

asp/begin.asp is the master include. It pulls in ~140 include files (all the classes and helpers) and creates the global objects you will use. By the time your code runs, these already exist:

Global	Type	What it is
`db`	cls_database	Database access. `db.Execute(sql)`, `db.GetDynamicRS`.
`customer`	cls_customer	The current site/tenant and all its settings. `customer.pick(cId)` already called.
`selectedPage`	cls_page	The page being requested (picked by `iId` or `sCode`).
`logon`	cls_logonEdit	Authentication / logged-in user state.
`message`	cls_Messages	Status / error message collector.
`cPopup`	cls_popup	Popup / lightbox handler.
`cId`	function → Integer	Current customer id. The multi-tenant scoping key for every query.

Rendering pipeline

process.asp decides what the request is (page view, login, form post, search, AJAX…).
The chosen cls_page is rendered via selectedPage.buildTemplate (asp/includes/page.asp:1158), which substitutes [PAGEBODY], [PAGEMENU], meta tags, etc. into the template HTML.
While building the body, treatConstants() (asp/includes/insertConstants.asp) scans the text for [SHORTCODE] tokens and replaces them — including running your VBScript constants. This is where your custom code executes.

Multi-tenant. One QuickerSite install can host many sites, each identified by cId. Almost every table has an iCustomerID column. Always scope your queries with iCustomerID = cId or you will leak/clash data across sites.

3. The constant / CustomFunction engine #

This is the most important chapter for custom development. Understand it and everything else follows.

How a constant is stored

A custom script is a row in tblConstant of type QS_VBScript (value 2), edited in bs_constantEdit.asp. It has three fields:

Field	DB column	Purpose
Parameters	`sParameters`	The VBScript argument list, e.g. `iCount, sCategory`.
Function body	`sValue`	The code that produces output.
Global Code	`sGlobal`	Optional helper Functions/Classes, loaded via `ExecuteGlobal` before the body runs.

What QuickerSite does with it

At render time, executeConstant() (asp/includes/insertConstants.asp:246) wraps your body like this and runs it:

function CustomFunction(<your Parameters>)
    <your Function body>
end function
executeConstant = CustomFunction(<actual arguments from the shortcode>)

The Response.Write trick. Before running, the engine text-replaces every response.write in your body with CustomFunction = CustomFunction &. So both of these append to the returned output:

' Style A - looks like normal ASP
Response.Write "<p>Hello</p>"

' Style B - assign directly (identical effect)
CustomFunction = CustomFunction & "<p>Hello</p>"

The hard rules

Return a string fragment only. Do not emit <html>/<body>, do not set headers, never call Response.End — your output is spliced into an existing page where the shortcode appears.
Errors are silent in production. executeConstant runs under On Error Resume Next; if your script errors, it returns "" and the visitor sees nothing. Errors are only shown in Test! mode.
Declare everything (Option Explicit).
Nesting is limited. Constants can contain other shortcodes, resolved recursively up to a small depth.

Invoking your constant

[MYCODE]              ' no parameters
[MYCODE(5)]           ' one parameter
[MYCODE(5, "news")]   ' multiple parameters - strings in double quotes

Put the shortcode in any page body, list item, template, header/footer, or even another constant. The matching regex is asp/includes/insertConstants.asp:49.

The author/test loop

Backsite → ASP/VBScripts (bs_scriptList.asp) → new item.
Fill Parameters, Function body, optional Global Code.
Click Test!. The test harness (bs_constantTest.asp) runs the script and shows TEST OK! with the output, or TEST FAILED! with the error. Supply sample parameter values (in double quotes) when prompted.
Save, then insert [YOURNAME] into a page.

4. Globals available to your code #

Because constants run inside the fully-loaded page context, the entire object model and helper library is in scope. The objects you will reach for most:

db — database

Dim rs
Set rs = db.Execute("select sTitle from tblPage where iCustomerID=" & cId & " and bOnline=" & getSQLBoolean(true))
Do While not rs.EOF
    Response.Write "<li>" & sanitize(rs("sTitle")) & "</li>"
    rs.MoveNext
Loop
rs.Close : Set rs = Nothing

customer — current site settings

Common reads: customer.siteName, customer.sDatumFormat, customer.language, customer.sUrl, customer.sQSUrl, customer.bUserFriendlyURL. It also exposes collections like customer.forms, customer.feeds, customer.galleries, customer.constants (each returns a Scripting.Dictionary).

selectedPage — the current page

Common reads: selectedPage.iId, selectedPage.sTitle, selectedPage.sValue, selectedPage.iParentID. Useful methods: selectedPage.subPages(true), selectedPage.listitems(true), selectedPage.parentPage. See cls_page.

cId & localization

cId returns the current customer id (always use it to scope queries). l("key") returns a localized label string.

Convention: the codebase prefixes variables by type — i integer, s string, b boolean, d date. Class fields and DB columns follow the same scheme (e.g. iId, sTitle, bOnline, dCreatedTS).

5. Most-used classes #

Ranked by how often they are instantiated across the codebase (new cls_* count). These are the classes worth knowing. All follow the same lifecycle pattern:

Dim obj
Set obj = new cls_page      ' 1. create
obj.Pick(123)               ' 2. load a row by id (customer-scoped where relevant)
Response.Write obj.sTitle   ' 3. read properties
' obj.getRequestValues()    ' 4. (back-office) fill from Request.Form
' obj.Save                  ' 5. validate + upsert  -> returns True/False
' obj.remove                ' 6. delete (cls_contact calls it .delete)
Set obj = Nothing           ' 7. release

Collections (e.g. customer.forms, page.listitems) return a Scripting.Dictionary keyed by id. Iterate with For Each key In dict ... dict(key) ....

Class	Uses	Role
`cls_page`	49	Pages, list pages, list items, menu nodes, rendering
`cls_mail_message`	20	Email composition/sending
`cls_database`	19	DB connection & queries (the `db` global)
`cls_form`	15	Forms + submissions
`cls_contact`	15	Site members / intranet users
`cls_post`	13	Forum / theme posts & replies
`cls_catalogItem`	12	Catalog (product/data) items
`cls_menu`	11	Menu / breadcrumb / back-office tree HTML
`cls_catalog` / `cls_feed` / `cls_gallery` / `cls_poll` / `cls_customer` / `cls_constant`	6–8	Catalogs, RSS feeds, image galleries, polls, the site object, custom-code constants

cls_page most used #

asp/includes/page.asp — one class to rule everything content: normal pages, container/menu pages, list pages and their list items, external links and the homepage.

Key properties

iId Primary key (Null for a new, unsaved page).
iParentID, iListPageID Parent in the menu tree / owning list page.
iCustomerID Owning tenant (defaults to cId).
sTitle, sValue, sValueTextOnly Title, HTML body, plain-text body.
sCode Application code (uppercase) used by pickByCode and the sCode form field.
sUserFriendlyURL SEO slug.
bOnline, bDeleted, bContainerPage Published / soft-deleted / is a menu container.
iRang Sort order among siblings.
dOnlineFrom, dOnlineUntill, dPage Publish window and page date.
iHits, iVisitors Counters.
sOrderBY Presence marks the page as a list page; defines item sort.
iCatalogId, iFormID, iFeedId, iTemplateID, iThemeID Attached catalog / form / feed / template / theme.
sProp01…sProp08 Eight generic page-block content slots ([PAGE_BLOCK01..08]).

Key methods

Pick(id) db Load a page by iId into all properties.
pickByCode(sPageCode) db Load by sCode (customer-scoped). pickByCodeNOCID ignores the tenant filter.
Save db Validate (Check()) then insert/update tblPage; handles ranking, homepage, cache invalidation. Returns True/False.
remove / canBeDeleted() db Delete (soft via bDeleted) and guard checks.
subPages(onlineOnly) db Dictionary of child pages (iParentID = iId), by iRang.
listitems(onlineOnly) db Dictionary of fully-loaded list items for a list page. fastlistitems is the lightweight variant.
parentPage / listPage / theme / catalog / Feed / form Return the related object.
getLink(includePijltje) / getSimpleLink / getClickLink(BO) html Anchor HTML to this page.
buildTemplate html Full page render (templates + token substitution). Used by the pipeline; rarely called from a constant.
addHit() / addVisit() db Increment counters.
getRequestValues() Back-office: populate from Request.Form (permission-gated).

cls_database (the `db` global) #

asp/includes/database.asp — abstracts Access / SQL Server / MySQL behind one object. No public properties; use the global db instance.

Execute(sql) Run SQL against the main DB; returns an ADODB recordset (or fires DML). Your workhorse for reads.
GetDynamicRS Returns an updatable recordset (CursorType=1, LockType=3) for inserts/edits via .AddNew/.Update.
ExecuteLabels(sql) / GetDynamicRSLabels Same, against the separate labels database.
getConn() / getConnLabels() Lazily-opened, cached ADODB connections.

SQL portability. Because the DB engine varies, use the helpers getSQLBoolean(b), getSQLDate(d), getSQLDateFunction() and getTOPSyntax(n, sql) instead of hard-coding True/#dates#/TOP.

cls_customer (the `customer` global) #

asp/includes/customer.asp — the site/tenant: every site-wide setting plus accessors to all content collections. Already loaded as customer.

Useful properties

iId, sName, siteName, siteTitle, sURL, sSiteSlogan Identity.
sDatumFormat, language Date format & language id.
webmasterEmail, webmaster, copyRight Contact / footer info.
bUserFriendlyURL, bUseCachingForPages, bShoppingCart, bIntranet, bCatalog Feature flags.
sHeader, sFooter, sLeftBanner, sRightBanner Layout HTML.

Useful methods / properties

sVDUrl / sQSUrl Site URL with virtual-dir / QuickerSite-dir appended.
forms / feeds / galleries / polls / catalogs / templates / themes / constants db Dictionaries of the matching objects.
newsletters / newsletterCategories / guestbooks / popups / mails / tickets db More content collections.
getHomePageObj The homepage cls_page.
iTotalHits / iMaxVisits / nmrbContacts db Lazily-computed stats.
cacheConstants / cacheFeeds / cacheGalleries / cachethemes Rebuild the Application caches (call after editing constants programmatically).

cls_contact #

asp/includes/contact.asp — a site member / intranet user (login, profile fields, avatar, permissions, forum posts).

Properties

iId, iCustomerID, iStatus Identity & status.
sEmail, sNickName, sPw, sAvatar Login & display.
fields Dictionary of profile field-id → value.
dLastLoginTS, dCreatedTS Timestamps.

Methods

Pick(id) / quickPick(id) db Load with / without profile field values.
Save(contactFields) db Validate & upsert (pass the field definitions).
delete db Remove the contact and all dependents (this is the “remove”).
posts db Dictionary of the member’s cls_post.
resetPW db Generate a new password & email it.
getAvatar / sImgTagAvatar(size) html Avatar HTML (gravatar fallback).
savePermissions(iBodyID, iTitleID, iLPID) db Per-page access rights.

The logged-in member is reachable via getContact(id) and the logon object.

cls_form #

asp/includes/form.asp — a form definition, its fields, submission storage, email/autoresponder and an optional on-submit script.

Properties

iId, sName, sCode Identity & shortcode.
sIntro, sFeedback, sButton, sReset Display text.
sTo, sSubject, bSendEmail, bAttachFiles, bCaptcha Mail & behaviour.
bAutoResponder, sAutoResponse, sAutoResponseSubject Autoresponder.
sRedirect, sScriptUponSubmission Post-submit redirect & custom hook.

Methods

Pick(id) / Save / remove db
fields db Dictionary of cls_formField by iRang.
build(action, align, buttonType, itemID) html Render the full form HTML; on postback it validates, uploads, stores a submission, mails, runs the script, then shows feedback or redirects.
submissions / removeAllSubmissions db

To drop a managed form into a page you usually just reference it via the page’s Form setting; in custom code you can render one with Set f = new cls_form : f.Pick(id) : Response.Write f.build("default.asp","","submit",0).

cls_catalog & cls_catalogItem #

asp/includes/catalog.asp + catalogItem.asp — structured, field-driven content (products, directories, datasets) with images, files and an optional attached form.

cls_catalog

iId, sName, sItemName, sOrderItemsBy, iPageSize, bSearchable, iFormID
Pick(id) / Save / remove db
items db Dictionary of cls_catalogItem.
fields(sType) db Field definitions; sType filters (“search”,“public”).
form / filetypes Related objects.

cls_catalogItem

iId, sTitle, iCatalogID, fields (field-id→value), sPicExt, dDate
Pick(id) / Save() / remove db
showPic(iThumbnailSize) html <img>/lightbox link.
sFiche html Item detail view (template-driven).
files / submissions db

cls_post #

asp/includes/post.asp — a forum/theme topic or reply (a reply has iPostID set to its parent topic).

iId, iThemeID, iPostID, iContactID, sSubject, sBody, sKey, bNeedsToBeValidated
Pick(id) / Save / remove db Save also notifies subscribers by email.
buildPost(themeObj, showReplies) / buildShortPost html Interactive / compact post HTML.
replies(loggedOnAsModerator) db Child replies.
contact / theme / parentTopic Related objects.

cls_feed / cls_gallery / cls_poll #

Three “widget” classes with the same shape: Pick(id), Save, remove, a sCode shortcode, and a build that returns ready HTML. They are usually invoked through their dedicated shortcodes ([qs_feed:CODE], [qs_gallery:CODE], [QS_POLL:CODE]) rather than from VBScript.

cls_feed (feed.asp) — RSS/ATOM ingestion. sUrl, iMaxItems, iCache, sTemplate; build html fetches & renders.
cls_gallery (gallery.asp) — image gallery. sPath, iThumbSize, iPicsInRow, sType (SC/SS/NS…); build html scans the folder & renders thumbnails/slideshow.
cls_poll (poll.asp) — voting. sQuestion, Questions (1..15), voting window; build(withdiv) / showresults / registerVote.

cls_constant #

asp/includes/constant.asp — the storage object behind your custom scripts and text/HTML snippets. You rarely instantiate it directly, but it is good to know the shape.

iId, sConstant (the name/shortcode), iType (0 text, 1 HTML, 2 VBScript), sValue (body), sParameters, sGlobal
dOnlineFrom, dOnlineUntill Optional active window.
Pick(id) / Save / remove / getRequestValues() db
bOnline / statusString Active-window state.

List all of a site’s constants with customer.constants; the ones of type QS_VBScript are your scripts.

cls_menu & cls_Messages #

cls_menu html

asp/includes/menu.asp — renders navigation HTML.

getMenu(pageObj) Public site menu (cached).
getIntranetMenu(pageObj) Intranet menu.
showParents(pageId, withLink) Breadcrumb trail.
cssType, iSubMenuRoot Style selector & forced submenu root.

cls_Messages (the `message` global)

asp/includes/messages.asp — collects status/error messages shown to the user.

add(key) / addError(key) Queue a message by its label key (e.g. message.Add("fb_saveOK")).
hasMessages() / hasErrors()
showAlert() html Render queued messages as a popup.

6. Helper functions #

Global functions from asp/includes/functions.asp (and a few siblings) — all in scope inside constants. These are the ones you will use constantly.

Output & sanitizing

Function	Does
`sanitize(s)` / `quotRep(s)`	HTML-escape `" < >`. Use on every dynamic value you output.
`quotRepJS(s)`	Escape a string for inside inline JavaScript.
`Server.HTMLEncode(s)`	Standard ASP HTML-encode (also fine for output).
`removeHTML(t)`	Strip all HTML tags → plain text.
`LinkURLs(t)`	Auto-link URLs/emails and turn newlines into `<br>`.
`show(v)`	`""` if empty, else `LinkURLs(v)`.
`splitby(v, n)`	Insert `<br />` every `n` chars.
`clickEmail(addr)`	Render a `mailto:` link.

Type conversion & validation

Function	Does
`isLeeg(v)`	True if Null/Empty/blank. The primary “is empty” test.
`isNumeriek(v)`	Safe `IsNumeric`.
`convertGetal(v)`	To number, `0` if invalid. Use on ids/counts/params.
`convertStr(v)`	To string, `""` if Null (error-safe).
`convertBool(v)`	To Boolean from `1/0/"true"/"false"`.
`CheckEmailSyntax(s)`	Regex email validation.
`IsAlphaNumeric(s)`	True if only `a-z 0-9 _ - .`
`GetFileExtension(name)`	Extension after the last dot.

Dates

Function	Does
`convertEuroDate(d)`	Format as `dd/mm/yyyy` (locale-aware).
`convertEuroDateTime(d)`	Date + time.
`formatTimeStamp(ts)`	Date + `HH:MM:SS`.
`isBetween(from, check, to)`	True if a date is within a range (open ends allowed).
`getDateWithoutSlash`	Today as a slashless string — handy cache-key fragment.

SQL (engine-aware — use these instead of literals)

Function	Does
`cId`	Current customer id — scope every query with it.
`cleanUp(s)`	SQL-escape single quotes (`'` → `''`) for inline string values.
`getSQLBoolean(b)`	Correct boolean literal (`True` vs `1`).
`getSQLDate(d)` / `getSQLDateFunction()`	Correct date literal / “now” function.
`getTOPSyntax(n, sql)`	Replace `[TOP]`/`[LIMIT]` tokens correctly per engine.
`sqlCustId`	Ready-made `tblPage.iCustomerID = <cId>` clause.

Composition & misc

Function	Does
`l("key")`	Localized label text.
`run(scriptPath)`	`Server.Execute` another ASP fragment (compose larger output).
`getHomePage()` / `getContact(id)`	Cached `cls_page` / `cls_contact` lookups.
`UserIP()`	Real client IP (honors `X-Forwarded-For`).
`EnCrypt(id)` / `decrypt(s)`	Obfuscate page ids for URLs (`default.asp?iId=…`). Not real encryption — never use for secrets.
`secCode` / `QS_secCodeHidden` / `checkCSRF`	CSRF token plumbing for your own forms that post back.

7. Constants #

Global const values from asp/includes/constants.asp (and a few from begin.asp). The ones you actually reference in custom code:

Content types

Constant	Value	Meaning
`QS_textonly`	`0`	Constant stores plain text.
`QS_html`	`1`	Constant stores HTML.
`QS_VBScript`	`2`	Constant is an executable script (your custom code).
`QS_VBScriptIdentifier`	`"#!!QS_VBSCRIPT!!#"`	Internal marker separating body from parameters.

Layout / placement

Constant	Value
`QS_centerAlign` / `QS_leftAlign` / `QS_rightAlign` / `QS_topAlign`	`"center" / "left" / "right" / "top"`
`pl_Vertical` / `pl_Horizontal`	`"V" / "H"`
`QS_nomenu`	`"nomenu"`

Environment / misc

Constant	Value	Meaning
`C_QS_VERSION`	`"4.4"`	QuickerSite version.
`QS_CHARSET`	`"utf-8"`	Response charset.
`QS_defaultPW`	`"admin"`	Default admin password (must be changed).
`QS_ltr` / `QS_rtl`	`"ltr" / "rtl"`	Text direction.
`QS_feedNoText`	`10000`	Sentinel: feed shows no body text.

There are also many btn_* back-office button ids and c* action keys (e.g. cLogOff = "logoff", cRegister = "register") used by process.asp dispatch — relevant only if you build back-office or login flows.

8. Database overview #

QuickerSite ships with 54 tables (627 columns). The default install uses an Access (Jet) database; the same schema runs on SQL Server and MySQL via cls_database. The full schema is created by the bootstrap DDL (CREATE TABLE / ALTER TABLE ... ADD COLUMN). This chapter is the map you need when writing custom db.Execute queries.

Reading this with an AI agent? The live, fetchable copy of these docs (including this data model) is at pietercooreman.github.io/QuickerSite/. The prompt builder (chapter 10) embeds that URL so an agent can pull the exact column list on demand.

Conventions

Primary key: every table has an autonumber iId (COUNTER) primary key.
Tenant scoping: most tables carry iCustomerID — always filter by = cId. Link/child tables (values, subscriptions, page-rights) scope through their parent instead.
Naming: column prefixes encode type — i integer/id, s string, b boolean, d date. Foreign keys read i<Entity>ID (e.g. iCatalogID, iFormID, iContactID).
No enforced FKs: relationships are by convention only (Access/Jet) — joins are written in SQL, integrity is maintained in the VBScript classes.

Access type → meaning

DDL type	Shown as	Meaning
`COUNTER NOT NULL`	PK	Autonumber primary key (`iId`).
`LONG` / `INTEGER`	Integer	Whole number; ids, counts, flags-as-int.
`BIT`	Boolean	True/False. Compare with `getSQLBoolean(true)`.
`DATETIME`	Date/time	Use `getSQLDate(d)` in queries.
`TEXT(255)`	Text(255)	Short string (max 255 chars).
`MEMO`	Long text	Unbounded text (HTML bodies, templates, notes).

Tables by area

Click a table name to jump to its column list below. “Tenant” = has an iCustomerID column.

Table	Cols	Tenant	Role
Core
`tblConstant`	9	—	Constants: text, HTML and your custom VBScript snippets (iType 0/1/2).
`tblCustomer`	20	—	The site/tenant and all its settings (the customer object).
`tblModule`	6	—	Registered custom modules (with optional password).
`tblPage`	73	—	Pages, list pages, list items, menu nodes, external links, homepage.
`tblPageComment`	8	—	Visitor comments on a page.
`tblSecondAdmin`	3	—	Second-admin account + per-feature permission flags.
`tblTemplate`	10	—	Page templates (web / print / email / mobile / WAP variants).
Members
`tblContact`	13	—	Site members / intranet users (login, status, avatar).
`tblContactField`	9	—	Profile field definitions for contacts.
`tblContactPage`	4	—	Per-page access rights for a contact (title/body/list).
`tblContactRegistration`	6	—	Pending registrations / activation tickets.
`tblContactValues`	3	—	Per-contact profile field values.
Catalog
`tbCatalogItemFields`	3	—	Per-item field values (note: table name is tb, not tbl).
`tblCatalog`	24	—	Catalog definition (products/data sets).
`tblCatalogField`	9	—	Field definitions for a catalog.
`tblCatalogFileType`	3	—	File-type categories for catalog item files.
`tblCatalogItem`	10	—	A catalog item (row).
`tblCatalogItemFiles`	7	—	Files attached to a catalog item.
Forms
`tblForm`	27	—	Form definition (email, autoresponder, redirect, hooks).
`tblFormField`	19	—	Fields belonging to a form.
`tblFormFieldValue`	4	—	Field values for a submission.
`tblFormSubmission`	6	—	A stored form submission.
Widgets
`tblCloud`	6	—	Tag-cloud definition.
`tblFeed`	27	—	RSS/ATOM feed widget definition.
`tblGallery`	38	—	Image gallery widget definition.
`tblGuestBook`	17	—	Guestbook definition (templates, validation).
`tblGuestBookItem`	10	—	Guestbook entries and replies.
`tblPoll`	13	—	Poll definition (question + up to 15 answers sA1..sA15).
`tblPollVote`	5	—	Individual poll votes.
`tblPopup`	15	—	Popup / lightbox definition.
Forum
`tblPost`	14	—	Forum posts: topics and replies (iPostID links a reply).
`tblTheme`	32	—	Forum/theme definition (subscriptions, notifications).
`tblThemeSubscription`	2	—	Contact subscriptions to a theme.
`tblThemeTopicSubscription`	2	—	Contact subscriptions to a single topic.
Newsletter
`tblNewsletter`	11	—	Newsletter (email) definition.
`tblNewsletterCategory`	10	—	Subscriber categories / signup forms.
`tblNewsletterCategorySubscriber`	8	—	Category subscribers.
`tblNewsletterLog`	6	—	Per-subscriber send/read log.
`tblNewsletterMailing`	7	—	A scheduled/sent mailing of a newsletter.
Mail
`tblCustomerIntranetMessage`	5	—	Per-status intranet messages to members.
`tblMail`	7	—	Sent mass-mail records.
`tblMailContact`	2	—	Recipients of a mass mail.
Calendar
`tblCalendar`	8	—	Availability/booking calendar definition.
`tblCalendarBooking`	14	—	A booking against a calendar.
`tblEvent`	16	—	Calendar events.
Shop
`tblQShopCategory`	7	—	Shop product category (self-nesting).
`tblQShopMake`	7	—	Shop product brand/make.
`tblQShopProdCat`	2	—	Product-to-category link table.
`tblQShopProduct`	13	—	Shop product (price, stock, images).
Stats
`tblMonitor`	4	—	Raw visitor-detail monitor log.
`tblSession`	8	—	Visitor session log (browser, referer, IP, start page).
Admin
`tblClient`	8	—	CRM client records (multi-site admin).
`tblClientProduct`	13	—	Products/services billed to a client.
`tblPackage`	14	—	Site package / provisioning template.

Watch-outs. tbCatalogItemFields is spelled tb (not tbl). A few date columns are stored as text (e.g. tblContactRegistration.dCreatedTS is TEXT). tblPage uses createdTS/updatedTS (no d prefix) alongside dUpdatedOn. tblPoll stores answers as sA1..sA15 with matching colour columns sA1c..sA15c.

Key relationships

tblCustomer (iId) ──< tblPage (iCustomerID)
tblPage (iId) ──< tblPage (iParentid)        ' menu tree
tblPage (iId) ──< tblPage (iListPageId)      ' list items
tblPage.iCatalogId  ─> tblCatalog (iId)
tblPage.iFormId     ─> tblForm (iId)
tblPage.iFeedId     ─> tblFeed (iId)
tblPage.iTemplateID ─> tblTemplate (iId)

tblCatalog (iId) ──< tblCatalogField (iCatalogId)
tblCatalog (iId) ──< tblCatalogItem (iCatalogID) ──< tbCatalogItemFields (iItemID)
                                                  └──< tblCatalogItemFiles (iItemID)

tblForm (iId) ──< tblFormField (iFormID)
tblForm (iId) ──< tblFormSubmission (iFormID) ──< tblFormFieldValue (iSubmissionID)

tblContact (iId) ──< tblContactValues (iContactId)   ' profile field values
tblContact (iId) ──< tblContactPage (iContactID)     ' per-page access rights
tblContactField (iId) ─> tblContactValues (iFieldId)

tblTheme (iId) ──< tblPost (iThemeID)
tblPost (iId)  ──< tblPost (iPostID)         ' replies link to their topic

tblNewsletter (iId) ──< tblNewsletterMailing (iNewsletterID)
tblNewsletterCategory (iId) ──< tblNewsletterCategorySubscriber (iCategoryID)

Example: a tenant-safe join

Dim sql, rs
sql = "select i.sTitle, c.sName as catalog " & _
      "from tblCatalogItem i " & _
      "inner join tblCatalog c on i.iCatalogID = c.iId " & _
      "where c.iCustomerID = " & cId & " " & _
      "and i.dOnlineFrom <= " & getSQLDate(Date) & " " & _
      "order by i.dCreatedTS desc"
Set rs = db.Execute(sql)
Do While not rs.EOF
    Response.Write "<li>" & sanitize(rs("sTitle")) & "</li>"
    rs.MoveNext
Loop
rs.Close : Set rs = Nothing

All tables & columns

Alphabetical. Expand a table to see its columns and types.

tbCatalogItemFields 3 columns

Column	Type
`iFieldId`	Integer
`iItemID`	Integer
`sValue`	Long text

tblCalendar 8 columns

Column	Type
`dCreatedTS`	Date/time
`iContactID`	Integer
`iCustomerID`	Integer
`iId`	PK
`sBGColor`	Text(255)
`sFontFamily`	Text(255)
`sName`	Text(255)
`sTemplate`	Long text

tblCalendarBooking 14 columns

Column	Type
`bEOnlyMorning`	Boolean
`bSOnlyAfternoon`	Boolean
`dCreatedTS`	Date/time
`dEndDate`	Date/time
`dStartDate`	Date/time
`dUpdatedTS`	Date/time
`iCalendarID`	Integer
`iId`	PK
`iStatus`	Integer
`sEMail`	Text(255)
`sName`	Text(255)
`sNotes`	Long text
`sPhone`	Text(255)
`sUniqueKey`	Text(255)

tblCatalog 24 columns

Column	Type
`bAutoThumb`	Boolean
`bOnline`	Boolean
`bPushRSS`	Boolean
`bSearchable`	Boolean
`bUseShadow`	Boolean
`dCreatedTS`	Date/time
`dUpdatedTS`	Date/time
`iAutoClose`	Integer
`iCustomerID`	Integer
`iFormID`	Integer
`iId`	PK
`iMaxThumbSize`	Integer
`iPageSize`	Integer
`sFilePath`	Text(255)
`sFormTitle`	Text(255)
`sFullImage`	Text(255)
`sItemName`	Text(255)
`sItemView`	Long text
`sName`	Text(255)
`sOrderItemsBy`	Text(255)
`sResizePicTo`	Integer
`sRSSView1`	Long text
`sRSSView2`	Long text
`sRSSView3`	Long text

tblCatalogField 9 columns

Column	Type
`bMandatory`	Boolean
`bPublic`	Boolean
`bSearchField`	Boolean
`iCatalogId`	Integer
`iId`	PK
`iRang`	Integer
`sName`	Text(255)
`sType`	Text(255)
`sValues`	Long text

tblCatalogFileType 3 columns

Column	Type
`iCatalogID`	Integer
`iId`	PK
`sName`	Text(255)

tblCatalogItem 10 columns

Column	Type
`bForm`	Boolean
`dCreatedTS`	Date/time
`dDate`	Date/time
`dOnlineFrom`	Date/time
`dOnlineUntill`	Date/time
`dUpdatedTS`	Date/time
`iCatalogID`	Integer
`iId`	PK
`sPicExt`	Text(255)
`sTitle`	Text(255)

tblCatalogItemFiles 7 columns

Column	Type
`dCreatedTS`	Date/time
`dUpdatedTS`	Date/time
`iFileTypeId`	Integer
`iId`	PK
`iItemID`	Integer
`sName`	Text(255)
`sTitle`	Text(255)

tblClient 8 columns

Column	Type
`dCreatedTS`	Date/time
`dUpdatedTS`	Date/time
`iId`	PK
`sAddress`	Long text
`sContactPerson`	Text(255)
`sMainEmail`	Text(255)
`sName`	Text(255)
`sOtherEmail`	Long text

tblClientProduct 13 columns

Column	Type
`dCreatedTS`	Date/time
`dEndService`	Date/time
`dLastRenewalDate`	Date/time
`dStartService`	Date/time
`dUpdatedTS`	Date/time
`iClientID`	Integer
`iId`	PK
`iPrice`	Integer
`iRenewal`	Integer
`iVat`	Integer
`sInvoiceNr`	Text(255)
`sName`	Text(255)
`sNotes`	Long text

tblCloud 6 columns

Column	Type
`dUpdatedTS`	Date/time
`iId`	PK
`iResetDays`	Integer
`sCode`	Text(255)
`sKeywords`	Long text
`sName`	Text(255)

tblConstant 9 columns

Column	Type
`dOnlineFrom`	Date/time
`dOnlineUntill`	Date/time
`iCustomerId`	Integer
`iId`	PK
`iType`	Integer
`sConstant`	Text(255)
`sGlobal`	Long text
`sParameters`	Text(255)
`sValue`	Long text

tblContact 13 columns

Column	Type
`bGetEmailsFromSite`	Boolean
`dCreatedTS`	Date/time
`dLastLoginTS`	Date/time
`dLogoutTS`	Date/time
`dUpdatedTS`	Date/time
`iCustomerID`	Integer
`iId`	PK
`iStatus`	Integer
`sAvatar`	Text(255)
`sEmail`	Text(255)
`sNickName`	Text(255)
`sOrigEmail`	Text(255)
`sPw`	Text(255)

tblContactField 9 columns

Column	Type
`bMandatory`	Boolean
`bProfile`	Boolean
`bSearchField`	Boolean
`iCustomerID`	Integer
`iId`	PK
`iRang`	Integer
`sFieldName`	Text(255)
`sType`	Text(255)
`sValues`	Long text

tblContactPage 4 columns

Column	Type
`iBodyID`	Integer
`iContactID`	Integer
`iLPid`	Integer
`iTitleID`	Integer

tblContactRegistration 6 columns

Column	Type
`dCreatedTS`	Text(255)
`iCustomerID`	Integer
`iId`	PK
`sEmail`	Text(255)
`sTicket`	Text(255)
`sVisitorDetails`	Long text

tblContactValues 3 columns

Column	Type
`iContactId`	Integer
`iFieldId`	Integer
`sValue`	Long text

tblCustomer 20 columns

Column	Type
`adminPassword`	Text(255)
`bAllowNewRegistrations`	Boolean
`bApplication`	Boolean
`bCatalog`	Boolean
`bIntranet`	Boolean
`bMonitor`	Boolean
`bUserFriendlyURL`	Boolean
`dCreatedTS`	Date/time
`defaultTemplate`	Integer
`iId`	PK
`language`	Integer
`sDatumFormat`	Text(255)
`sFooter`	Long text
`sHeader`	Long text
`siteName`	Text(255)
`siteTitle`	Text(255)
`sName`	Text(255)
`sURL`	Text(255)
`webmaster`	Text(255)
`webmasterEmail`	Text(255)

tblCustomerIntranetMessage 5 columns

Column	Type
`bEnabled`	Boolean
`iCustomerID`	Integer
`iStatus`	Integer
`sBody`	Long text
`sSubject`	Text(255)

tblEvent 16 columns

Column	Type
`bOnline`	Boolean
`dCreatedTS`	Date/time
`dEndDate`	Date/time
`dStartDate`	Date/time
`dUpdatedTS`	Date/time
`iCalendarID`	Integer
`iId`	PK
`sColor`	Text(255)
`sDescription`	Long text
`sEndHour`	Text(255)
`sLocation`	Text(255)
`sPrice`	Text(255)
`sStarthour`	Text(255)
`sTitle`	Text(255)
`sUrl`	Text(255)
`sUrlMap`	Text(255)

tblFeed 27 columns

Column	Type
`bEnableJS`	Boolean
`bLinkOnTitle`	Boolean
`bOpenLinkInNW`	Boolean
`bRandom`	Boolean
`bShowAuthor`	Boolean
`bShowCategory`	Boolean
`bShowDate`	Boolean
`bShowTitle`	Boolean
`bTemplate`	Boolean
`dCreatedTS`	Date/time
`dUpdatedTS`	Date/time
`iCache`	Integer
`iCustomerID`	Integer
`iId`	PK
`iLimitTo`	Integer
`iMaxItems`	Integer
`iReloadSec`	Integer
`iTitleLimitTo`	Integer
`sCode`	Text(255)
`sHTMLAfter`	Text(255)
`sHTMLBefore`	Text(255)
`sKeywords`	Text(255)
`sName`	Text(255)
`sPrefixUrl`	Text(255)
`sTemplate`	Long text
`sUrl`	Text(255)
`sUrls`	Long text

tblForm 27 columns

Column	Type
`bAttachFiles`	Boolean
`bAutoResponder`	Boolean
`bCaptcha`	Boolean
`bCookie`	Boolean
`bSendEmail`	Boolean
`dCreatedTS`	Date/time
`dUpdatedTS`	Date/time
`iCustomerID`	Integer
`iId`	PK
`sAutoResponse`	Long text
`sAutoResponseFromEmail`	Text(255)
`sAutoResponseFromName`	Text(255)
`sAutoResponseSubject`	Text(255)
`sAutoResponseWebmaster`	Long text
`sButton`	Text(255)
`sCode`	Text(255)
`sComment`	Long text
`sFeedback`	Long text
`sIntro`	Long text
`sName`	Text(255)
`sQAalign`	Text(255)
`sRedirect`	Text(255)
`sRedirectPrefix`	Text(255)
`sReset`	Text(255)
`sScriptUponSubmission`	Long text
`sSubject`	Text(255)
`sTo`	Long text

tblFormField 19 columns

Column	Type
`bAllowMS`	Boolean
`bAutoResponder`	Boolean
`bMandatory`	Boolean
`bUseForSending`	Boolean
`iCols`	Integer
`iFormID`	Integer
`iId`	PK
`iMaxFileSize`	Integer
`iMaxlength`	Integer
`iRang`	Integer
`iRows`	Integer
`iSize`	Integer
`sAllowedExtensions`	Text(255)
`sFileLocation`	Text(255)
`sName`	Text(255)
`sPlaceholder`	Text(255)
`sRadioPlacement`	Text(255)
`sType`	Text(255)
`sValues`	Long text

tblFormFieldValue 4 columns

Column	Type
`iFormFieldId`	Integer
`iId`	PK
`iSubmissionID`	Integer
`sValue`	Long text

tblFormSubmission 6 columns

Column	Type
`dCreatedTS`	Date/time
`dUpdatedTS`	Date/time
`iFormID`	Integer
`iId`	PK
`iItemID`	Integer
`sVisitorDetails`	Long text

tblGallery 38 columns

Column	Type
`bAutoStartSS`	Boolean
`bFSR`	Boolean
`bNSControlNav`	Boolean
`bNSdirectionNav`	Boolean
`bOpenInNewWindow`	Boolean
`bRandom`	Boolean
`bShadowThumb`	Boolean
`bShowFileName`	Boolean
`dCreatedTS`	Date/time
`dUpdatedTS`	Date/time
`iBrowseBy`	Integer
`iCustomerID`	Integer
`iFullImageSize`	Integer
`iId`	PK
`iPicsInRow`	Integer
`iSlideShowTimerQS`	Integer
`iSortImagesBy`	Integer
`iSpecialEffect`	Integer
`iThumbSize`	Integer
`iType`	Integer
`sBorder`	Text(255)
`sBorderColor`	Text(255)
`sCode`	Text(255)
`sCustomLink`	Text(255)
`sCycleEffect`	Text(255)
`sFullImage`	Text(255)
`sHeight`	Text(255)
`sName`	Text(255)
`sNextLink`	Text(255)
`sNSCSS`	Text(255)
`sNSImgLinks`	Long text
`sPath`	Text(255)
`sPreviousLink`	Text(255)
`sStyleImage`	Text(255)
`sStyleTable`	Text(255)
`sStyleTableCell`	Text(255)
`sType`	Text(255)
`sWidth`	Text(255)

tblGuestBook 17 columns

Column	Type
`bRequireValidation`	Boolean
`dOnlineFrom`	Date/time
`dOnlineUntil`	Date/time
`iCustomerID`	Integer
`iId`	PK
`iPaging`	Integer
`sBlockIP`	Long text
`sCode`	Text(255)
`sEmail`	Text(255)
`sFullTemplate`	Long text
`sName`	Text(255)
`sSortby`	Text(255)
`sTemplate`	Long text
`sTemplateErr`	Long text
`sTemplateForm`	Long text
`sTemplateReply`	Long text
`sWarningApproval`	Text(255)

tblGuestBookItem 10 columns

Column	Type
`bApproved`	Boolean
`dCreatedTS`	Date/time
`iGuestBookID`	Integer
`iId`	PK
`ip`	Text(255)
`sKey`	Text(255)
`sMessageBy`	Text(255)
`sMessageByEmail`	Text(255)
`sReply`	Long text
`sValue`	Long text

tblMail 7 columns

Column	Type
`dDateSent`	Date/time
`iCustomerID`	Integer
`iId`	PK
`iNumberRec`	Integer
`sBody`	Long text
`sBodyBGColor`	Text(255)
`sSubject`	Text(255)

tblMailContact 2 columns

Column	Type
`iMailID`	Integer
`sEmail`	Text(255)

tblModule 6 columns

Column	Type
`bBSPw`	Boolean
`iCustomerID`	Integer
`iId`	PK
`sDescription`	Long text
`sName`	Text(255)
`sPw`	Text(255)

tblMonitor 4 columns

Column	Type
`dts`	Date/time
`iCustomerID`	Integer
`iId`	PK
`sDetail`	Long text

tblNewsletter 11 columns

Column	Type
`bOnline`	Boolean
`iCustomerID`	Integer
`iId`	PK
`sBodyBGColor`	Text(255)
`sFromEmail`	Text(255)
`sFromName`	Text(255)
`sName`	Text(255)
`sStyleLink`	Text(255)
`sSubject`	Text(255)
`sUnsubscribeText`	Text(255)
`sValue`	Long text

tblNewsletterCategory 10 columns

Column	Type
`bRequireBoth`	Boolean
`iCustomerID`	Integer
`iId`	PK
`sErrorMessage`	Text(255)
`sName`	Text(255)
`sNotifEmail`	Text(255)
`sSignupForm`	Long text
`sUnsubscribeFB`	Long text
`sUnsubscribeFBTitle`	Text(255)
`sWelcomeMessage`	Long text

tblNewsletterCategorySubscriber 8 columns

Column	Type
`bActive`	Boolean
`dAdded`	Date/time
`iCategoryID`	Integer
`iCustomerID`	Integer
`iId`	PK
`sEmail`	Text(255)
`sKey`	Text(255)
`sName`	Text(255)

tblNewsletterLog 6 columns

Column	Type
`bRead`	Boolean
`dWhen`	Date/time
`iId`	PK
`iMailingID`	Integer
`iSubscriberID`	Integer
`sKey`	Text(255)

tblNewsletterMailing 7 columns

Column	Type
`bLog`	Boolean
`bSent`	Boolean
`dSentDate`	Date/time
`iCustomerID`	Integer
`iId`	PK
`iNewsletterID`	Integer
`sCategory`	Text(255)

tblPackage 14 columns

Column	Type
`iId`	PK
`sCopySiteID`	Text(255)
`sCopySitePath`	Text(255)
`sEmail`	Text(255)
`sFeedbackMessage`	Long text
`sName`	Text(255)
`sPathCodebase`	Text(255)
`sPathNewSite`	Text(255)
`sPathTemplates`	Text(255)
`sSetupForm`	Long text
`sSubjectWelcomeEmail`	Text(255)
`sUrl`	Text(255)
`sUrlTemplates`	Text(255)
`sWelcomeEmail`	Long text

tblPage 73 columns

Column	Type
`bAccordeon`	Boolean
`bContainerPage`	Boolean
`bDeleted`	Boolean
`bHideDate`	Boolean
`bHideFromSearch`	Boolean
`bHomepage`	Boolean
`bIntranet`	Boolean
`bLossePagina`	Boolean
`bLPExternalOINW`	Boolean
`bMenuGroup`	Boolean
`bNocache`	Boolean
`bOnline`	Boolean
`bOpenInNewWindow`	Boolean
`bOpenOnload`	Boolean
`bPushRSS`	Boolean
`createdTS`	Date/time
`dOnlineFrom`	Date/time
`dOnlineUntill`	Date/time
`dPage`	Date/time
`dUpdatedOn`	Date/time
`iCatalogId`	Integer
`iCustomerID`	Integer
`iFeedId`	Integer
`iFormId`	Integer
`iHits`	Integer
`iHitsRSS`	Integer
`iId`	PK
`iListPageId`	Integer
`iLPOpenByDefault`	Integer
`iParentid`	Integer
`iRang`	Integer
`iReload`	Integer
`iTemplateID`	Integer
`iThemeID`	Integer
`iUpdatedBy`	Integer
`iVisitors`	Integer
`iPMlocation`	Integer
`sApplication`	Text(255)
`sClassName`	Text(255)
`sCode`	Text(255)
`sDescription`	Long text
`sExternalURL`	Text(255)
`sExternalURLPrefix`	Text(255)
`sFormAlign`	Text(255)
`sHeader`	Long text
`sItemPicture`	Text(255)
`sKeywords`	Long text
`sLPExternalURL`	Text(255)
`sLPIC`	Text(255)
`sOrderBY`	Text(255)
`sPageCache`	Long text
`sPageTitle`	Text(255)
`sProp01`	Long text
`sProp02`	Long text
`sProp03`	Long text
`sProp04`	Long text
`sProp05`	Long text
`sProp06`	Long text
`sProp07`	Long text
`sProp08`	Long text
`sPw`	Text(255)
`sRedirectTo`	Text(255)
`sRel`	Text(255)
`sRSSLink`	Text(255)
`sSEOtitle`	Text(255)
`sTitle`	Text(255)
`sTitleToBeValidated`	Text(255)
`sUrlRRSImage`	Text(255)
`sUserFriendlyURL`	Text(255)
`sValue`	Long text
`sValueTextOnly`	Long text
`sValueToBeValidated`	Long text
`updatedTS`	Date/time

tblPageComment 8 columns

Column	Type
`dCreatedTS`	Date/time
`iId`	PK
`IPaddress`	Text(255)
`iPageID`	Integer
`sAuthor`	Text(255)
`sEmail`	Text(255)
`sValue`	Long text
`sWebsite`	Text(255)

tblPoll 13 columns

Column	Type
`bShowTitle`	Boolean
`dCreatedTS`	Date/time
`dResetDate`	Date/time
`dVoteDeadline`	Date/time
`dVoteFrom`	Date/time
`dVoteUntil`	Date/time
`iCustomerID`	Integer
`iId`	PK
`label_numberofvotes`	Text(255)
`label_viewresults`	Text(255)
`label_votenow`	Text(255)
`sQuestion`	Text(255)
`sCode`	Text(255)

tblPollVote 5 columns

Column	Type
`dVoteTS`	Date/time
`iId`	PK
`IP`	Text(255)
`iPollID`	Integer
`iVote`	Integer

tblPopup 15 columns

Column	Type
`bEnabled`	Boolean
`dOnlineFrom`	Date/time
`dOnlineUntil`	Date/time
`iAutoclose`	Integer
`iCustomerID`	Integer
`iHeight`	Integer
`iId`	PK
`iMode`	Integer
`iShows`	Integer
`iTemplateID`	Integer
`iWidth`	Integer
`sName`	Text(255)
`sUrl`	Text(255)
`sValue`	Long text
`sViewmode`	Text(255)

tblPost 14 columns

Column	Type
`bNeedsToBeValidated`	Boolean
`dCreatedTS`	Date/time
`dUpdatedTS`	Date/time
`iContactID`	Integer
`iFileSize`	Integer
`iId`	PK
`iPostID`	Integer
`iThemeID`	Integer
`sAnName`	Text(255)
`sBody`	Long text
`sFileDesc`	Text(255)
`sFileName`	Text(255)
`sKey`	Text(255)
`sSubject`	Text(255)

tblQShopCategory 7 columns

Column	Type
`bOnline`	Boolean
`dCreatedTS`	Date/time
`dUpdatedTS`	Date/time
`iCustomerID`	Integer
`iId`	PK
`iParentCatID`	Integer
`sName`	Text(255)

tblQShopMake 7 columns

Column	Type
`bOnline`	Boolean
`dCreatedTS`	Date/time
`dUpdatedTS`	Date/time
`iCustomerID`	Integer
`iId`	PK
`sLogo`	Text(255)
`sName`	Text(255)

tblQShopProdCat 2 columns

Column	Type
`iCategoryID`	Integer
`iProductID`	Integer

tblQShopProduct 13 columns

Column	Type
`bOnline`	Boolean
`dCreatedTS`	Date/time
`dUpdatedTS`	Date/time
`iCustomerID`	Integer
`iId`	PK
`iMakeID`	Integer
`iStock`	Integer
`sDefaultImage`	Text(255)
`sLongDesc`	Long text
`sName`	Text(255)
`sPriceA`	Text(255)
`sPriceB`	Text(255)
`sShortDesc`	Long text

tblSecondAdmin 3 columns

Column	Type
`iCustomerID`	Integer
`iId`	PK
`sPassword`	Text(255)

tblSession 8 columns

Column	Type
`Browser`	Text(255)
`dTS`	Date/time
`iCustomerID`	Integer
`iId`	PK
`Referer`	Long text
`sLanguage`	Text(255)
`startpage`	Text(255)
`UserIP`	Text(255)

tblTemplate 10 columns

Column	Type
`bCompress`	Boolean
`iCustomerID`	Integer
`iId`	PK
`sCompressValue`	Long text
`sEmailValue`	Long text
`sMobileValue`	Long text
`sName`	Text(255)
`sPrintValue`	Long text
`sValue`	Long text
`sWAPValue`	Long text

tblTheme 32 columns

Column	Type
`bAllowAP`	Boolean
`bAllowComments`	Boolean
`bAllowHTML`	Boolean
`bCompactList`	Boolean
`bEmbed`	Boolean
`bFileUploads`	Boolean
`bForwardPostsToModerator`	Boolean
`bLocked`	Boolean
`bOnline`	Boolean
`bPushRSS`	Boolean
`bSmileys`	Boolean
`bUpload`	Boolean
`bValidation`	Boolean
`iContactID`	Integer
`iCustomerID`	Integer
`iId`	PK
`iLimitReplyTo`	Integer
`iLimitTopicTo`	Integer
`iPageSize`	Integer
`iSearchType`	Integer
`iSubLevel`	Integer
`iType`	Integer
`iWidth`	Integer
`sBodyNotification`	Long text
`sCode`	Text(255)
`sColorEven`	Text(255)
`sColorUneven`	Text(255)
`sLabelYourName`	Text(255)
`sName`	Text(255)
`sSubjectNotification`	Text(255)
`sTopicBodyNotification`	Long text
`sTopicSubjectNotification`	Text(255)

tblThemeSubscription 2 columns

Column	Type
`iContactID`	Integer
`iThemeID`	Integer

tblThemeTopicSubscription 2 columns

Column	Type
`iContactID`	Integer
`iPostID`	Integer

9. Custom-code examples #

Each example shows exactly what goes in the Function body box of bs_constantEdit.asp (and the Parameters / Global Code boxes when used). Remember: write a fragment, never a full page, and never call Response.End.

8.1 Hello world & time of day #

Parameters: none — invoke with [GREETING]. (Adapted from modules/module1.asp.)

Dim dHour
dHour = Hour(Now)

If dHour < 12 Then
    Response.Write "Good morning!"
ElseIf dHour < 17 Then
    Response.Write "Good afternoon!"
Else
    Response.Write "Good evening!"
End If

8.2 Using parameters #

Parameters: sName — invoke with [HELLO("Pieter")]. Always coerce and sanitize parameters; they can carry user input.

Dim safeName
safeName = sanitize(convertStr(sName))
If isLeeg(safeName) Then safeName = "stranger"

Response.Write "<p>Hello, " & safeName & "!</p>"

In Test! mode you will be asked for parameter values — type them in double quotes exactly as they would appear inside the brackets, e.g. "Pieter".

8.3 Querying the database #

Parameters: iCount — invoke with [RECENTPAGES(5)]. Shows the most recent online pages of the current site. Note the defensive coding, tenant scoping, engine-aware helpers, and cleanup.

Dim n, sql, rs, html
n = convertGetal(iCount)
If n <= 0 Then n = 5

' [TOP] is rewritten by getTOPSyntax to the right syntax per DB engine
sql = "select [TOP] iId, sTitle from tblPage " & _
      "where iCustomerID=" & cId & " " & _
      "and bOnline=" & getSQLBoolean(true) & " " & _
      "and bDeleted=" & getSQLBoolean(false) & " " & _
      "order by createdTS desc"
sql = getTOPSyntax(n, sql)

html = ""
Set rs = db.Execute(sql)
Do While not rs.EOF
    html = html & "<li><a href=""default.asp?iId=" & EnCrypt(rs("iId")) & """>" & _
           sanitize(rs("sTitle")) & "</a></li>"
    rs.MoveNext
Loop
rs.Close : Set rs = Nothing

If html <> "" Then Response.Write "<ul>" & html & "</ul>"

SQL injection. If a parameter is a string used in a WHERE clause, wrap it: "... and sCode='" & cleanUp(convertStr(sCode)) & "'". For numbers, run them through convertGetal() first. Never paste raw Request/parameter text into SQL.

8.4 Working with page objects #

Parameters: none — invoke with [CHILDLINKS] on any page that has sub-pages. Builds a menu of the current page’s online children using the in-scope selectedPage object.

Dim kids, k, html
Set kids = selectedPage.subPages(true)   ' true = online only

html = ""
For Each k In kids
    html = html & "<li>" & kids(k).getSimpleLink & "</li>"
Next
Set kids = Nothing

If html <> "" Then Response.Write "<ul class=""childnav"">" & html & "</ul>"

The same pattern works for list items via selectedPage.listitems(true), or for any other page by Set p = new cls_page : p.Pick(id).

8.5 Login-aware output #

Parameters: none — invoke with [ADMINONLY]. Renders content only for a logged-in backsite (webmaster) user. (Adapted from modules/module2.asp.)

If Session(Application("QS_CMS_iCustomerID") & "isAUTHENTICATED") = true Then
    ' Webmaster is logged into the backsite
    Response.Write "<div class=""adminbox"">Secret editor note here.</div>"
Else
    ' Not authenticated - output nothing (or a hint)
    ' Response.Write ""
End If

To also allow the second admin, add or Session(Application("QS_CMS_iCustomerID") & "isAUTHENTICATEDSecondAdmin") = true.

8.6 Global Code: reusable helpers #

Put helper Functions/Classes in the Global Code box; they load (via ExecuteGlobal) before the body. Keep the Function body focused on producing output.

Global Code:

Function Euro(n)
    ' format a number as a euro amount
    Euro = "€ " & FormatNumber(convertGetal(n), 2)
End Function

Parameters: iAmount — Function body — invoke with [PRICE(19.95)]:

Response.Write "<span class=""price"">" & Euro(iAmount) & "</span>"

8.7 A small custom form #

Parameters: none — invoke with [NAMEFORM]. A self-posting form; the sCode hidden field tells QuickerSite which page to reload after submit. (Adapted from modules/module3.asp.)

Response.Write "<form action=""default.asp"" method=""post"">"
Response.Write "<input type=""hidden"" name=""sCode"" value=""FORM"" />"
Response.Write "Your name: <input type=""text"" name=""field"" value=""" & _
    sanitize(Request.Form("field")) & """ /> "
Response.Write "<input type=""submit"" value=""Submit"" />"
Response.Write "</form>"

If Request.Form("field") <> "" Then
    Response.Write "<p>Your name is " & sanitize(Request.Form("field")) & ".</p>"
End If

For anything beyond a toy form (validation, email, file upload, stored submissions) use a managed cls_form instead of rolling your own.

Checklist before you Save

✓ Every variable is Dim’d.
✓ Output is a fragment; no <html>, no Response.End.
✓ Every dynamic value passes through sanitize() / Server.HTMLEncode.
✓ SQL is tenant-scoped (iCustomerID = cId) and inputs are escaped (cleanUp/convertGetal).
✓ Recordsets are .Closed and objects Set…Nothing.
✓ It shows TEST OK! in the backsite tester.

10. Prompt builder #

Generate a compact, accurate spec for an AI coding agent (or yourself) to produce a QuickerSite-ready constant. Fill the form, press Build, copy the result. The generated prompt embeds the engine rules from chapter 3 so the output drops straight into bs_constantEdit.asp.

Browsing vs. offline. Pick the Target AI agent mode below. If your agent can browse (e.g. a web-enabled assistant), the prompt tells it to fetch the published docs at pietercooreman.github.io/QuickerSite/ for exact schema and class details. If it is offline (plain API / local model), the prompt forbids guessing and instead asks you to paste the relevant schema (copy it from chapter 8) — otherwise the model would hallucinate the URL’s contents.

Goal What should the script do? Shortcode name UPPERCASE, no spaces. Used as [NAME]. Takes parameters Capabilities Leave all off to let the AI use the minimum the goal needs.

Database Login check customer selectedPage Request input Session Application cache FileSystem Outbound HTTP Nested shortcodes

Target AI agent Controls whether the prompt tells the model to fetch the docs URL.

Can browse the web (fetch docs) Offline / no browsing (paste schema)

DB schema Paste the exact tables/columns the script touches. Strongly recommended for offline agents.

Copy real tables from chapter 8 → All tables & columns. With an offline agent and no schema here, the prompt will tell the model to ask instead of guessing.

Output type Extra requirements

Press “Build” to generate the prompt.

QuickerSite Developer Guidelines — generated from source in asp/includes/. References use file:line against this repository. Tip: press copy on any code block, and use the sidebar to jump between sections.
Published at pietercooreman.github.io/QuickerSite/.

QuickerSite Developer Guidelines

The two ways to add custom logic

Ground rules (read before writing anything)

2. Architecture & request flow #

What begin.asp sets up

Rendering pipeline

3. The constant / CustomFunction engine #

How a constant is stored

What QuickerSite does with it

The hard rules

Invoking your constant

The author/test loop

4. Globals available to your code #

db — database

customer — current site settings

selectedPage — the current page

cId & localization

5. Most-used classes #

cls_page most used #

Key properties

Key methods

cls_database (the db global) #

cls_customer (the customer global) #

Useful properties

Useful methods / properties

cls_contact #

Properties

Methods

cls_form #

Properties

Methods

cls_catalog & cls_catalogItem #

cls_catalog

cls_catalogItem

cls_post #

cls_feed / cls_gallery / cls_poll #

cls_constant #

cls_menu & cls_Messages #

cls_menu html

cls_Messages (the message global)

6. Helper functions #

Output & sanitizing

Type conversion & validation

Dates

SQL (engine-aware — use these instead of literals)

Composition & misc

7. Constants #

Content types

Layout / placement

Environment / misc

8. Database overview #

Conventions

Access type → meaning

Tables by area

Key relationships

Example: a tenant-safe join

All tables & columns

9. Custom-code examples #

8.1 Hello world & time of day #

8.2 Using parameters #

8.3 Querying the database #

8.4 Working with page objects #

8.5 Login-aware output #

8.6 Global Code: reusable helpers #

8.7 A small custom form #

Checklist before you Save

10. Prompt builder #

What `begin.asp` sets up

cls_database (the `db` global) #

cls_customer (the `customer` global) #

cls_Messages (the `message` global)