<br />
<b>Notice</b>:  Undefined offset: 2 in <b>/home2/icentarb/public_html/icentar/classes/class.permissions.php</b> on line <b>735</b><br />
Function TotalX(Datum As Date)
Dim Db As Database
Dim Rs As Recordset
Dim SQl As String
Dim Nalog As Integer
Dim DatumStr As String

On Error Resume Next

Set Db = CurrentDb()
DatumStr = "#" & Format(Datum, "mm-dd-yyyy") & "#"
SQl = "SELECT sum([Prihod]