The reason for that is because VBScript didn't undertand adOpenKeyset constant, because you didn't reference ADO object library.

In your code 3 means adOpenKeyset, in other words, adOpenKeyset constant has a value of 3.
That's it.