11. Juli 2013 11:03
service = New CrmService()
service.Url = "http://" + My.Settings.Server + "/MSCrmServices/2007/CrmService.asmx"
token = New CrmSdk.CrmAuthenticationToken()
token.OrganizationName = My.Settings.Organisation
token.AuthenticationType = 0
service.CrmAuthenticationTokenValue = token
service.UseDefaultCredentials = True
service.Credentials = System.Net.CredentialCache.DefaultCredentials
Dim request As RetrieveMultipleRequest = New RetrieveMultipleRequest
request.ReturnDynamicEntities = True
request.Query = Filter
response = CType(clsWebservice.service.Execute(request), RetrieveMultipleResponse)
11. Juli 2013 18:56
15. Juli 2013 08:31
discoveryService = New CrmDiscoveryService()
discoveryService.UseDefaultCredentials = True
discoveryService.Url = "http://" + My.Settings.Server + "/MSCRMServices/2007/AD/CrmDiscoveryService.asmx"
orgRequest = New RetrieveOrganizationsRequest()
orgResponse = discoveryService.Execute(orgRequest)