Insira o comando <!-- #include file="count.asp" --> onde você vai que rer que o script rode.

<%

	sToday = month(date) & "/" & day(date) & "/" & year(date)
	'Fixed by Don
	dtYesterday =  DateAdd("d", -1, now)
	sYesterday = month(dtYesterday) & "/" & day(dtYesterday) & "/" & year(dtYesterday)
	
	OpenDB sConnStats

	'Total PageViews
	sSQL = "SELECT COUNT(StatID) AS Total FROM Stats"
	rs.Open sSQL,,,adCmdTable
	lPageViewsTotal = rs("Total")
	rs.close
	
	sSQL = "SELECT COUNT(StatID) AS Total FROM Stats WHERE Date = #" & sToday & "#"
	rs.Open sSQL,,,adCmdTable
	lPageViewsToday = rs("Total")
	rs.close

	sSQL = "SELECT COUNT(StatID) AS Total FROM Stats WHERE Date = #" & sYesterday & "#"
	rs.Open sSQL,,,adCmdTable
	lPageViewsYesterday = rs("Total")
	rs.close

	sSQL = "SELECT IP FROM Stats GROUP BY IP"
	rs.Open sSQL,,,adCmdTable
	lVisitorsTotal = rs.recordcount
	rs.close

	sSQL = "SELECT IP FROM Stats WHERE Date = #" & sToday & "# GROUP BY IP"
	rs.Open sSQL,,,adCmdTable
	lVisitorsToday = rs.recordcount
	rs.close

	sSQL = "SELECT IP FROM Stats WHERE Date = #" & sYesterday & "# GROUP BY IP"
	rs.Open sSQL,,,adCmdTable
	lVisitorsYesterday = rs.recordcount
	rs.close

	sSQL = "SELECT TOP 1 * FROM TopPageViewsPerDay"
	rs.Open sSQL,,,adCmdTable
   If Not Rs.eof Then
	   rs.MoveFirst
	   lTopViews = rs( "Total" )
	   sTopViewsDay = rs("Date")
	End If
	rs.close

	sSQL = "SELECT TOP 1 * FROM TopIpsPerDay"
	rs.Open sSQL,,,adCmdTable
	If Not Rs.Eof Then
	   rs.MoveFirst
	   lTopVisitors = rs( "Total" )
	   sTopVisitorsDay = rs("Date")
	End If
	rs.close

	sPageViewsToday = formatnumber(lPageViewsToday, 0)
	sPageViewsYesterday = formatnumber(lPageViewsYesterday, 0)
	sPageViewsTotal = formatnumber(lPageViewsTotal, 0)

	sVisitorsToday = formatnumber(lVisitorsToday, 0)
	sVisitorsYesterday = formatnumber(lVisitorsYesterday, 0)
	sVisitorsTotal = formatnumber(lVisitorsTotal, 0)

   sTopViews = formatnumber( lTopViews, 0 )
   sTopVisitors = formatnumber( lTopVisitors, 0 )
%>
<p class="title">Sumário</p>
<table border=0 cellspacing=1 bgcolor="#ffe4b5" width=300>
	<tr>
		<td></td>
		<td align=right class="smallerheader">Páginas visualizadas</td>
		<td align=right class="smallerheader">Visitantes</td>
	</tr>
	<tr bgcolor="#fdf5e6">
		<td><a href="relatar_caminhodd.asp?year=<%=Year(Now())%>&month=<%=Month(Now())%>&day=<%=Day(Now())%>">Hoje</a></td>
		<td align=right><%=sPageViewsToday%></td>
		<td align=right><%=sVisitorsToday%></td>
	</tr>
	<tr bgcolor="#fdf5e6">
		<%
			'Fixed by Don
		%>
		<td><a href="relatar_caminhodd.asp?year=<%=Year(dtYesterday)%>&month=<%=Month(dtYesterday)%>&day=<%=Day(dtYesterday)%>">Ontem</a></td>
		<td align=right><%=sPageViewsYesterday%></td>
		<td align=right><%=sVisitorsYesterday%></td>
	</tr>
	<tr bgcolor="#fdf5e6">
		<td>Tudo do dia</td>
		<td align=right><a href="relatar_caminhodd.asp?year=<%=Year(sTopViewsDay)%>&month=<%=Month(sTopViewsDay)%>&day=<%=Day(sTopViewsDay)%>"><%=sTopViews%> em (<%=sTopViewsDay%>)</a></td>
		<td align=right><a href="relatar_caminhodd.asp?year=<%=Year(sTopVisitorsDay)%>&month=<%=Month(sTopVisitorsDay)%>&day=<%=Day(sTopVisitorsDay)%>"><%=sTopVisitors%> em (<%=sTopVisitorsDay%>)</a></td>
	</tr>
	<tr>
		<td class="smallerheader">Total</td>
		<td align=right><%=sPageViewsTotal%></td>
		<td align=right><%=sVisitorsTotal%></td>
	</tr>
</table>
<!--#include file="calendar.asp"-->
<!--#include file="rodape.asp"-->