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

 All Forums
 Help Groups for Snitz Forums 2000 Users
 Help: MOD Implementation
 error after implimenting poll mod
 New Topic  Topic Locked
 Printer Friendly
Author Previous Topic Topic Next Topic  

maccad
Starting Member

7 Posts

Posted - 12 August 2003 :  12:01:53  Show Profile  Visit maccad's Homepage
hey

i installed the pool mod according to the instructions and went to add a new pol to a forum and i get the following error message



ADODB.Recordset.1 error '80004005' 

SQLState: 42000
Native Error Code: 1064
[TCX][MyODBC]You have an error in your SQL syntax near '' at line 1


/forum/post.asp, line 397 





the below is lines 375 to 430

		TxtMsg = rs("T_MESSAGE")
	else
		if strRqMethod = "TopicQuote" then
			TxtMsg = "
quote:
Originally posted by " & chkString(rs("M_NAME"),"display") & "" & vbNewline TxtMsg = TxtMsg & " " & rs("T_MESSAGE") & vbNewline TxtMsg = TxtMsg & "
" end if end if end if ' ############################## Poll Mod ################################ if Request.QueryString("poll") = "1" then '### Get poll from POLLS table strSql = "SELECT " & strTablePrefix & "POLLS.P_WHOVOTES, " for i = 1 to 15 strSql = strSql & strTablePrefix & "POLLS.ANSWER" & CStr(i) & ", " strSql = strSql & strTablePrefix & "POLLS.COUNT" & CStr(i) if i <> 15 then strSql = strSql & ", " end if next strSql = strSql & " FROM " & strTablePrefix & "POLLS" strSql = strSql & " WHERE " & strTablePrefix & "POLLS.TOPIC_ID = " & strRqTopicID set rsPoll = my_Conn.Execute (strSql) if rsPoll.EOF or rsPoll.BOF then Go_Result "You are trying to edit a Topic that is not a Poll" else strWhoVotes = rsPoll("P_WHOVOTES") nTotal = 0 ReDim txtAns(15) for i = 1 to 15 txtAns(i) = trim(rsPoll("ANSWER" & CStr(i))) if txtAns(i) <> "" then nTotal = nTotal + 1 end if next if CInt(strMaxVotes) > nTotal then nCount = strMaxVotes else nCount = nTotal end if end if rsPoll.Close set rsPoll = nothing end if ' ############################################################ if strRqMethod = "EditForum" or _ strRqMethod = "EditURL" then '## Forum_SQL ' DEM --> Added F_SUBSCRIPTION, F_MODERATION to the end of this select strSql = "SELECT F_SUBJECT, F_URL, F_PRIVATEFORUMS, F_PASSWORD_NEW, " & _ "F_DEFAULTDAYS, F_COUNT_M_POSTS, F_SUBSCRIPTION, F_MODERATION, F_DESCRIPTION " & _ " FROM " & strTablePrefix & "FORUM " & _ " WHERE FORUM_ID = " & strRqForumId




where have i gone wrong , have i missed something or stuffed something up

any help would be greatly appriciated
  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.27 seconds. Powered By: Snitz Forums 2000 Version 3.4.07