R
redryderridesagain
I am using VBA and Microsoft Office 2003 Web Services Toolkit to query
our Confluence WIKI. Any assistance in diagnosing the above error
message below will be greatfully recieved.
Sub SoapSuds()
'
' 11/6/2008 5:14:54 PM - Bob Arnold
' this is wikidev
' http://wikidev.whacked.com:8280
' this is the production WIKI
' https://wiki.whacked.com/display/SRED/Home
'
Dim Stuff As New clsws_ConfluenceSoapService
Dim sStruct As struct_RemoteServerInfo
Dim one_toke As String
Dim spStruct() As IXMLDOMNodeList
Dim allPages() As struct_RemotePageSummary
Dim oneSpace As struct_RemoteSpaceGroup
one_toke = Stuff.wsm_login("X00019", "my_password")
Set sStruct = Stuff.wsm_getServerInfo(one_toke)
'MsgBox sStruct.baseUrl & vbCrLf & _
'vbCrLf & sStruct.buildId, , "Get Down, Get Down"
spStruct = Stuff.wsm_getSpaces(one_toke)
'
' 11/7/2008 5:29:05 PM - Bob Arnold
' 0 - remote space key = "id0"
' 4 - name of the space or page = "SRED"
' 5 - name of the space or page = "IT - SR & ED"
' 6 - "global" ???
' 7 - http://wikidev.whacked.com:8280//display/SRED
'MsgBox (spStruct(0).Item(6).Text)
allPages = Stuff.wsm_getPages(one_toke, "SRED")
MsgBox (allPages(0))
'Set oneSpace = Stuff.wsm_getSpace(one_toke, "SRED")
End Sub
The msg generated by "allPages = Stuff.wsm_getPages(one_toke, "SRED")
is
Generic Custom Type Mapper: Element id cannot be found in type
definition of RemotePageSummary
The definition of wsm_getPages is
Public Function wsm_getPages(ByVal str_in0 As String, ByVal str_in1 As
String) As Variant
'*****************************************************************
'Proxy function created from http://wikidev.whacked.com:8280/rpc/soap-axis/confluenceservice-v1?wsdl.
'
'"wsm_getPages" is an array with elements defined as
struct_RemotePageSummary
'See Complex Types: Arrays in Microsoft Office 2003 Web Services
Toolkit Help
'for details on implementing arrays.
'*****************************************************************
'Error Trap
On Error GoTo wsm_getPagesTrap
wsm_getPages = sc_ConfluenceSoapService.getPages(str_in0, str_in1)
Exit Function
wsm_getPagesTrap:
ConfluenceSoapServiceErrorHandler "wsm_getPages"
End Function
and the structure ...
Option Compare Database
'*****************************************************************
'This class was created by the Microsoft Office 2003 Web Services
Toolkit.
'
'Created: 11/5/2008 07:01:45 PM
'
'Description:
'This class is a Visual Basic for Applications class representation of
the user-defined
'type as defined by http://wikidev.whacked.com:8280/rpc/soap-axis/confluenceservice-v1?wsdl.
'
'This class only contains the RemotePageSummary,
'as defined in the WSDL.
'
'Changes to the code in this class may result in incorrect behavior.
'
'*****************************************************************
Public parentID As Double
our Confluence WIKI. Any assistance in diagnosing the above error
message below will be greatfully recieved.
Sub SoapSuds()
'
' 11/6/2008 5:14:54 PM - Bob Arnold
' this is wikidev
' http://wikidev.whacked.com:8280
' this is the production WIKI
' https://wiki.whacked.com/display/SRED/Home
'
Dim Stuff As New clsws_ConfluenceSoapService
Dim sStruct As struct_RemoteServerInfo
Dim one_toke As String
Dim spStruct() As IXMLDOMNodeList
Dim allPages() As struct_RemotePageSummary
Dim oneSpace As struct_RemoteSpaceGroup
one_toke = Stuff.wsm_login("X00019", "my_password")
Set sStruct = Stuff.wsm_getServerInfo(one_toke)
'MsgBox sStruct.baseUrl & vbCrLf & _
'vbCrLf & sStruct.buildId, , "Get Down, Get Down"
spStruct = Stuff.wsm_getSpaces(one_toke)
'
' 11/7/2008 5:29:05 PM - Bob Arnold
' 0 - remote space key = "id0"
' 4 - name of the space or page = "SRED"
' 5 - name of the space or page = "IT - SR & ED"
' 6 - "global" ???
' 7 - http://wikidev.whacked.com:8280//display/SRED
'MsgBox (spStruct(0).Item(6).Text)
allPages = Stuff.wsm_getPages(one_toke, "SRED")
MsgBox (allPages(0))
'Set oneSpace = Stuff.wsm_getSpace(one_toke, "SRED")
End Sub
The msg generated by "allPages = Stuff.wsm_getPages(one_toke, "SRED")
is
Generic Custom Type Mapper: Element id cannot be found in type
definition of RemotePageSummary
The definition of wsm_getPages is
Public Function wsm_getPages(ByVal str_in0 As String, ByVal str_in1 As
String) As Variant
'*****************************************************************
'Proxy function created from http://wikidev.whacked.com:8280/rpc/soap-axis/confluenceservice-v1?wsdl.
'
'"wsm_getPages" is an array with elements defined as
struct_RemotePageSummary
'See Complex Types: Arrays in Microsoft Office 2003 Web Services
Toolkit Help
'for details on implementing arrays.
'*****************************************************************
'Error Trap
On Error GoTo wsm_getPagesTrap
wsm_getPages = sc_ConfluenceSoapService.getPages(str_in0, str_in1)
Exit Function
wsm_getPagesTrap:
ConfluenceSoapServiceErrorHandler "wsm_getPages"
End Function
and the structure ...
Option Compare Database
'*****************************************************************
'This class was created by the Microsoft Office 2003 Web Services
Toolkit.
'
'Created: 11/5/2008 07:01:45 PM
'
'Description:
'This class is a Visual Basic for Applications class representation of
the user-defined
'type as defined by http://wikidev.whacked.com:8280/rpc/soap-axis/confluenceservice-v1?wsdl.
'
'This class only contains the RemotePageSummary,
'as defined in the WSDL.
'
'Changes to the code in this class may result in incorrect behavior.
'
'*****************************************************************
Public parentID As Double