This is driving me crazy, I am by no means a pro at this, but I am trying to figure out why this error is popping up, please help, I feel like it is simple..

I am going to post the code and bold and underline the line that is throwing the error

Code:
sub addVariations(pOptionGroupDescrip, pOptionDescrip, pPriceToAdd, pPercentageToAdd, pIdProduct)

 dim rstemp, pIndex  
 
 if pOptionGroupDescrip<>""
...