| Author |
 Topic  |
|
OneWayMule
Dev. Team Member & Support Moderator
Austria
4969 Posts |
|
|
@tomic
Senior Member
USA
1790 Posts |
 Posted - 18 January 2003 : 21:52:33
|
I've done quite a bit of modifications to this recently and should have an update soon but I wanted to post this addition to active users that will show what category and/or article someone is reading:
After the green add the red
case "pop_profile.asp"
if instr(lcase(fQuery), "display") then
strPage = strPage & fLang(strLangMOD_Ls3kAU_01250)
else
strPage = fLang(strLangMOD_Ls3kAU_01260)
end if
case "showquestion.asp"
strQuery = fQuery
fFLDAUTO = analyzeQuery(strQuery, "FLDAUTO")
if fFLDAUTO = "" then
strPage = "Reading Article"
else
strSQL = "SELECT QUESTION FROM " & strTablePrefix & "QUESTION WHERE F" & fFLDAUTO
set rst = my_conn.execute(strSql)
if rst.EOF or rst.BOF then
strPage = "Reading Article"
set rst = nothing
else
fArticleTitle = rst("QUESTION")
rst.close
set rst = nothing
strPage = "Reading Article:<br><a href=""showquestion.asp?" & fQuery & """>"
strPage = strPage & fArticleTitle
end if
end if
case "showfaq.asp"
strQuery = fQuery
fFLDAUTO = analyzeQuery(strQuery, "FLDAUTO")
if fFLDAUTO = "" then
strPage = "Browsing Articles"
else
strSQL = "SELECT NAME FROM " & strTablePrefix & "FAQ WHERE FLDAUTO" & fFLDAUTO
set rst = my_conn.execute(strSql)
if rst.EOF or rst.BOF then
strPage = "Browsing Articles"
set rst = nothing
else
fCategoryTitle = rst("NAME")
rst.close
set rst = nothing
strPage = "Browsing Articles in:<br><a href=""showfaq.asp?" & fQuery & """>"
strPage = strPage & fCategoryTitle
end if
end if |
SportsBettingAcumen.com |
 |
