Predmet:Re: Fiskalizacija u Hrvatskoj
Poušavam iz svoje baze napravirt xml fail.
Priloženi kod mi naptavi 'RAC.xml' fail, ali kod otvaranja istig javlja se greška:
The operation completed successfully. Error processing resource 'file:///C:/Prodaja/RAC.XML'. Line 1, Position 16
<tns:Zaglavlje>
PreuzmiIzvorni kôd (vbnet):Private Sub com_xml_Click()
Dim db As Database
Dim rs As Recordset
Set db = CurrentDb
Set rs = db.OpenRecordset("tblFirma")
'mySQL = "SELECT * FROM tblFirma"
'Set rs = db.OpenRecordset(mySQL)
Open "C:\Prodaja\RAC.XML" For Output As 1
Dim Tekst As String
Tekst = "<tns:Zaglavlje>"
Print #1, Tekst
Tekst = "<tns:IdPoruke>" & "f81d4fae-7dec-11d0-a765-00a0c91e6bf6" & "</tns:IdPoruke>"
Print #1, Tekst
Tekst = "<tns:DatumVrijeme>" & Now() & "</tns:DatumVrijeme>"
Print #1, Tekst
Tekst = "<tns:Zaglavlje>"
Print #1, Tekst
Tekst = "<tns:Racun>"
Print #1, Tekst
Tekst = "<tns:OIB>" & rs!OIB & "</tns:OIB>"
Print #1, Tekst
Tekst = "<tnsRacunZahtjev>" & Now() & "</tnsRacunZahtjev>"
Print #1, Tekst
Tekst = "<tnsFirma>" & rs!CompanyName & "</tnsFirma>"
Print #1, Tekst
Tekst = "<tnsNaselje>" & rs!PostBroj & ", " & rs!Mjesto & "</tnsNaselje>"
Print #1, Tekst
Close #1
End Sub
Pozdrav