Comments and feedback

Type in your comments here - HTML allowed (and no "quotes"). Submissions are reviewed before they are published: <%If Request.QueryString("antispam") = "true" Then Response.Write "
Incorrect Antispam code!" %>

Name (Required):
E-mail address (Optional):
Your comment here:

Antispam code:

Here are your comments - the good ones of course!

<% Set commentsRS = Server.CreateObject("ADODB.RecordSet") commentsSQL= "Select ID, name, comment, DATE_FORMAT(date,'%D %b %Y at %T hrs') AS date FROM tblcomments WHERE active = -1 ORDER BY ID DESC" commentsRS.Open commentsSQL, whtConn, 1 commentsRS.MoveFirst Do while NOT commentsRS.EOF Response.Write "

" Response.Write commentsRS("date") Response.Write "
" Response.Write commentsRS("comment") Response.Write "
" Response.Write commentsRS("name") Response.Write "

" commentsRS.MoveNext Loop 'close connections,etc.. commentsRS.Close Set commentsRS = Nothing %>