[ EmirSuvalic @ 22.07.2011. 17:02 ] @
Dim adTables As AdditionalData Set adTables = Application.CreateAdditionalData adTables.Add "Parametar" Application.ExportXML _ ObjectType:=acExportTable, _ DataSource:="Zahtjev", _ DataTarget:="c:\POS\XML\stampatinefiskalnidokument.xml", _ AdditionalData:=adTables Application.TransformXML DataSource:="C:\c:\POS\XML\stampatinefiskalnidokument.xml" TransformSource:="c:\POS\XML\stampatinefiskalnidokument.xsd" OutputTarget:="C:\Tring\xml\stampatinefiskalnidokument.xml" WellFormatedXMLOutput:=FALSE Izbacuje syntax error Hvala unaprijed! |