Mail : Microsoft VBScript Compilation Error '800a03ea'

My global.asa file looks like this

<script language=Vbscript RUNAT=server>

Sub Application_OnStart
application("ADOSqlConnection")="driver=SQL Server;Server=;uid=;pwd=;database="

application("ConnectString") = "driver=SQL Server;Server=;uid=;pwd=;database="

Sub Session_OnStart
Set Session("arrTo") = Server.CreateObject("Scripting.Dictionary")
Set Session("arrCC") = Server.CreateObject("Scripting.Dictionary")
Set Session("arrBCC") = Server.CreateObject("Scripting.Dictionary")
Set Session("arrFiles") = Server.CreateObject("Scripting.Dictionary")
Session("Count") = 0' to generate unique keys for the dictionaries
end sub

Sub Session_OnEnd

end sub

End Sub

</script>

I get this error

Microsoft VBScript compilation error '800a03ea'

Syntax error

/LM/W3SVC/542313792/Root/global.asa, line 8

Sub Session_OnStart