Question Confused With Apple GSX WSDL Usage...??

QuattroDave

New member
Joined
Aug 18, 2009
Messages
3
Programming Experience
1-3
Hiya Guys,

I've been working on this solidly for about 3 days but i'm really not understanding how its achieved... I'm trying to use a Web Reference in VB 2005, i've imported it sucessfully and the reference.vb has been created but i'm having a really hard time coding it as i cannot find any documentation.

Problem is i can authenticate ok but i don't appear to be able to get a responce back 'SessionID' & 'InstanceID' ??

Is there anything obvious i'm missing or doing wrong??

Many thanks in advance

Dave


Reference.vb (not all of it cos its big, just the bits i think you'll want to look at) :-
*******************************************
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "2.0.50727.3082"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.SoapTypeAttribute([Namespace]:="https://gsx.apple.com/GSXWS")> _
Partial Public Class SessionInfo

Private instanceIDField As String

Private sessionIDField As String

'''<remarks/>
<System.Xml.Serialization.SoapElementAttribute(IsNullable:=true)> _
Public Property instanceID() As String
Get
Return Me.instanceIDField
End Get
Set
Me.instanceIDField = value
End Set
End Property

'''<remarks/>
<System.Xml.Serialization.SoapElementAttribute(IsNullable:=true)> _
Public Property sessionID() As String
Get
Return Me.sessionIDField
End Get
Set
Me.sessionIDField = value
End Set
End Property
End Class
*******************************************
Public Function Authenticate(ByVal userName As String, ByVal password As String, ByVal accountNo As String, ByVal language As String, ByVal timeZone As String) As <System.Xml.Serialization.SoapElementAttribute("AuthenticateReturn")> SessionInfo
Dim results() As Object = Me.Invoke("Authenticate", New Object() {userName, password, accountNo, language, timeZone})
Return CType(results(0),SessionInfo)
End Function
*******************************************

My code just to learn / test :-

Public Class Form1

Private Sub APIURL_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles APIURL.Click
Dim MyGSXService As New com.apple.gsx_ut.GSXWS
Dim MySessionInfo As New com.apple.gsx_ut.SessionInfo
'Dim MySessID As String

MyGSXService.Authenticate("myusername", "mypassword", "123456", "EN", "GMT")

Console.WriteLine("Session = " & MySessionInfo.sessionID())
Console.WriteLine("Instance = " & MySessionInfo.instanceID())


End Sub
End Class
 
Back
Top