|
|
PeeWee.Inc
Senior Member
United Kingdom
1893 Posts |
Posted - 23 January 2003 : 15:07:24
|
Microsoft VBScript runtime error '800a000d'
Type mismatch: 'cint'
/casscam/forum/admin_chapter.asp, line 26
Gettin this error when i try and make a subcat? |
De Priofundus Calmo Ad Te Damine |
|
|
|
PeeWee.Inc
Senior Member
United Kingdom
1893 Posts |
Posted - 23 January 2003 : 15:12:44
|
Microsoft VBScript runtime error '800a000d'
Type mismatch: 'cint'
/casscam/forum/admin_chapter.asp, line 26
gettin this error on /forum/showfaq.asp?fldAuto=2 |
De Priofundus Calmo Ad Te Damine |
|
|
|
PeeWee.Inc
Senior Member
United Kingdom
1893 Posts |
Posted - 28 January 2003 : 08:34:33
|
| *bump* |
De Priofundus Calmo Ad Te Damine |
|
|
|
DJBBIZ
Junior Member
214 Posts |
Posted - 31 January 2003 : 01:49:40
|
Hey @tomic. I am getting ready to try and install this mod. In reviewing the db setup file I noted a table named FAQ. THe FAQ Mod here at Snitz and at ServerHacker also creates a FAQ table. As such I already have one which is also populated with Forum FAQ's.
If I change the db file to be ARTICLE_FAQ, how much work will I have in the modification of the Article code to fix this. Additionally will it make it very dificult to keep up with future versions and enhancements? Lastly would you consider making this change yourself in your permanent code?
This is a list of all the strTablePrefix FAQ's I found:
Searching for: " & strTablePrefix & "FAQ
admin_chapter.asp(66): Set oRSFAQ = my_Conn.Execute ("SELECT * FROM " & strTablePrefix & "FAQ WHERE FLDAUTO = " & chkString(Request.QueryString("faq_fldAuto"),"SQLString") )
admin_chapters.asp(57): Set oRSFAQ = my_Conn.Execute ("SELECT * FROM " & strTablePrefix & "FAQ WHERE FLDAUTO = " & trim(chkString(Request.QueryString("faq_fldAuto"),"SQLString")) )
admin_default.asp(31): strSql = "INSERT INTO " & strTablePrefix & "FAQ ( NAME, DESCR) VALUES ( '" & strName & "', '" & strDescr & "')"
admin_default.asp(70): Set oRS = my_Conn.Execute("SELECT * FROM " & strTablePrefix & "FAQ")
admin_faq2.asp(24): oRS.Open "SELECT * FROM " & strTablePrefix & "FAQ WHERE FLDAUTO = " & sID, my_Conn, 1, 3
admin_faq2.asp(55): Set rsTopLevelCat = my_Conn.Execute( "SELECT * FROM " & strTablePrefix & "FAQ WHERE FLDAUTO = " & ChkString(Request.QueryString("fldAuto"), "SQLString") )
admin_questions.asp(64): Set oRSFAQ = my_Conn.Execute ("SELECT * FROM " & strTablePrefix & "FAQ WHERE FLDAUTO = " & nFaqID )
article_comments.asp(33): strSQL = ("SELECT NAME FROM " & strTablePrefix & "FAQ WHERE FLDAUTO = " & nfaq_fldAuto )
inc_article_menu.asp(13): strSQL = ("SELECT FLDAUTO, NAME FROM " & strTablePrefix & "FAQ ORDER BY NAME" )
pop_printer_Article.asp(95): Set oRS2 = my_Conn.Execute("SELECT NAME FROM " & strTablePrefix & "FAQ WHERE fldAuto=" & nfaq_fldAuto )
showfaq.asp(14): strSQL = ("SELECT QUESTION, AUTHOR, POST_DATE, UPDATE_DATE, ANSWER, QUESTION.CHAPTER_FLDAUTO, QUESTION.FLDAUTO AS qid, FAQ.NAME AS faqname, CHAPTER.NAME AS chaptername FROM " & strTablePrefix & "QUESTION AS question, " & strTablePrefix & "FAQ AS faq, " & strTablePrefix & "CHAPTER AS chapter WHERE QUESTION.CHAPTER_FLDAUTO = CHAPTER.FLDAUTO AND CHAPTER.FAQ_FLDAUTO = faq.fldAuto AND FAQ.FLDAUTO = " & nFAQId & " ORDER BY CHAPTER.ORDERINGFIELD, QUESTION.ORDERINGFIELD" )
showquestion.asp(30): strSQL = ("SELECT NAME FROM " & strTablePrefix & "FAQ WHERE FLDAUTO = " & strTitleCat )
Found 12 occurrence(s) in 10 file(s)
Is there any other code which would be affected? |
"The difference between good ideas and good results is performance"
the management institute | tmiFinance | tmiCreative | ProfileOnDemand |
Edited by - DJBBIZ on 31 January 2003 02:03:57 |
|
|
|
DJBBIZ
Junior Member
214 Posts |
Posted - 02 February 2003 : 11:45:53
|
For anyone interested here is @tomic's response:
I'm going to need to look into this further but changing the table name and references to it in the queries really shouldn't be too hard. It probably is a good idea to do this anyway so that the table name is more descriptive of what it actually is for.
Ideally the querystring would be altered as well but that will have to come last since it would really mess up search engines. At least for me.
I have done quite a few improvements in the last couple of months and will try to get this done for an update. I meant to do it sooner but I've been too sick to do much of anything for the last few weeks. Next week I'm on vacation and can probably devote some of that to this issue.
|
"The difference between good ideas and good results is performance"
the management institute | tmiFinance | tmiCreative | ProfileOnDemand |
|
|
|
DJBBIZ
Junior Member
214 Posts |
Posted - 10 February 2003 : 15:28:31
|
These were the suggested table names from @tomic:
I suppose I should change all of the field names. Maybe this would be a better table naming scheme:
FAQ = ARTICLE_CATS
CHAPTER = ARTICLE_SUBCATS
QUESTION = ARTICLE_CONTENT
That would make it look a lot less like a modified helpdesk |
"The difference between good ideas and good results is performance"
the management institute | tmiFinance | tmiCreative | ProfileOnDemand |
|
|
|
PeeWee.Inc
Senior Member
United Kingdom
1893 Posts |
Posted - 10 February 2003 : 15:48:33
|
I can never seem to get this MOD to work on my IIS  |
De Priofundus Calmo Ad Te Damine |
|
|
|
seven
Senior Member
USA
1037 Posts |
Posted - 10 February 2003 : 20:27:53
|
Any news on this mod?  |
|
|
|
|
DJBBIZ
Junior Member
214 Posts |
Posted - 11 February 2003 : 01:39:39
|
| I have not began my installation, but for all those of interest I think @tomic has been busy so the update might be awhile, but none the less he said that he has been using this mod for the past year and it has been working well. I inquired to try and get this info for my own modification, he was gracious enough to give his thoughts so don't take my posts as any commitment from @tomic as he will post when he is ready. As such I hope it will be relatively easy to update later. |
"The difference between good ideas and good results is performance"
the management institute | tmiFinance | tmiCreative | ProfileOnDemand |
|
|
|
skyhawks
Junior Member
USA
125 Posts |
Posted - 24 February 2003 : 23:23:13
|
| any word with this MOD??? I did installed what was available to download and it didnt work for me... then reading all the message, it seem like it is being work on it again. just wondering hows that coming along?? TIA |
----------------------------------------
Website: http://www.johnlophotography.com |
|
|
|
famdylan
Starting Member
15 Posts |
Posted - 24 February 2003 : 23:34:56
|
| Me too! I installed this on my test site and am waiting to hear on the update. I can't make subcategories or articles so it is kind of useless to me at this point. |
|
|
|
webbee
Junior Member
100 Posts |
Posted - 06 March 2003 : 00:53:59
|
| Just wanted to check the status of this mod. I think it would be a great addition to my site. It looks great on yours :) |
garnold@teamfatbastard.net
 |
|
|
|
Helterskelter
Junior Member
United Kingdom
331 Posts |
Posted - 07 March 2003 : 15:58:16
|
I'm testing Serverhacker's modded site and added atomic_articles34 MOD
I had to change showfaq.asp but deleting 2 "Include" lines
%>
<!--#INCLUDE FILE="inc_login.asp"-->(deleted)
<br>
<!--#INCLUDE FILE="inc_pm.asp"-->(deleted)
<br>
<!--#INCLUDE VIRTUAL="forum/inc_article_menu.asp"-->
And now the it works fine on Sitenews.asp
--------------------------------------------------------------------------------
But heres the problem
I then added my personal Categorie and deleted the default
and the got this error
ADODB.Field error '800a0bcd'
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
/forum/showfaq.asp, line 17
But the default worked fine.
I've searched the forum and found other related problems and tried the options there but with no luck
Got any idea's?
I know the someone must, you always do
Thanks Hetla
|
 |
|
|
|
Topic |
|
Topic Locked
