Notice: Undefined offset: 2 in /home2/icentarb/public_html/icentar/classes/class.permissions.php on line 735
Function PutanjaB()
Dim Db As Database
Dim Rs As Recordset
Dim Putanja As String
Set Db = CurrentDb
Set Rs = Db.OpenRecordset("SELECT database from MsysObjects WHERE Database<>Null")
If Rs.RecordCount > 0 Then