There is other stuff wrong but I notice this right off
the bat:
> sql  = "SELECT DocumentText FROM Document WHERE
> DocumentTitle
> ='Test2'"

Should be:
WHERE DocumentTitle=" & "'" & "Test2" & "'"

Also, not sure if Classic ADO works and you need to
play with what your storing the results in and how to
use it.