Count på Unikke IP Adresser i Db?

select cast(convert(nvarchar(10), DateField, 112) as datetime) as TheDate, HostAddress, Count(*) as UniqueCount
from LogTabel
group by cast(convert(nvarchar(10), DateField, 112) as datetime), HostAddress

Det skulle være et svar :-)

jeg fatter ikke lige helt hvordan dit eksempel hænger sammen

:-(

Er det count pr. dag?

Det skulle være:

select cast(convert(nvarchar(10), DateField, 112) as datetime) as TheDate, Count(HostAddress) as UniqueIPCount
from LogTabel
group by cast(convert(nvarchar(10), DateField, 112) as datetime)

vil du ikke lige forklare lidt?

:-)

Sorry:

select cast(convert(nvarchar(10), DateField, 112) as datetime) as TheDate, Count(distinct HostAddress) as UniqueIPCount
from LogTabel
group by cast(convert(nvarchar(10), DateField, 112) as datetime)

det første felt i select er datoen renset for tid. andet felt er antal unikke hostaddress

Der grupperes for datoen renset for tid.

Dette vil give dit ønskede resultat

min tabel ser således ud:

ID,
Log (bit),
HostAddress,
DateAdded

select cast(convert(nvarchar(10), DateAdded, 112) as datetime) as AddedDate, count(distinct HostAddress)
from LogTabel
group by cast(convert(nvarchar(10), DateAdded, 112) as datetime)

Prøv den SQL af i query analyzer og sammenlign med faktiske data.

Virker... i query analyzer

Men i min label viser den 0, hehe...

Hvad sker der.... den viser 0 ?!?!?

Min count metode, skulle da være rigeligt til at vise det i en form

Dim Result As Integer = 0
                Result = CType(oCommand.ExecuteScalar(), Integer)

                Return Result

hvad skal jeg gøre for at få det rigtige output?

Du skal ikke bruge ExecuteScalar, da der returneres et dataset.

dim Result as Integer = 0
dim rs as SqlDataReader
rs = oCommand.ExecuteReader()
Result = CType(rs("DistinctCount"), Integer)
return Result


Dette kræver, at ændrer SQL til:

select cast(convert(nvarchar(10), DateAdded, 112) as datetime) as AddedDate, count(distinct HostAddress) as DistinctCount
from LogTabel
group by cast(convert(nvarchar(10), DateAdded, 112) as datetime)

den viste kode er ikke testet - skrevet OTOMH

Invalid attempt to read when no data is present.

:-(

Prøv at ændre din sql:

select count(distinct HostAddress), cast(convert(nvarchar(10), DateAdded, 112) as datetime) as AddedDate
from LogTabel
group by cast(convert(nvarchar(10), DateAdded, 112) as datetime)

Din kode ændrer du til ExecuteScalar() indstillingen.

Ifølge MSDN returneres det første felt i den første række af ExecuteScalar().

output i Query Analyser virker som det skal, men output i browser er 1 uanset hvad...

Prøv at poste hele koden.

Public Function CountUniqueHostAddressPrDay() As String
            Dim oConnection As New SqlConnection(DB("Telelet"))
            Dim oCommand As New SqlCommand
            Dim Result As String
            Try
                oConnection.Open()
                With oCommand
                    .CommandText = "Test"
                    .CommandType = CommandType.StoredProcedure
                    .Connection = oConnection
                    Result = CType(.ExecuteScalar(), String)
                End With

                Return Result
            Catch ex As Exception
                LogErrorEvent(ex.ToString)
                Throw ex
            End Try
        End Function

Og dit script til oprettelse af proceduren Test

vent vent.... det virker!

Outputtet er rigtigt nu.

Den tæller dem alle, nu skal jeg bare have lavet en dropdownliste med dato.

Så når jeg vælger en dato, så skal den vise antal unikke hits.

Hvordan fylder man en dropliste hvor datoen kun står 1 gang?

Du skal bruge en SQL:

select distinct cast(convert(nvarchar(10), DateAdded, 112) as datetime) as AddedDate
from LogTabel
order by cast(convert(nvarchar(10), DateAdded, 112) as datetime)

Du kan evt. sætte desc efter cast-delen i order by.

Hvordan du fylder drop down listen er mere et spørgsmål til VB.NET gruppen.

Er det ASP.Net, du arbejder i? Hvis så, så sørg for at bruge Ctrl-F5 til at genopfriske browser-vinduet, når du skal teste. F5 er ikke altid nok til at gennemtvinge ændringer i bagved liggende kode.

Okay..

Tak for hjælpen.

Jeg ved nu godt hvordan man fylder en dropliste, men man kan jo ikke ligefrem lave en DISTICNT i SQL'en på de datoer pga der er klokkeslet bagved
28-08-2003 09:29:30

Så skal jeg fjerne tiden og smide den i et seperat felt eller hvad?

:-)

hvad var den her til sagde du?

select distinct cast(convert(nvarchar(10), DateAdded, 112) as datetime) as AddedDate
from LogTabel
order by cast(convert(nvarchar(10), DateAdded, 112) as datetime)

Du kan evt. sætte desc efter cast-delen i order by.???

Brug den SQL, jeg smed i svaret af 28/08-2003 11:11:54. Den sørger for at rense dato-feltet for tidsinformation (returnerer datoen med tom tid (00:00:00.000))

ja

hvis jeg bruger den SQL Fra svaret af 28/08-2003 11:11:54

