Mandatory field and RSS UTF8

<p style="text-align : face="Tahoma" : left; style="font-size: 9pt;color:#959595;">

<br />

<meta http-equiv="Content-Type" content="text/html; charset= utf-8">

<%

Dim strLastestPostsModForumPath

Dim intLastestPostsTotal

Dim intCharacters

Dim strLastestPostsModCon

Dim adoCon

Dim rsAll

Dim strSQL

Dim intLoopCounter

Dim strTID

Dim strSubject

Dim strPID

'The absolute path to the forum

strLastestPostsModForumPath = ""

'How many new topics to show

intLastestPostsTotal = 10

'How many characters to show from the Topic title?

intCharacters = 255

'Database connection

'Default connection - adjust to suit

strLastestPostsModCon = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & "F:\Database\mydatabase.mdb"

Set adoCon = Server.CreateObject("ADODB.Connection")

adoCon.Open strLastestPostsModCon

Set rsAll = Server.CreateObject("ADODB.Recordset")

strSQL = "SELECT TOP " & intLastestPostsTotal & " "

strSQL = strSQL & " Topic_ID, Subject, Last_thread_ID "

strSQL = strSQL & " FROM tblTopic "

strSQL = strSQL & "ORDER BY Last_Thread_ID DESC;"

'open the connection

rsAll.Open strSQL, adoCon

'if there are records put into an array then close the connection

If NOT rsAll.EOF Then strArrayAll = rsAll.getRows()

rsAll.Close

Set rsAll = Nothing

adoCon.Close

Set adoCon = Nothing

'Loop through the array of forum posts

For intLoopCounter = 0 TO UBound(strArrayAll, 2)

  'strArrayAll array lookup table

  '0 = Topic_ID

  '1 = Subject

  '2 = Last_thread_ID

  strTID = strArrayAll(0, intLoopCounter)

  strSubject = strArrayAll(1, intLoopCounter)

  strPID = strArrayAll(2, intLoopCounter)

 'if someone uses a single quote in the title like: Where's

 'the quote is stored as &#039; which is normally Ok unless the line gets truncated.

 'I had a l