Author |
Topic  |
zakazn
New Member

58 Posts |
Posted - 24 February 2010 : 12:22:23
|
I am setting up a new forum and all was going well, until I tried to add a post or reply/edit a post. I am getting these errors - any ideas?
When trying to edit a post I got this error:-
Microsoft VBScript runtime error '800a000d'
Type mismatch
/forum/inc_func_posting.asp, line 89
And when trying to reply to a post I am getting this error:-
Microsoft VBScript runtime error '800a000d'
Type mismatch
/forum/post_info.asp, line 1022 |
|
AnonJr
Moderator
    
United States
5768 Posts |
Posted - 24 February 2010 : 12:41:02
|
Are you using a fresh download of 3.4.07 or have you made changes (other than what is required in config.asp)? |
 |
|
ruirib
Snitz Forums Admin
    
Portugal
26364 Posts |
|
zakazn
New Member

58 Posts |
Posted - 24 February 2010 : 12:53:03
|
It's a fresh download of 3.4.07 and I have only made changes to config.asp as required. I'm using a MySQL database.
It set up OK and I made some changes in Admin Options, like change colour header image etc., then I tried posting and this is when the errors started. |
 |
|
ruirib
Snitz Forums Admin
    
Portugal
26364 Posts |
|
zakazn
New Member

58 Posts |
Posted - 24 February 2010 : 13:26:33
|
It's 5.0.37 Community edition Running in Windows Server 2003 and IIS 6
Hope that helps. |
 |
|
ruirib
Snitz Forums Admin
    
Portugal
26364 Posts |
|
ruirib
Snitz Forums Admin
    
Portugal
26364 Posts |
|
zakazn
New Member

58 Posts |
Posted - 24 February 2010 : 13:33:09
|
strConnString = "driver={MySQL ODBC 3.51 Driver};option=16387;server=SERVER;user=bromley;password=PASSWORD;DATABASE=DB;" '## MySQL w/ MyODBC v3.51 |
 |
|
zakazn
New Member

58 Posts |
Posted - 24 February 2010 : 13:36:42
|
This is from the post_info.asp page
lines 1016 - 1025 (states error at line 1022)
if txtMessage = " " then Go_Result "You must post a message!", 0 Response.End end if
if strSignatures = "1" and strDSignatures <> "1" then if Request.Form("sig") = "yes" and GetSig(strDBNTUserName) <> " " then txtMessage = txtMessage & vbNewline & vbNewline & ChkString(GetSig(strDBNTUserName), "signature" ) end if end if
AND this is from the inc_func_posting.asp page - lines 84 - 95 (states error at line 89)
<% end if end function
function CleanCode(fString) if fString = "" or IsNull(fstring) then fString = " " else '## left for compatibility with older versions of the forum fString = replace(fString, "<BLOCKQUOTE id=quote><font size=" & strFooterFontSize & " face=""" & strDefaultFontFace & """ id=quote>quote:<hr height=1 noshade id=quote>","quote: ", 1, -1, 1) fString = replace(fString, "<hr height=1 noshade id=quote></BLOCKQUOTE id=quote></font id=quote><font face=""" & strDefaultFontFace & """ size=" & strDefaultFontSize & " id=quote>","
", 1, -1, 1) '##
|
 |
|
ruirib
Snitz Forums Admin
    
Portugal
26364 Posts |
|
zakazn
New Member

58 Posts |
Posted - 24 February 2010 : 13:40:14
|
These are the two lines:-
if Request.Form("sig") = "yes" and GetSig(strDBNTUserName) <> " " then
if fString = "" or IsNull(fstring) then |
 |
|
ruirib
Snitz Forums Admin
    
Portugal
26364 Posts |
|
zakazn
New Member

58 Posts |
Posted - 24 February 2010 : 13:46:48
|
Yes, the inc_func_member.asp is present and intact, I have reuploaded it - still getting the same errors. |
 |
|
ruirib
Snitz Forums Admin
    
Portugal
26364 Posts |
|
zakazn
New Member

58 Posts |
Posted - 24 February 2010 : 13:57:03
|
Allow Signatures: On: Allow Dynamic Signatures: Off:
I know, it's puzzling me too. If it was a forum that I had 'messed' with then I could understand it, but as I only uploaded it all this afternoon and haven't added any MODs, it does seem odd. |
 |
|
Topic  |
|