Algunas veces es necesario bajar archivos almacenados en la carpeta Document de SalesForce, como alguno de ustedes saben, estos archivos son codificados a base64, después de investigar un rato veo que la manera mas fácil de hacerlo es la siguiente:

Dim qdoc As sforce.QueryResult
Dim document As sforce.Document
qdoc = sfdc.query(String.Format(“Select d.Body, d.BodyLength, d.Id, d.Name from Document d where id = ‘01530000000nu6K’ “))
Dim records() As sforce.sObject = qdoc.records
document = CType(records(0), sforce.Document)

Try
Dim file As FileStream = New FileStream(“d:\\temp\\test.txt”, FileMode.Create)
Dim sw As BinaryWriter = New BinaryWriter(file)
sw.Write(document.Body)
sw.Close()
Catch ex As Exception
MsgBox(ex.Message)
End Try

espero les sea de utilidad