, 22 2015 . 15:32
+
VBA Access...
-: TMeter sql server, ..., .
: "", " ", " ".
qryTotal "":
SELECT qryPackets.src_ip, qryPackets.bytes_recv, dbo_users.fio AS [user], dbo_users.tel AS phone, dbo_hosts.host_name
FROM qryPackets LEFT JOIN (dbo_users RIGHT JOIN dbo_hosts ON dbo_users.host_id = dbo_hosts.id) ON qryPackets.src_ip = dbo_hosts.ip
ORDER BY qryPackets.bytes_recv DESC;
( qryPackets src_ip:
SELECT dbo_packets.src_ip, Sum(dbo_packets.recv)/(1024*1024) AS bytes_recv
FROM dbo_packets
GROUP BY dbo_packets.src_ip
HAVING (((Sum(dbo_packets.recv))>0))
ORDER BY 2 DESC;
)
" ", , qryPackets :
WHERE (dbo_packets.ts Between Date() And Now())
( " " - , date now - ).
, , AfterUpdate :
Private Sub grpPeriod_AfterUpdate()
If grpPeriod = 1 Then
ElseIf grpPeriod = 2 Then
ElseIf grpPeriod = 3 Then
End If
End Sub
, - : qryPacketsForDates - qryPackets WHERE:
SELECT dbo_packets.src_ip, Sum(dbo_packets.recv)/(1024*1024) AS bytes_recv
FROM dbo_packets
WHERE (dbo_packets.ts Between Date1 And Date2) GROUP BY dbo_packets.src_ip
HAVING (((Sum(dbo_packets.recv))>0))
ORDER BY 2 DESC;
- - qryTotalForDates ( qryTotal , qryPacketsForDates )
RecordSource .
- , - ..., ???
http://www.sql.ru/forum/1162625/kak-luchshe-menyat-istochnik-dannyh-dlya-formy