Eliminar documento en Sharepoint Portal Server 2001 desde .NET

Explicación
A continuación les paso un truco que encontre para como eliminar programaticamente un Documento publicado en Sharepoint Portal Server 2001 desde .NET, debido a esta necesidad busque y busque por internet pero no encontre nada , hasta que decidi indagar en el funcionamiento interno de Sharepoint Portal Server y encontré como realizar esta tarea.

Public Function BorrarDocumento(ByVal strEncodedUrl As String) As String
    'Creacion de objeto que servira de comunicacion con Sharepoint
     Dim  xmlhttp As New  MSXML2.XMLHTTP
    Try 
        xmlhttp.open("INVOKE", strEncodedUrl, False, "usuarioSharepoint", "claveSharepoint")
        xmlhttp.setRequestHeader("Content-Type", "text/xml") 

        xmlhttp.send("<?xml version=""1.0""?>" & _
        "<request><selector>tahoedelete</selector><parameters>" & _
        "param dt=""str""></param>" & _
        "param dt=""str"">OM Delete</param>" & _
        "param dt=""boolean"">1</param>" & _
        "</parameters></request>") 

        'Se verifica el Status = 207 que es cuando fue ejecutada la eliminacion satisfactoriamente
        If xmlhttp.status <> 207 Then 
            Throw New Exception("Borrado de Documento " + strEncodedUrl + "fallo.")
        End If
	Return ""
    Catch ex As Exception
        Return ex.Message
    End Try
End Function

Para esta tarea se debe de enviar el URL de forma codificada, como por ejemplo en vez de Espacio en Blanco se utiliza %20.

Librerias a referenciar para este proposito

MSXML2 que es "Microsoft XML, v2.6" lo cual es una referencia COM que se tiene que agregar al proyecto.

Conclusión

Este truco lo he publicado debido a que personalmente no encuentré ninguna información al respecto en la web y espero que a quien lo necesite le sea de utilidad.

 

---

Espacios de nombres usados en el código de este artículo:

System