| Author |
 Topic  |
|
|
buckfu
Starting Member
18 Posts |
 Posted - 31 March 2007 : 18:39:15
|
hey folks,
I'm trying to get this proeder's file attachment mod to work, and I just can't get the thing running. Here is the error:
Microsoft VBScript compilation error '800a0409'
Unterminated string constant
/forum/post.asp, line 1069
" <font face=""" & strDefaultFontFace & """ size="" & strDefaultFontSize & vbNewLine & _
----------------------------------------------------------------------------------------^
Here is the post.asp code:
'################### proeder's File Attachment: Link to add #######################
if strAllowAttachment = 1 then
Response.Write "<tr>" & vbNewLine & _
" <td bgColor=""" & strPopUpTableColor & """> </td>" & vbNewLine & _
" <td bgColor=""" & strPopUpTableColor & """ valign=""center"">" & vbNewLine & _
" <font face=""" & strDefaultFontFace & """ size="" & strDefaultFontSize & vbNewLine & _
" ><a href=""#"" onClick=""window.open('pop_upload_new.asp','Uploading','toolbar=no,location=no,directories=no,status=yes,menubar=no,scrollbars=yes,resizable=yes,width=800,height=330');""><acronym title=""Datei anhängen..."">" & getCurrentIcon(strIconPaperClip,"","") & "</acronym></a><acronym title=""Datei anhängen...""> <font face=""" & strDefaultFontFace """ size="" strDefaultFontSize """ color="" strDefaultFontColor """>Um eine Datei anzuhängen, bitte auf den Button klicken</font></acronym><font face=""" & strDefaultFontFace """ size="" strDefaultFontSize """ color="" strDefaultFontColor """><br /></font>" & vbNewLine & _
" </td>" & vbNewLine & _
"</tr>" & vbNewLine
end if
'##################################################################################
any help provided is greatly appreciated. |
|
|
gpctexas
Junior Member
320 Posts |
Posted - 31 March 2007 : 21:43:58
|
looks like you are missing some quotes with size= and after strDefaultFontSize
try this
" <font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ & vbNewLine & _
|
ipgate 2.4.4 RC3
http://www.gpctexas.net/ipgate_v244.zip |
Edited by - gpctexas on 31 March 2007 21:44:11 |
 |
|
|
buckfu
Starting Member
18 Posts |
Posted - 31 March 2007 : 22:39:58
|
thanks gpctexas,
updated that line of code, and I still error out in a few places:
ON POST.ASP
" <font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ & vbNewLine & _
-----------------------------------------------------------------------------------------------^
THE CODE FOR POST.ASP
strRqMethod = "EditTopic" or strRqMethod = "Topic" or strRqMethod = "TopicQuote" then
'################### proeder's File Attachment: Link to add #######################
if strAllowAttachment = 1 then
Response.Write "<tr>" & vbNewLine & _
"<td bgColor=""" & strPopUpTableColor & """> </td>" & vbNewLine & _
"<td bgColor=""" & strPopUpTableColor """ valign=""center"">" & vbNewLine & _
" <font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ & vbNewLine & _
" ><a href=""#"" onClick=""window.open('pop_upload_new.asp','Uploading','toolbar=no,location=no,directories=no,status=yes,menubar=no,scrollbars=yes,resizable=yes,width=800,height=330');""><acronym title=""Datei anhängen..."">" & getCurrentIcon(strIconPaperClip,"","") & "</acronym></a><acronym title=""Datei anhängen...""> <font face=""" & strDefaultFontFace """ size="" strDefaultFontSize """ color="" strDefaultFontColor """>Um eine Datei anzuhängen, bitte auf den Button klicken</font></acronym><font face=""" & strDefaultFontFace """ size="" strDefaultFontSize """ color="" strDefaultFontColor """><br /></font>" & vbNewLine & _
"</td>" & vbNewLine & _
"</tr>" & vbNewLine
end if
'##################################################################################
Response.Write " <tr>" & vbNewLine & _
also noted a bug on my admin_home.asp page:
Microsoft VBScript compilation error '800a0400'
Expected statement
/forum/admin_home.asp, line 132
" <LI><span class=""spnMessageText""><a href=""admin_config_members.asp"">Member Details Configuration</a></span></LI>" & vbNewLine & _
^
If I hit the new topic button I get a 500 error on the post.asp page. *shrug*  this is a little beyond me to debug, so any ideas are welcomed, if not oh well  |
Edited by - buckfu on 31 March 2007 22:51:23 |
|
|
|
gpctexas
Junior Member
320 Posts |
Posted - 31 March 2007 : 22:50:31
|
try a 4th quote near the end which would make an even number of quotes :)
" <font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """" & vbNewLine & _ |
ipgate 2.4.4 RC3
http://www.gpctexas.net/ipgate_v244.zip |
Edited by - gpctexas on 31 March 2007 22:51:02 |
|
|
|
buckfu
Starting Member
18 Posts |
Posted - 31 March 2007 : 22:54:59
|
thanks again,
edited my previous post to list the errors in other locations, after updating your last suggestion, I get this error on post.asp:
Expected end of statement
/forum/post.asp, line 1069
" ><a href=""#"" onClick=""window.open('pop_upload_new.asp','Uploading','toolbar=no,location=no,directories=no,status=yes,menubar=no,scrollbars=yes,resizable=yes,width=800,height=330');""><acronym title=""Datei anhängen..."">" & getCurrentIcon(strIconPaperClip,"","") & "</acronym></a><acronym title=""Datei anhängen...""> <font face=""" & strDefaultFontFace """ size="" strDefaultFontSize """ color="" strDefaultFontColor """>Um eine Datei anzuhängen, bitte auf den Button klicken</font></acronym><font face=""" & strDefaultFontFace """ size="" strDefaultFontSize """ color="" strDefaultFontColor """><br /></font>" & vbNewLine & _
-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------^
definitely appreciate the help to debug this, great community ya'll have here  |
|
|
|
gpctexas
Junior Member
320 Posts |
|
|
buckfu
Starting Member
18 Posts |
Posted - 31 March 2007 : 23:31:48
|
quote:
Originally posted by gpctexas
post a link to a text version of this file.
hey gpctx,
not sure what you meant, did you want a copy of the post.asp file?
http://buckfu.com/temp/post.txt |
|
|
|
gpctexas
Junior Member
320 Posts |
|
|
buckfu
Starting Member
18 Posts |
Posted - 31 March 2007 : 23:49:30
|
"moded" heh, what do you mean?
I've been adding a few mods, each one was working perfectly before beginning this mod. the mods I've added are:
complaints
antispmmer captcha
front page news
site integration
newsletter
Admin tools |
|
|
|
gpctexas
Junior Member
320 Posts |
|
|
buckfu
Starting Member
18 Posts |
Posted - 01 April 2007 : 00:16:34
|
thanks for the help gpctx, I think I'm gonna have to nix this one. I can't get it workin....
using the code snippet below (from the post you referenced) the post page at least loads, but I don't see an icon or any link to include an attachment.
'################### proeder's File Attachment: Link to add #######################
if strAllowAttachment = 1 then
Response.Write "<tr>" & vbNewLine & _
"<td bgColor=""" & strPopUpTableColor & """> </td>" & vbNewLine & _
"<td bgColor=""" & strPopUpTableColor & """ valign=""center"">" & vbNewLine & _
" <font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """>" & vbNewLine & _
" <a href=""#"" onClick=""window.open('pop_upload_new.asp','Uploading','toolbar=no,location=no,directories=no,status=yes,menubar=no,scrollbars=yes,resizable=yes,width=800,height=330');""><acronym title=""Attach File..."">" & getCurrentIcon(strIconPaperClip,"","") & "</acronym></a><acronym title=""Attach File...""> <font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strDefaultFontColor & """>To attach a file, click here.</font></acronym><font face=""" & strDefaultFontFace & """ size=""" & strDefaultFontSize & """ color=""" & strDefaultFontColor & """><br /></font>" & vbNewLine & _
"</td>" & vbNewLine & _
"</tr>" & vbNewLine
end if
'################################################################################## |
|
|
|
gpctexas
Junior Member
320 Posts |
Posted - 01 April 2007 : 03:04:43
|
| no errors = good, now I bet the error in the admin page is related to the mod. Fix it, you could turn the mod on. |
ipgate 2.4.4 RC3
http://www.gpctexas.net/ipgate_v244.zip |
|
|
|
PPSSWeb
Junior Member
312 Posts |
Posted - 03 April 2007 : 09:08:21
|
The error on your admin page is most likely due to a line near 132 and not in that line. I suspect that a line above it does not end in & _ thus requiring an Expected statement. you could add: Response.Write to the beginning of line 132 to find out. If this is the case, try adding those characters to the line that is the culprit.
Otherwise, if you can post the surrounding lines, or a text version of the file it we can help you find the problem.
|
|
|
|
buckfu
Starting Member
18 Posts |
Posted - 03 April 2007 : 10:54:30
|
thanks PSSweb,
I've moved on to finish other areas that are more urgent right now. When I have the time, I will resurrect this post and continue where I left off.
Thanks again for the help, I appreciate it, and will return to it when I can.
|
|
|
| |
Topic |
|
Topic Locked
