It still didn't work.

i get the following error:

Class Definition READFLAG.CLASS is not found.

after the line of code:

oWhatever=createobject("ReadFlag.Class1")

the .dll is sitting in the same directory and everything and for some reason it doesn't find it.