I downloaded the Document Status Tool from the resource kit / Microsoft Web
Part Gallery at
www.microsoft.com/.../applications.asp
<www.microsoft.com/.../applications.asp>
then I tried running the vbs script as
<vbs file> <workspace name>
and instead of giving me what the readme says, which is
Creating Search Folders for Doc Status Web Part...
<?xml version="1.0"?><a:multistatus xmlns:a="DAV:">
<a:response><a:href>http://server/wksp/system/CheckedOutBy</a:href>
<a:status>HTTP/1.1 201 Created</a:status>
<a:propstat>
<a:status>HTTP/1.1 200 OK</a:status>
<a:prop><a:searchrequest/></a:prop></a:propstat></a:response></a:multistatus
>
<?xml version="1.0"?><a:multistatus xmlns:a="DAV:">
<a:response><a:href>http://server/wksp/system/CurrentApprovers</a:href>
<a:status>HTTP/1.1 201 Created</a:status>
<a:propstat><a:status>HTTP/1.1 200
OK</a:status><a:prop><a:searchrequest/>
</a:prop></a:propstat></a:response></a:multistatus>
Done
Instead it gives me two pages of HTML (not XML) that's basically a 400 or
405 HTTP errors of The Page cannot be displayed (as if you went to View
Source when you couldn't load a web page) inside of a dialog box.
I've tried it several times, as two different users (both are coordinators
of the workspace AND administrator of the box as the readme says is
required) and I even tried after a reboot. It always gives me this error.
I looked in the vbs code to see what part is giving it, and I'm sure it's
the result code from this block:
Set m_xh = CreateObject("Microsoft.XMLHTTP")
m_xh.Open "MKCOL", workspaceURL & "/System/CheckedOutBy", False ' False =
block until done
m_xh.SetRequestHeader "content-type", "text/xml"
m_xh.Send _
"<?xml version=""1.0""?>" & vbCRLF & _
"<a:propertyupdate xmlns:a=""DAV:"" >" & vbCRLF & _
" <a:set>" & vbCRLF & _
" <a:prop>" & vbCRLF & _
" <a:searchrequest> " & vbCRLF & _
" <a:sql>" & vbCRLF & _
" Select ""DAV:displayname""" & vbCRLF & _
" FROM Scope('deep traversal of" & vbCRLF & _
" ""/" & workspaceTarget & "/Documents""')" & vbCRLF
& _
" WHERE ""urn:schemas-microsoft-com:publishing:checkedoutby"" != ''" &
vbCRLF & _
" </a:sql>" & vbCRLF & _
" </a:searchrequest>" & vbCRLF & _
" </a:prop>" & vbCRLF & _
" </a:set>" & vbCRLF & _
"</a:propertyupdate>"
Report(m_xh.ResponseText)
'Response.Write m_xh.ResponseText
'Response.End
I went ahead and added the web part to my Document Library and it seems to
work fine. However, I'm worried that I didn't get what the readme said I'd
get.
Has any one else installed this web part and gotten what the readme said to
expect?
Do you know someone who can help? Share a link to this thread on twitter, or facebook.