Skrevet den største værdi ud !
Hej Eksperter...Jeg har hårdt brug for hjælp...
Jeg er igang med at udvikle et statesik til min site...
Men mangler lige noget...
Jeg er ved at lave et pindediagram hvor scriptet ser således ud:
<%
For y = 1 to 6
NrRowPs=NrRowPs+1
For x = 1 to 7
intLoopDay = intLoopDay + 1
If intLoopDay >= intFirstDay Then
dtmCurDate = DateAdd("d", intLoopDay-intFirstDay, dtmFirstDate)
If Month(dtmCurDate) = Month(dtmFirstDate) Then
SQL = "SELECT count(*) as log_post_unik FROM nytabel2006_statastik_log_unikke WHERE Format(dato, 'mm-dd-yyyy')=#"& dtmCurDate &"#"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open SQL, Conn,1, 2
log_post_unik = rs("log_post_unik")
If dtmCurDate = dtmToday Then
Response.Write "<td height=100% valign=bottom>"
Response.Write "<table cellspacing=0 cellpadding=0 border=0>"
Response.Write "<tr>"
Response.Write "<td height=6><img src="&site_url&"/img/sta_top.gif border=0><br></td>"
Response.Write "</tr>"
Response.Write "<tr>"
Response.Write "<td height=40 align=center valign=bottom class=felt_stat style=background-image:URL("&site_url&"/img/sta_center.gif);> </td>"
Response.Write "</tr>"
Response.Write "<tr>"
Response.Write "<td height=14 align=center valign=bottom class=felt_stat style=padding-bottom:2px;color:#871F1F;>" & Day(dtmCurDate) & "<br>" & log_post_unik & "</td>"
Response.Write "</tr>"
Response.Write "</table>"
Response.Write "</td>"
Response.Write "<td><img src="&site_url&"/img/pix.gif border=0 height=1 width=3><br></td>"
Else
Response.Write "<td height=100% valign=bottom>"
Response.Write "<table cellspacing=0 cellpadding=0 border=0>"
Response.Write "<tr>"
Response.Write "<td height=6><img src="&site_url&"/img/sta_top.gif border=0><br></td>"
Response.Write "</tr>"
Response.Write "<tr>"
Response.Write "<td height=50 align=center valign=bottom class=felt_stat style=background-image:URL("&site_url&"/img/sta_center.gif);> </td>"
Response.Write "</tr>"
Response.Write "</tr>"
Response.Write "<tr>"
Response.Write "<td height=14 align=center valign=bottom class=felt_stat style=padding-bottom:2px;>" & Day(dtmCurDate) & "<br>" & log_post_unik & "</td>"
Response.Write "</tr>"
Response.Write "</table>"
Response.Write "<td><img src="&site_url&"/img/pix.gif border=0 height=1 width=3><br></td>"
End If
Else
blnLast = True
End If
Else
blnLast = True
End if
Next
Next
%>
Det virker også fint nok...
Og den finder også antal besøg på den pågældene dag via den SQL der er men jeg skal trække en database mere ud fra den hvor der er flest besøgene (poster i databasen på den pågældene dag) - Er der nogle der lige kunne knække den for mig...? :)
Syntes jeg har prøvet alt hvad jeg lige kunne finde på....!
