Доступ к веб-сервису sharepoint из ASP

Question

Я хочу получить доступ к веб-сервису списка sharepoint с классической страницы ASP. Я создаю формат soap xml и пытаюсь вызвать URL-адрес веб-службы, например

Dim http ,soap

soap = "<?xml version='1.0' encoding='utf-8'?>"
soap =soap & "<soap12:Envelope xmlns:xsi='http://www.w3.org/2001/XMLSchema-instance' xmlns:xsd='http://www.w3.org/2001/XMLSchema' xmlns:soap12='http://www.w3.org/2003/05/soap-envelope'>"
soap =soap & "<soap12:Body>"
soap =soap & "<GetListItems xmlns='http://schemas.microsoft.com/sharepoint/soap/'>"
soap =soap & "<listName>Posts</listName>"
soap =soap & "<viewName></viewName>"
soap =soap & "<query></query>"
soap =soap & "<ViewFields><FieldRef Name='Title' /><FieldRef Name='Modified'/><FieldRef Name='DefaultViewUrl'/><FieldRef Name='ID'/><FieldRef Name='Author'/><FieldRef Name='Name'/><FieldRef Name='Body'/><FieldRef Name='NumComments'/><FieldRef Name='DefaultViewUrl'/></ViewFields>"
soap =soap & "<rowLimit>5</rowLimit>"
soap =soap & "<QueryOptions><IncludeMandatoryColumns>FALSE</IncludeMandatoryColumns><DateInUtc>FALSE</DateInUtc></QueryOptions>"
soap =soap & "</GetListItems>"
soap =soap & "</soap12:Body>"
soap =soap & "</soap12:Envelope>"

Set http = CreateObject("MSXML2.XMLHTTP")
http.Open "POST", URL, False
http.setRequestHeader "Content-Type", "application/soap+xml;  charset=utf-8"
http.send(soap)

Но я получаю сообщение об ошибке типа «Произошла ошибка на сервере при обработке URL. Пожалуйста, свяжитесь с системным администратором. Если вы системный администратор ... "

Нужно ли проходить какую-либо аутентификацию или проблема в другом?

Answer 1

Если вы не находитесь на сайте SharePoint, проблема в том, что вы получаете отказ в доступе.SharePoint ожидает, что cookie или авторизация NTLM сделают это.

Можете ли вы передать еще немного?

Международная консалтинговая группа Дэвида Стерлинга Стерлинга davidmsterling.blogspot.com www.sharepoint-blog.com