Jeg skal i mit administrationssystem lave et udtræk over de sidste 10 besøgende(IP nummer).
Det laver jeg ved: ----------------------------------------------------------------- i = 1 Set rs_last_10_visitors = Server.CreateObject("ADODB.RecordSet") rs_last_10_visitors.open "Select distinct IP from [Statistics] Where Site_Id = " & Site_Id , Conn,1,3 Do while not i = 10 AND NOT rs_last_10_visitors.EOF -----------------------------------------------------------------
Det virker fint!
Jeg vil gerne have bygget ind, at den sorterer dem efter feltet Stat_Date, og at jeg kan udskrive resten af felterne.
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
i = 1 Set rs_last_10_visitors = Server.CreateObject("ADODB.RecordSet") rs_last_10_visitors.open "Select distinct(IP), * from [Statistics] Where Site_Id = " & Site_Id & " ORDER BY Stat_Date", Conn,1,3 Do while not i = 10 AND NOT rs_last_10_visitors.EOF
i = 1 Set rs_last_10_visitors = Server.CreateObject("ADODB.RecordSet") rs_last_10_visitors.open "Select distinct IP from [Statistics] Where Site_Id = " & Site_Id & " order by stat_date" , Conn,1,3 Do while not i = 10 AND NOT rs_last_10_visitors.EOF
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
