Snitz Forums 2000
Snitz Forums 2000
Home | Profile | Register | Active Topics | Members | Search | FAQ
Username:
Password:
Save Password
Forgot your Password?

 All Forums
 Snitz Forums 2000 MOD-Group
 MOD Add-On Forum (W/Code)
 Front page top 5 active topics
 New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

Medic397
New Member

80 Posts

Posted - 10 November 2002 :  19:59:22  Show Profile  Visit Medic397's Homepage  Send Medic397 an AOL message  Send Medic397 a Yahoo! Message
Before I post what my problem is there a link to help me with this. I have searched for two and must not have put in the proper words or don't know how to work the search function.

Edited by - ruirib on 10 November 2002 22:10:14

Medic397
New Member

80 Posts

Posted - 10 November 2002 :  20:44:47  Show Profile  Visit Medic397's Homepage  Send Medic397 an AOL message  Send Medic397 a Yahoo! Message
<%
Dim sQLQuery
Dim count
'set count to 1
count = "0"
sQLQuery = "select TOP 5 FORUM_TOPICS.TOPIC_ID, FORUM_TOPICS.T_SUBJECT, FORUM_TOPICS.T_MESSAGE," & _
" FORUM_TOPICS.T_DATE from FORUM_TOPICS" & _
" ORDER BY FORUM_TOPICS.TOPIC_ID DESC;"
Set dataConn = Server.CreateObject("ADODB.Connection")
dataConn.Open strConnString
Set RSlist = Server.CreateObject("ADODB.recordset")
Rslist.Open sqlQuery, dataConn
Do While Not RSlist.EOF
response.write "<a href=""/forum/topic.asp?TOPIC_ID=" & RSlist("TOPIC_ID") & " "" " & " class=""LINK"" > Subject : " & VBNewline & _
RSlist("T_SUBJECT") & "</a><BR>" & VBNewline
response.write "<span class=""MenuTopic""> " & Trim(Left(RemoveHTML(RSlist("T_MESSAGE")), 50)) & "....</span>" & "<BR>" & VBNewline
response.write "<span class=""MenuTopic2"">Posted : " & StrToDate(RSlist("T_DATE")) & "</span><BR>" & VBNewline
'increment count
count = count + 1

RSlist.Movenext
Loop%>

That is the code I am using. It works on earlier versions. Here is my problem.

Microsoft VBScript runtime error '800a000d'

Type mismatch: 'RemoveHTML'

/inc_bottom.asp, line 38

Go to Top of Page

DoraMoon
Average Member

Taiwan
661 Posts

Posted - 10 November 2002 :  20:51:15  Show Profile
i think it just mean it can't found the RemoveHTML function..

try copy this function from your earlier inc_functions.asp to your new inc_func_common.asp
Go to Top of Page

Medic397
New Member

80 Posts

Posted - 10 November 2002 :  20:57:09  Show Profile  Visit Medic397's Homepage  Send Medic397 an AOL message  Send Medic397 a Yahoo! Message
Thank you very much that solved my problem. :)
Go to Top of Page
  Previous Topic Topic Next Topic  
 New Topic  Topic Locked
 Printer Friendly
Jump To:
Snitz Forums 2000 © 2000-2021 Snitz™ Communications Go To Top Of Page
This page was generated in 0.17 seconds. Powered By: Snitz Forums 2000 Version 3.4.07