hvad er der galt her?

hejsa
jeg er ved at lave en counter der viser antal besøgende grafisk
men får den her fejl
Microsoft VBScript compilation error \'800a0401\'

Expected end of statement

/test/counter.asp, line 21

count = response.write \"<img src=\" & Mid(tmpHits,num,1) & \".gif>\"
-----------------------^

hele koden kommer her:

<%

    Set objFS = Server.CreateObject(\"Scripting.FileSystemObject\")
    strDir = Request.ServerVariables(\"SCRIPT_NAME\")
    strCountFile = Server.MapPath(Left(strDir, InStrRev(strDir,\"/\"))) & \"\\counter.txt\"

    \' On Error Resume Next
    Set objFile = objFS.OpenTextFile(strCountFile, 1, False)
    tmpHits = Trim(objFile.ReadLine)
kage = Request.Cookies(\"counter\")(\"cookie\")
if kage = \"\" then
    tmpHits = tmpHits + 1
    objFile.Close
    Set objFile = objFS.CreateTextFile(strCountFile, True)
    objFile.WriteLine(tmpHits)
    Set objFS = Nothing
   
    \' Her vises counteren 1 = Grafisk counter, 2 = Tekst counter
 
        For num = 1 To Len(tmpHits)
count = response.write \"<img src=\" & Mid(tmpHits,num,1) & \".gif>\"

Response.Cookies(\"counter\")(\"cookie\") = crap
Response.Cookies(\"counter\").expires = Now() + 1
Next
Else
objFile.Close
    Set objFile = objFS.CreateTextFile(strCountFile, True)
    objFile.WriteLine(tmpHits)
    Set objFS = Nothing
   
    \' Her vises counteren 1 = Grafisk counter, 2 = Tekst counter
      For num = 1 To Len(tmpHits)
count = response.write \"<img src=\" & Mid(tmpHits,num,1) & \".gif>\"

End If

%>

<html><head>
<title>Byg en counter med ASP</title>
</head><body>
<br><br><center>
<p>Counter :<br> <%=count %>></p>
</center>

</body></html>