Update classic_asp_jwt_with_ad.asp

Changed 
For i = 0 To aKeys.Count-1 to 
For i = 0 To dAttributes.Count-1
to fix a bug that was causing the program to fail.
Merge pull request #7 from BeresfordHare/patch-1

Update classic_asp_jwt_with_ad.asp