What is CreditsCount? Try stepping through your code one line at
a time to find the offending line of code.

CStr:
VB Code:
  1. WritePrivateProfileString "settings", "credits", CStr(ammount), App.Path & "\userdata\" & email & ".ini"