Notice: Undefined offset: 2 in /home2/icentarb/public_html/icentar/classes/class.permissions.php on line 735
Private Sub Command0_Click() Dim db As Database Dim rs As DAO.Recordset Set db = CurrentDb Set rs = db.OpenRecordset("tblFirma") Open "C:\RACUN.XML" For Output As 1 Dim Tekst As String Tekst = "" Print #1, Tekst Tekst = "" Print #1, Tekst Tekst = "" & "f81d4fae-7dec-11d0-a765-00a0c91e6bf6" & "" Print #1, Tekst Tekst = "" & Now() & "" Print #1, Tekst Tekst = "" Print #1, Tekst Tekst = "" Print #1, Tekst Tekst = "" & rs!OIB & "" Print #1, Tekst Tekst = "" & Now() & "" Print #1, Tekst Tekst = "" & rs!CompanyName & "" Print #1, Tekst Tekst = "" & rs!PostBroj & ", " & rs!M