Notice: Undefined offset: 2 in /home2/icentarb/public_html/icentar/classes/class.permissions.php on line 735
Private Sub email_Click() Dim strAdresa As String Dim stDocName As String SetPrt (2) 'doPDF printer iz tablice Stampaci stDocName = "rptPonuda" DoCmd.OpenReport stDocName, acViewNormal If Not IsNull(Me.mailAdresa) Then strAdresa = Me.mailAdresa DoCmd.SendObject _ , _ , _ , _ strAdresa, _ , _