så får jeg følgende fejl: "Object reference not set to an instance of an object. "

Den fejlmeddelelse er var VB.NET

Du har en fejl i din VB.NET Kode.

den virker altså ikke den SQL der fra svaret af 28/08-2003 11:11:54...

Nu har jeg lavet min tabel så den indeholder et DateAdded og TimeAdded felter

Så i DateAdded ser dataene således ud: 09-09-2003

Så kan jeg lave en DISTINCT i min droplist SQL, men nu er outputtet kun 1???

:-(

Dammmmmmm

Gider du køre den sql af 28/08-2003 11:11:54 i Query Analyzer og se på resultatet?

Til denne SQL:

select distinct cast(convert(nvarchar(10), DateAdded, 112) as datetime) as AddedDate
from tblLog
order by cast(convert(nvarchar(10), DateAdded, 112) as datetime)

er outputtet i Analyzer datoene

Så virker SQL'en også.

Problemet ligger i kommunikationen med VB.NET.

hmmmmm

min metode ser således ud:

Public Function CountUniqueHostAddressPrDay(ByVal day As String) As String
            Dim oConnection As New SqlConnection(DB("Telelet"))
            Dim oCommand As New SqlCommand
            Dim Result As String
            Try
                oConnection.Open()
                With oCommand
                    .CommandText = "Test"
                    .CommandType = CommandType.StoredProcedure
                    .Connection = oConnection
                    .Parameters.Add("@Day", day)
                    Result = CType(.ExecuteScalar(), String)
                End With

                Return Result
            Catch ex As Exception
                LogErrorEvent(ex.ToString)
                'StatusMail(ex.ToString)
                Throw ex
            Finally
                If Not oConnection Is Nothing Then
                    If oConnection.State <> ConnectionState.Closed Then
                        oConnection.Close()
                    End If
                    oConnection.Dispose()
                    oConnection = Nothing
                End If
            End Try
        End Function

den tager parametren day, som er den der bliver valgt fra droplisten...

og SQL ser sådan ud:

CREATE PROCEDURE dbo.Test
(@day varchar)
AS

select distinct cast(convert(nvarchar(10), DateAdded, 112) as datetime) as AddedDate
from tblLog
order by cast(convert(nvarchar(10), DateAdded, 112) as datetime)
GO

hehe måske det hjælper med en WHERE Clause

CREATE PROCEDURE dbo.Test
(@day varchar)
AS

select distinct cast(convert(nvarchar(10), DateAdded, 112) as datetime) as AddedDate
from tblLog
WHERE @day = DateAdded
order by cast(convert(nvarchar(10), DateAdded, 112) as datetime)
GO

Syntax error converting datetime from character string.

Du roder nogle ting sammen.

Der er en procedure, som returnerer det unikke antal IP-adresser per dag. Den her et udseende.

Der er en procedure/sql script, som returnerer de unikke dage til brug i en drop-list. Den har et andet udseende:

Returnering af IP-count per dag med dato som parameter:

<SQL>
create procedure dbo.Test (@day datetime)
as
select count(distinct HostAddress)
from LogTabel
where cast(convert(nvarchar(10), DateAdded, 112) as datetime) = @day
</SQL>

Returnering af unikke datoer til drop-list (dataset)
<SQL>
create procedure dbo.TestDatoer
as
select distinct cast(convert(nvarchar(10), DateAdded, 112) as datetime) as AddedDate
from tblLog
order by cast(convert(nvarchar(10), DateAdded, 112) as datetime)
</SQL>

droplisten skal du udfylde via den dbo.TestDatoer.

I din funktion CountUniqueHostAddressPrDay skal du bruge dbo.Test.

Desuden bør du sørge for at arbejde med DateTime variabler i stedet for strings.

Spørgsmålet her er, om SQL Statements virker. Hvordan du bruger det returnerede i VB.Net hører IMHO hjemme i den kategori.

Kom du frem til noget?

skulle lige have noget frokost... :-)

skal jeg lade være med at ændre i min tabel så og lade DateAdded være som den er?

Returnering af unikke datoer til drop-list

DataBinder.Eval: 'System.Data.Common.DbDataRecord' does not contain a property with the name DateAdded.

Omkring returnering af unikke datoer, så hedder datofeltet i det returnerede recordset også AddedDate

Der er ingen grund til at have dato og tid splittet op i to forskellige felter.

fejlen ligger her i så ikke:

create procedure dbo.TestDatoer
as
select distinct cast(convert(nvarchar(10), DateAdded, 112) as datetime) as AddedDate
from tblLog
order by cast(convert(nvarchar(10), DateAdded, 112) as datetime)

jeg binder mine data til listen således:

Dim obj As New Library.Util
            With ddlDays
                .DataSource = obj.FillDropListWithDays
                .DataTextField = "DateAdded"
                .DataValueField = "DateAdded"
                .DataBind()
            End With

jeg har lavet det med dato og tid i samme felt igen...ligesom før.

.DataTextField = "AddedDate"
.DataValueField = "AddedDate"

det hjalp....... nu er der ihvertfald noget output

øv øv øv, men den tæller ikke korrekt i browseren.....

prøver lige i Q. Analyseren

det virker nu!!!!!

Mange mange tak for din tid Benny.

:-)

100 points for you.

Ha en fortsat god dag.

Mvh

DK

I lige måde... Og tak for points.