jag vet inte varför jag får type mismatch med den här koden, nån som vet?

<!-- #include virtual="/include/dbconn.asp" -->
<%
strHost = Request.ServerVariables("REMOTE_HOST")
strAddress = Request.ServerVariables("REMOTE_ADDR")
nowDate = Now()
strReferer = Request.ServerVariables("HTTP_REFERER")

set objConn = connect()

set strSQL = objConn.Execute("select * from tblStats where Address = '" & strAddress & "'")
'set rsResults = objConn.Execute( strSQL )

If strSQL.eof Then
strSQL = "INSERT INTO tblStats"
strSQL = strSQL & "(Host, Address, countDate,Visits,Referer) "
strSQL = strSQL & "VALUES('"& strHost &"','"& strAddress &"','" & nowDate & "',1,'" & strReferer & "')"
objConn.Execute strSQL
else
update="UPDATE tblStats SET Visits=Visits + 1 WHERE Address='"&strAddress&"'"
objConn.Execute update
End If
%>

kan det möjligen vara denna set objConn = connect() som bråkar?
vad returnerar connect()?
är det inte enklare att ha
set objConn=... allt som krävs.. inne i funktionen connect, så att när den anropas så skapas/öppnas en anslutning

Om det är Access så vill den ha # runt datum, kolla även så att du inte använder dig av reserverade ord : Artikel [Reserverade ord i Access och SQL]

Din kod är sårbar för SQL injection attacker.