Sharepoint 2007/2010 UDF

[schoppet]

Hi,

based on the jquery-plugin spservices.codeplex.com I created an UDF to access the SOAP-Webservices of Sharepoint 2007/2010.

As of now it should cover all Webservices and should be working with 2007 and 2010.

Currently I have not much time to create a good documentation and example-scripts but nevertheless I wanted to share it with you.

Example of retrieving the content of a list

expandcollapse popup

#include "sharepoint.au3"
#include <_xmldomwrapper.au3>

Global $sWebUrl = 'http://url.of.sharepoint.site'
Global $sStatusList = 'Status'
Global $oStatus = ObjCreate('Scripting.Dictionary')

$oStatus = _GetStatus()
MsgBox(0, 'Sharepoint-Test', 'Number of Records: ' & $oStatus.Item(0))

For $i = 1 to $oStatus.Item(0)
MsgBox(0, 'Sharepoint-Test', 'Content of Title-Field in Record: ' & $i & ' - ' & $oStatus.Item($i).Item('ows_Title'))
Next

Func _GetStatus()
Local $oOptions

$oOptions = ObjCreate('Scripting.Dictionary')
$oOptions.Add('webURL', $sWebUrl)
$oOptions.Add('operation', 'GetListItems')
$oOptions.Add('CAMLQuery', "")
$oOptions.Add('listName', $sStatusList)
$oOptions.Add('CAMLViewFields', '')
$oOptions.Add('completefunc', '__PrepareStatus')
Return _SPServices($oOptions)
EndFunc


Func __PrepareStatus($sOrig)
Local $oRows
Local $oRow
Local $iCount
Local $aNames[1]
Local $aValues[1]
Local $sName
Local $sValue
Local $i
Local $j

$sOrig = _SPTransformOutput($sOrig)
_XMLLoadXML($sOrig)
$iCount = _XMLGetAttrib('/GetListItemsResponse/GetListItemsResult/listitems/data', 'ItemCount')
$oRows = ObjCreate('Scripting.Dictionary')
$oRows.Add(0, $iCount)

If 0 < $iCount Then

For $i = 0 To ($iCount - 1)
$oRow = ObjCreate('Scripting.Dictionary')
_XMLGetAllAttribIndex('/GetListItemsResponse/GetListItemsResult/listitems/data/row', $aNames, $aValues, '', $i)

For $j = 0 To UBound($aNames) - 1
$sName = $aNames[$j]
$sValue = $aValues[$j]
$oRow.Add($sName, $sValue)
Next

$oRows.Add($i + 1, $oRow)
Next

EndIf

Return $oRows
EndFunc

I hope it is useful for someone and please be patient if you have questions. I'll try to answer as fast as possible

Joerg

sharepoint.au3

Edited August 13, 2012 by schoppet

[DFWITGuy]

Thank you SO much for making this!

[ptrex]

@schoppet

How could I have missed this one !

This is freaking awsome !

Big library and quite complete as well.

But without documentation it takes a while to get started.

Could you poste an example how to upload a document to a library incl. meta data ?

Thanks for sharing !

Rgds

ptrex

[Yoshio]

Hi schoppet,

can you give me an example who to change an item using your sharepoint.udf?

For example I have a list with 2 colums (Name, Status). I now want to change the Status of the first list element to "tested". How can I do that? Can you post an example script?

Thanks a lot :-)

[Melba23]

Yoshio,

schoppet has not been back here since he posted the above so I am not sure you will get a response any time soon.

But you might find him on the German forum (http://www.autoit.de) - and looking at your e-mail the change of language should not be a problem.

M23

[Yoshio]

Thanks, Melba23