Author |
Topic  |
|
andyjenkins
Junior Member
 
105 Posts |
|
Roland
Advanced Member
    
Netherlands
9335 Posts |
Posted - 13 February 2003 : 04:34:44
|
post a link to a TXT version of your inc_func_member.asp |
 |
|
andyjenkins
Junior Member
 
105 Posts |
Posted - 13 February 2003 : 05:09:43
|
Hi FrutZle,
Geez that was quick - I was going to do that and edit my post after - but your too quick mate ! .
I have problems getting some hosting for the file at the moment, but I've worked out what the problem is - just dont know how to resolve it properly. Its related to the following code in the in_func_member.asp file.quote: function getStar_Level(ByVal fM_ID, ByVal fM_LEVEL, ByVal fM_POSTS) dim strStarImage, intRank, strStar_Level dim intStarCount, strNewRankColor, arrRankLevels, arrRankColors dim intMaxStars, intBonusPosts, intBonusRank Rem -Set Maximum Number of Stars intMaxStars = clng(strMaxStars) strStar_Level = "" arrRankLevels = array(intRankLevel1,intRankLevel2,intRankLevel3,intRankLevel4,intRankLevel5) arrRankColors = array(strRankColor1,strRankColor2,strRankColor3,strRankColor4,strRankColor5) for intRank = 0 to 4 if (fM_POSTS < cint(arrRankLevels(intRank))) then exit for next
As you can see - its related to the fact that this specific user has reached the next ranking level - 500 posts in this case. I've altered the number of posts required for the next member level to 1000 - and suddenly all the posts are available again, and so is the rest of the thread - so the urgency is off for a bit now - but I would still like to get the 500 mark for the next member level back. Can you give me a clue from just the bit of code above ? If not - I will investigate further on getting some hosting for the file (I'm in work you see and can't access my ISPs webspace off-net).
Cheers ! Andy |

BTOpenworld ADSL Usergroup |
 |
|
Gremlin
General Help Moderator
    
New Zealand
7528 Posts |
Posted - 13 February 2003 : 05:54:49
|
If you can temporarily just put a Response.Write in there to see what the value is, it may help pin it down. Usually these errors are becuase the field your trying to convert to int is actuall null or empty
for intRank = 0 to 4
Response.Write arrRankLevels(intRank) & "<br>"
if (fM_POSTS < cint(arrRankLevels(intRank))) then exit for
next
You'll need to obviously reset the ranking level to
|
Kiwihosting.Net - The Forum Hosting Specialists
|
 |
|
andyjenkins
Junior Member
 
105 Posts |
Posted - 14 February 2003 : 18:42:42
|
Hi Gremlin,
I did this - and the following is then shown...
10 50 100 500 100000
Microsoft VBScript runtime error '800a0006'
Overflow: 'cint'
/v3/forum/inc_func_member.asp, line 118
So they all seem like integers to me. Any thoughts ? |

BTOpenworld ADSL Usergroup |
 |
|
GauravBhabu
Advanced Member
    
4288 Posts |
Posted - 14 February 2003 : 18:56:17
|
100000 is not an integer. Have you set it so in admin panel |
 |
|
andyjenkins
Junior Member
 
105 Posts |
Posted - 14 February 2003 : 20:38:50
|
Ya know what .... ya **** right there ! DOH !
Not sure if this is the problem though ... as the problem hit when a user got to 500 posts. Although I suppose if it is checking for number of posts between 500 and 100000 then the error would occur would'nt it ! I'll give it a crack |

BTOpenworld ADSL Usergroup |
 |
|
andyjenkins
Junior Member
 
105 Posts |
|
|
Topic  |
|