Todo el mundo apunta a que el error es en la consulta al hacer el Cint. Para saber si de verdad se trata de esto has que te imprima por pantalla la resolución de la consulta de la siguiente forma:
<pre>
strSQL = "SELECT Cint(fechainicio) as Teteo FROM Actividades WHERE Activo=True"
Response.Write(strSQL)
</pre>
Luego copias la línea que te imprime y la ejecutas en un programa del tipo a WinSQL.
Si el error está en la consulta, el mismo WinSQL te dirá cuál es el error.
Por lo menos así descartarás líneas de tu código
;)
Suerte!
<div align="left">
<img src="http://www.sfn.saskatoon.sk.ca/~ad676/moon/img/kissy.gif" border="0">
</div>