Repository.XFRACAS.SerializeXMLObjectToByteArray: Difference between revisions
Jump to navigation
Jump to search
John Leavitt (talk | contribs) No edit summary |
John Leavitt (talk | contribs) No edit summary |
||
Line 28: | Line 28: | ||
Success = MyRepository.[[Repository.ConnectToRepository|ConnectToRepository]]("RepositoryFileNamePath") | Success = MyRepository.[[Repository.ConnectToRepository|ConnectToRepository]]("RepositoryFileNamePath") | ||
'{{APIComment|Define an serializable XML Object.}} | '{{APIComment|Define an serializable XML Object.}} | ||
{{APIPrefix|Dim}} xmlObject {{APIPrefix|As Object = {{APIPrefix|Nothing}} | {{APIPrefix|Dim}} xmlObject {{APIPrefix|As Object}}={{APIPrefix|Nothing}} | ||
{{APIComment|'populate the xmlObject with values to import}} | {{APIComment|'populate the xmlObject with values to import}} | ||
'{{APIComment|Define the byte array.}} | '{{APIComment|Define the byte array.}} |
Revision as of 22:35, 18 October 2013
An helper function to serialize XMLs for import into XFRACAS through a byte array
Method Syntax
SerializeXMLObjectToByteArray(
ByRef
pData()
As Byte
,
ByRef
pObject
As Object
)
As Integer
Uploads an import file for processing and returns the system ID of the uploaded
Parameters
pData A defined byte array to return the
pObject An serializable XML object.
Usage Example
' Declare a new repository connection class. Private WithEvents MyRepository As New Repository ' Connect to the desired Synthesis repository. Dim Success As Boolean = False Success = MyRepository.ConnectToRepository("RepositoryFileNamePath") ' Define an serializable XML Object. Dim xmlObject As Object=Nothing 'populate the xmlObject with values to import ' Define the byte array. Dim byteArray As Byte()=Nothing ' Serialize the xmlObject into the byteArray. Dim SerializeSuccess As Boolean SerializeSuccess = MyRepository.SerializeXMLObjectToByteArray(byteArray, xmlObject)
Reformatted Usage Example
Declare a new repository connection class.
Private WithEvents MyRepository As New Repository
Connect to the desired Synthesis repository.
Dim Success As Boolean = False Success = MyRepository.ConnectToRepository("RepositoryFileNamePath")
Define an serializable XML Object.
Dim xmlObject As Object = Nothing 'populate the xmlObject with values to import
Define the byte array.
Dim byteArray As Byte() = Nothing
Serialize the xmlObject into the byteArray.
Dim SerializeSuccess As Boolean SerializeSuccess = MyRepository.SerializeXMLObjectToByteArray(byteArray, xmlObject)