IF THEN i WriteLine

Jeg vil gerne skrive dette til en .asp fil men kan jeg ikke.
HJÆLP ønskes :)

f.WriteLine"<% IF LogStat>0 THEN %>" & vbCrLf
  f.WriteLine"<DIV>Du er logget ind</DIV>"
f.WriteLine"<% ELSE %>" & vbCrLf
  f.WriteLine"<DIV>Du er ikke logget ind</DIV>"
f.WriteLine"<% END IF %>" & vbCrLf


Fejlen jeg får er:
Microsoft VBScript compilation error '800a0409'

Unterminated string constant

f.WriteLine"<% IF LogStat>0 THEN