willunited Posted September 2, 2012 Author Share Posted September 2, 2012 i put this:> ' Prevent hacking> > If invNum < 1 Or invNum > MAX_INV Then Exit Sub> > If Item(GetPlayerInvItemNum(Index, invNum)).BindType = 1 Or Item(GetPlayerInvItemNum(Index, invNum)).BindType = 2 Then Exit Sub> > If GetPlayerInvItemNum(Index, invNum) < 1 Or GetPlayerInvItemNum(Index, invNum) > MAX_ITEMS Then Exit Sub> > If Item(GetPlayerInvItemNum(Index, invNum)).Type = ITEM_TYPE_CURRENCY Then> > If Amount < 1 Or Amount > GetPlayerInvItemValue(Index, invNum) Then Exit Sub> > End IfIn HandleMapDropItem.Im geting Subscript out of range,but idk why.Where is the error? Link to comment Share on other sites More sharing options...
Ruins of Hell Posted September 2, 2012 Share Posted September 2, 2012 Run it through VB6, tell us what line it highlights. Then go through each individual variable in the line and tell us what each of them say. Link to comment Share on other sites More sharing options...
willunited Posted September 2, 2012 Author Share Posted September 2, 2012 This one:> [background=rgb(247, 247, 247)] If Item(GetPlayerInvItemNum(Index, invNum)).BindType = 1 Or Item(GetPlayerInvItemNum(Index, invNum)).BindType = 2 Then Exit Sub[/background] Link to comment Share on other sites More sharing options...
Ruins of Hell Posted September 2, 2012 Share Posted September 2, 2012 Hover your cursor over different variables (index, wait. Then invNum, wait). It should come up with the values of the variables. Tell us what they are here. Link to comment Share on other sites More sharing options...
Boynaar44 Posted September 2, 2012 Share Posted September 2, 2012 Replace```If Item(GetPlayerInvItemNum(Index, invNum)).BindType = 1 Or Item(GetPlayerInvItemNum(Index, invNum)).BindType = 2 Then Exit Sub```under```If GetPlayerInvItemNum(Index, invNum) < 1 Or GetPlayerInvItemNum(Index, invNum) > MAX_ITEMS Then Exit Sub```That will fix it. And please next time use the code function for codes, not the quote function.![](http://img401.imageshack.us/img401/9445/codefunction.jpg) Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now