<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 />
rivate Sub cmdLinkTables_Click()
On Error GoTo Err_cmdLinkTables_Click
    
    DoCmd.RunCommand (acCmdSaveRecord)

    If Len(Nz(Me!txtDataFilePath, "")) > 0 Then
        If RefreshMDBLinks(Me!txtDataFilePath) Then
'        If LinkFromTables("DATA") Then
            MsgBox "Tabele su uspesno povezane!", vbInformation
'OVAJ RED SAM JA DODAO SAMO
  Forms![Trazi Materijal]![txtLink] = "Spojeni ste na bazu: " & Me.txtDataFilePath & vbTab & Me.Combo25.Column(0) & ".godine"
            Forms![Trazi Materijal].Requery
            DoCmd.Close
        Else
            MsgBox "Povezivanje tabela nije uspelo!", vbCritical
            
        End If

    End If
    
Exit_cmdLinkTables_Click:
    DoCmd.Hourglass False
   
    Exit Sub

Err_cmdLinkTables_Click: