表 Sph,按不同客户输出不同XML文件出错,求指教 Post By:2020/12/3 15:33:00 [只看该作者]
For Each c As String In DataTables("Sph").GetValues("客户") Dim ex As New Exporter ex.SourceTableName = "Sph" ex.filepath = "H:\" & c & ".XML" ex.format = "XML" ex.fields = "Xh,Spmc,Qyspbm,Spbm,Ggxh,Jldw,Sl,Dj,Je,Slv,Se,Syyhzcbz,Yhzcsm,Lslbz,Kce" ex.filter = "客户 = '" & c & " '" ex.export() Next