| Author |
 Topic  |
|
JakeG
Starting Member
USA
9 Posts |
 Posted - 22 March 2004 : 16:32:35
|
Found another bug.
This one is in the search results. It seems that if the resulting link is in a subcat then the Category link points to a main cat with the subcat's ID. I fixed this with the below code, as well as split the category link into 2 peices for easier navigation.
Here are my fixes:
On or about Line 66, find "Function getCategoryName(subcat_id)"
Replace the entire function with these TWO functions:
Function getCategoryID(subcat_id)
Dim rsTemp, rsTemp1
strsql = "SELECT CAT_ID FROM " & strTablePrefix & "LINKS_SUBCATEGORIES WHERE SUBCAT_ID= " & subcat_id
Set rsTemp1 = my_conn.execute(strsql)
If rsTemp1.EOF Then
getCategoryID = 0
Else
getCategoryID = rsTemp1("CAT_ID")
End If
rsTemp1.Close
Set rsTemp1 = Nothing
End Function
Function getCategoryName(cat_id)
strsql = "SELECT CAT_NAME FROM " & strTablePrefix & "LINKS_CATEGORIES WHERE CAT_ID =" & cat_id
Set rsTemp = my_conn.execute(strsql)
If rsTemp.EOF Then
getCategoryName = "<font color=""" & strHoverFontColor & """><i>Category Deleted</i></font>"
Else
getCategoryName = rsTemp("CAT_NAME")
End If
rsTemp.Close
set rsTemp = nothing
End Function
Next, On or about line 221
Replace:
TmpStr = TmpStr & "<a href=""links.asp?action=showcat&id=" & trs("CATEGORY") & """>" & getCategoryName(trs("CATEGORY")) & " / " & getSubCatName(trs("CATEGORY")) & "</a>" & vbNewLine
With:
TmpStr = TmpStr & "<a href=""links.asp?action=showcat&id=" & GetCategoryID(trs("CATEGORY")) & """>" & getCategoryName(GetCategoryID(trs("CATEGORY"))) & "</A> / <a href=""links.asp?action=showsubcat&id=" & trs("CATEGORY") & """>" & getSubCatName(trs("CATEGORY")) & "</a>" & vbNewLine
Next, On or about line 229
Replace
TmpStr = TmpStr & getCategoryName(trs("CATEGORY")) & " / " & getSubCatName(trs("CATEGORY")) & "<br />" & vbNewLine
With
TmpStr = TmpStr & getCategoryName(GetCategoryID(trs("CATEGORY"))) & " / " & getSubCatName(trs("CATEGORY")) & "<br />" & vbNewLine
< |
- Jake
www.nthelp.org / www.computershowoff.com
Microsoft MVP - IIS
http://mvp.support.microsoft.com |
 |
|
|
SLBaronsFan
Starting Member
4 Posts |
Posted - 31 March 2004 : 16:57:44
|
When I try to "Rate" a link, I get this error:
Microsoft VBScript runtime error '800a000d'
Type mismatch: 'strPostDate'
/pop_links.asp, line 188
Any ideas? Everything else works great.< |
|
|
|
OneWayMule
Dev. Team Member & Support Moderator
Austria
4969 Posts |
|
|
lilaccrafts
Starting Member
18 Posts |
Posted - 10 April 2004 : 18:12:32
|
I have yet to have a problem with this mod works flawlessly.
www.lilaccrafts.com/forums/links.asp< |
|
|
|
achaudhary
Starting Member
7 Posts |
Posted - 09 June 2004 : 11:31:26
|
I am using this MOD But i am having a Problem. The link doesnt have a description under it. Could someone let me know what might be wrong?
thanks
< |
|
|
|
OneWayMule
Dev. Team Member & Support Moderator
Austria
4969 Posts |
|
|
OneWayMule
Dev. Team Member & Support Moderator
Austria
4969 Posts |
|
|
samyot
Junior Member
Canada
242 Posts |
Posted - 07 October 2004 : 12:09:16
|
Hi,
I have been able to apply all fixes I found on Links Manager on MySQL but I am still having this last issue. I get this error message when I click on a subcategory where the sites should be displayed.
----------------------------------------------------------
Microsoft VBScript runtime error '800a01ca'
Variable uses an Automation type not supported in VBScript
/support/inc_func_links.asp, line 186
----------------------------------------------------------
Any idea why this is happening?
Line 186 has:
strsql = "SELECT LINK_ID, NAME, URL, KEYWORD, DESCRIPTION, EMAIL, POST_DATE, BANNER_URL, HIT, CATEGORY, PARENT_ID, SHOWLINK, BADLINK, RATING, VOTES, MEMBER_ID, LAST_UPDATE, BANNER_SIZE, THELANGUAGE FROM " & strTablePrefix & "LINKS WHERE LINK_ID=" & tmp_link_id
See http://www.mytechsupport.ca/index_directory.html and click on a subcategory.
Thank you in advanced
< |
Sylvain Amyot
Forum | Home
MY OTHER SITES:
http://www.mypcsecurity.ca
http://www.mynature.ca
http://www.myworkshop.ca
http://www.toptechsites.com
http://www.topsportsites.com
http://www.mysportsforums.net
|
|
|
|
samyot
Junior Member
Canada
242 Posts |
|
|
OneWayMule
Dev. Team Member & Support Moderator
Austria
4969 Posts |
|
|
samyot
Junior Member
Canada
242 Posts |
|
|
samyot
Junior Member
Canada
242 Posts |
|
|
OneWayMule
Dev. Team Member & Support Moderator
Austria
4969 Posts |
|
|
OneWayMule
Dev. Team Member & Support Moderator
Austria
4969 Posts |
|
|
samyot
Junior Member
Canada
242 Posts |
|
|
Topic |
|
MOD: Links Manager v3.0 Beta (Snitz v3.4)
<