Your Bookmark mod looks kind of strange to me...what version you using? Also what flavor of MySql The code in yours was to get around the inner join issue of the past, MySql 4 solves that issue and you could change the following.
Lines 156-169 Comment or Delete (back the file first)
if strDBType = "mysql" then
strSql = "SELECT B.BOOKMARK_ID, C.CAT_NAME, F.F_SUBJECT, T.TOPIC_ID, T.T_SUBJECT, T.T_REPLIES, T.T_DATE, T.T_LAST_POST, M.M_NAME, T.FORUM_ID, T.CAT_ID, T.T_LAST_POST_AUTHOR, B.B_TOPICID, M.MEMBER_ID, T.T_AUTHOR, F.FORUM_ID, C.CAT_ID, F.CAT_ID FROM ("& strTablePrefix & "CATEGORY AS C INNER JOIN "& strTablePrefix & "FORUM AS F ON C.CAT_ID = F.CAT_ID) INNER JOIN ("& strMemberTablePrefix & "MEMBERS AS M ON M.MEMBER_ID = T.T_AUTHOR) INNER JOIN ("& strTablePrefix & "BOOKMARKS AS B ON B.B_TOPICID = T.TOPIC_ID) INNER JOIN "& strTablePrefix & "TOPICS AS T ON F.FORUM_ID = T.FORUM_ID WHERE (B.B_MEMBERID=" & getmemberID(strDBNTUserName) & ")"
else
strSql = "SELECT B.BOOKMARK_ID, C.CAT_NAME, F.F_SUBJECT, T.TOPIC_ID, T.T_SUBJECT, T.T_REPLIES, T.T_DATE, T.T_LAST_POST, M.M_NAME, T.FORUM_ID, T.CAT_ID, T.T_LAST_POST_AUTHOR, B.B_TOPICID, M.MEMBER_ID, T.T_AUTHOR, F.FORUM_ID, C.CAT_ID, F.CAT_ID FROM ("& strTablePrefix & "CATEGORY C INNER JOIN "& strTablePrefix & "FORUM F ON C.CAT_ID = F.CAT_ID) INNER JOIN ("& strMemberTablePrefix & "MEMBERS M INNER JOIN ("& strTablePrefix & "BOOKMARKS B INNER JOIN "& strTablePrefix & "TOPICS T ON B.B_TOPICID = T.TOPIC_ID) ON M.MEMBER_ID = T.T_AUTHOR) ON F.FORUM_ID = T.FORUM_ID WHERE (B.B_MEMBERID=" & getmemberID(strDBNTUserName) & ")"
end if
if lastDate <> "All" then strsql = strsql & " AND T.T_LAST_POST > '" & lastDate & "'"
if strDBType = "mysql" then
rs.Open strSQL, my_Conn
Else
rs.Open strSQL, my_Conn, 3
End If
Should look like this:
strSql = "SELECT B.Bookmark_ID, C.Cat_Name, F.F_SUBJECT, T.Topic_ID, T.T_subject, T.T_Replies, T.T_date, T.T_Last_Post, M.M_NAME,T.FORUM_ID, T.CAT_ID, T.T_LAST_POST_AUTHOR FROM ("& strTablePrefix & "Category C INNER JOIN "& strTablePrefix & "Forum F ON C.Cat_ID = F.CAT_ID) INNER JOIN ("& strMemberTablePrefix & "Members M INNER JOIN ("& strTablePrefix & "Bookmarks B INNER JOIN "& strTablePrefix & "Topics T ON B.B_TopicID = T.Topic_ID) ON M.Member_id = T.T_AUTHOR) ON F.Forum_ID = T.Forum_id WHERE (B.B_MemberID=" & getmemberID(strDBNTUserName) & ")"
if lastDate <> "All" then strsql = strsql & " AND T.T_LAST_POST > '" & lastDate & "'"
rs.Open strSQL, my_Conn, 3
The only MySql code you should have is for paging around line 263
If strDBType <> "mysql" then
rs.AbsolutePage = iPage
End if
Other than that it works ok on MySql.
Topic Locked
Posted - 15 May 2003 : 03:56:54
you didn't answer my question