That is because you need to use the backslash instead of the slash. I was thinking .. maybe you could simply call/put the WriteToFile stuff in the GetQuestion function. That should also work.
edit: and there is a typo in this line:
edit: and there is a typo in this line:
GetQuestion$(initquiestion$)