How to Design XML Documents
Aug 27 2:51:29
Back online!
Jul 30 16:17:53
Response to "Knowledge Management 2.0"
Jul 18 2:45:52
Drupal Apps
Jun 3 7:17:00
Google Sites and the AJAX universe
May 21 1:18:39
This VBScript code allows you to query and post just about any information to SharePoint using web services. There are two steps involved:
Option Explicit
Dim xmlDoc, SOAPClient
' Get the root element object
Set SOAPClient = createobject("MSSOAP.SOAPClient")
SOAPClient.mssoapinit "http://sharepoint/_vti_bin/Views.asmx?WSDL"
Set xmlDoc = SOAPClient.web-service-name(param1, param2, ...)
DisplayNode xmlDoc
(Note that DisplayNode is a VBScript Sub to pretty-print the XML result of the query.)
As an example, we're going to use two web services to determine a View ID and then get the details of that view:
get-view-list.vbs
Dim xmlDoc, SOAPClient
' Get the root element object
Set SOAPClient = createobject("MSSOAP.SOAPClient")
SOAPClient.mssoapinit "http://sharepoint/_vti_bin/Views.asmx?WSDL"
Set xmlDoc = SOAPClient.GetViewCollection("Calendar")
DisplayNode xmlDoc
get-view.vbs
Dim xmlDoc, SOAPClient
' Get the root element object
Set SOAPClient = createobject("MSSOAP.SOAPClient")
SOAPClient.mssoapinit "http://sharepoint/_vti_bin/Views.asmx?WSDL"
Set xmlDoc = SOAPClient.GetView("Calendar", _
"{4D42A55C-E166-42CE-B339-FD7895F690BD}")
DisplayNode xmlDoc