Como escrinbir este codigo VB en Xailer o Xharbour
Publicado: Vie Nov 13, 2009 11:59 am
Vladimir,
en líneas generales sería algo así:
LOCAL objCom := CreateObject( "nsigad_export.CatlTransaction" )
objCom:SetPathApplication( pathApp )
objCom:SetRuc( strParam1 )
objCom:SetUsuario( strParam2 )
objCom:SetPassword( strParam3 )
objCom:SetCodigoEnvio( strParam4 )
objCom:Init_t()
objCom:SendFile( strParam5, strParam6, @t1, strXML )
i := t1
objCom:Final_t()
objCom := Nil
Saludos,
José Lalín