Destroys XDocument from XStorage
Status:
Ready
Private Declare Function xdocument_destroy
Lib "xmllab_dll.dll"(ByVal DocObject As Long)
As Long
The following Microsoft® Visual Basic® example shows how remove XDocument from XStorage
Private Sub Delete_Click(Index As Integer)Dim DocObject As LongEnd Sub
Dim Result As Long
Dim XSTORAGE_STAT As String
XSTORAGE_STAT = String(255, " ")
Result = xstorage_status(XSTORAGE_STAT)
If Result = 0 Then
DocObject = loaded_documents.List(loaded_documents.ListIndex)
Result = xdocument_destroy (DocObject)
Call fill_loaded
Else
MsgBox "XStorage is not initialized or not loaded"
End If
Under development
Under development
|
Contact Us | | |
|
© 1997-2003 EDMGROUP (Australia) Pty Ltd. All rights reserved. |