Geraldo,
O SQL-DMO vem com o SQL Server (nas diversas versões do SQL Server)
Na verdade é um conjunto de DLL's que vem junto e que vc pode instalar nas estações com o Inno ou InstallShield, etc... juntamente com a instalação do seu aplicativo em cada estação.
Veja os exemplos que vem (em VB/C++) com o SQL Server de como usar SQL-DMO.

[ ], s
Peter

>Peter,
>
>
>Onde consigo o tal DMO ?
>
>
>>PCC,
>>Eu uso uma conexão ODBC como vc já sabe, e é somente uma conexão p/ cada estação com o servidor (podem ser mais se eu assim desejar).
>>
>>A conexão me permite usar o CA, mas eu uso a mesma conexão usando SPT para executar Stored Procedures no SQL Server no caso en que não desejo obter um retorno via CA.
>>(Eu defini que usaria CA p/ obtenção e manipulação de dados nos meus sistemas, e as demais formas como um meio de "controlar/gerenciar" o SQL Server, tudo conforme permissões para cada usuário)
>>
>>Eu tambem uso a mesma conexão ODBC p/ passar comandos ao SQL Server usando comandos DMO via VFP.
>>Com isto em casos onde o cliente usa o MSDE, eu posso Fazer backup no SQL Server via VFP entre outras coisas. O DMO permite que se controle de forma programatica o SLQ Server fazendo tudo que se faz com o Enterprise Manager.
>>
>>Gostaria de saber que tipos de informações vc deseja obter do SQL Server usando o Objeto Connection quando usa ADO.
>>
>>[ ],s
>>Peter
>>
>>
>>>o CA com ADO tem muitas limitações, pelo que vi nos exemplos do Peter, as fotos do NorthWind são tranquilamentes recuperadas com ODBC mas não com ADO.
>>>
>>>E eu hoje uso em meus CAs ADO, porque em alguns casos eu aproveito o Objecto conecction, command e pego alguas outras informações no banco.
>>>
>>>
>>>Mas ainda estou reconsiderando isto.
>>>
>>>
>>>
>>>
>>>>Valeu Peter.
>>>>
>>>>Funciou perfeitamente também.
>>>>
>>>>Respondi vc por e-mail.
>>>>
>>>>Abraços,
>>>>
>>>>Paulo
>>>>
>>>>>PCC,
>>>>>
>>>>>veja mensagem enviada ao seu e-mail com 2 exemplos de imagens p/ VFP 9.0 e VFP 8.0
>>>>>usando CA e DSN (são só exemplos)
>>>>>
>>>>>[ ],s
>>>>>Peter
>>>>>
>>>>>>Peter,
>>>>>>
>>>>>>Não consegui reproduzir o sucesso do teu codigo aqui com o meu VFP 9 beta. Mas vou verificar pois acho que estou errando em algo.
>>>>>>
>>>>>>Mas o Breno me deu um luz, ja que tenho que aplicar isto no VFP 8, e o objeto Image, não tem a propriedade

PictureVal

.
>>>>>>
>>>>>>Se vc tiver condições, tente retornar as fotos da tabela Employee, do banco NorthWind.
>>>>>>
>>>>>>Abraços
>>>>>>
>>>>>>Paulo
>>>>>>
>>>>>>
>>>>>>>Estive brincando com campos Blob no SQL Server para fins de teste, pois este tipo de campo no SQL Server armazenam o codigo binario das imagens.
>>>>>>>Usei como teste o Database Pubs e a tabela Pubs_info que tem um campo que contem o logotipo da empresa.
>>>>>>>Aqui tudo funciona perfeitamente.
>>>>>>>
>>>>>>>Usei um CA p/ os testes:
>>>>>>>segue dados basicos do CA p/ fazer funcionar:
>>>>>>>

>>>>>>>CursorSchema = PR_INFO M, PUB_ID C(4), LOGO W   && W = Campo tipo Blob no VFP 9.0
>>>>>>>MapBinary = .T.                                 && Somente p/ campo tipo Blob e VFP 9.0
>>>>>>>

>>>>>>>Codigo do evento Init:
>>>>>>>

>>>>>>>local llReturn
>>>>>>>do case
>>>>>>>	case not pemstatus(This, '__VFPSetup', 5)
>>>>>>>		This.AddProperty('__VFPSetup', 0)
>>>>>>>	case This.__VFPSetup = 2
>>>>>>>		This.__VFPSetup = 0
>>>>>>>		return
>>>>>>>endcase
>>>>>>>llReturn = dodefault()
>>>>>>>*** Select connection code: DO NOT REMOVE
>>>>>>>
>>>>>>>set multilocks on
>>>>>>>***<DataSource>
>>>>>>>This.DataSource = sqlstringconnect([dsn=Pubs;uid=xxx;pwd=xxx;trusted_connection=no;])
>>>>>>>***</DataSource>
>>>>>>>*** End of Select connection code: DO NOT REMOVE
>>>>>>>
>>>>>>>***<SelectCmd>
>>>>>>>text to This.SelectCmd noshow
>>>>>>>select * from pub_info
>>>>>>>endtext
>>>>>>>***</SelectCmd>
>>>>>>>if This.__VFPSetup = 1
>>>>>>>	This.__VFPSetup = 2
>>>>>>>endif
>>>>>>>return llReturn
>>>>>>>

>>>>>>>
>>>>>>>Metodo AutoOpen do CA:
>>>>>>>

>>>>>>>if not pemstatus(This, '__VFPSetup', 5)
>>>>>>>	This.AddProperty('__VFPSetup', 1)
>>>>>>>	This.Init()
>>>>>>>endif
>>>>>>>

>>>>>>>
>>>>>>>No form inseri um objeto tipo Image e o seguinte código no Activate p/ exibir a imagem:
>>>>>>>

>>>>>>>SELECT("caPubs_info")          && Seleciona o CA
>>>>>>>LOCAL x
>>>>>>>x = caPubs_info.LOGO
>>>>>>>THISFORM.Image1.PictureVal = x
>>>>>>>THISFORM.REFRESH
>>>>>>>

>>>>>>>
>>>>>>>Acho que isto te da o caminho das pedras p/ exibir uma imagem armazenada em um campo do SQL Server no VFP.
>>>>>>>(Foi um simples teste p/ ver se funciona e como funciona)
>>>>>>>
>>>>>>>[ ],s
>>>>>>>Peter
>>>>>>>
>>>>>>>>Estou tentando recuperar campos Image do SQL Server.
>>>>>>>>
>>>>>>>>Estou fazendo testes com a base de dados do NothWind, Tabela Employeess, campo Photo.
>>>>>>>>
>>>>>>>>Alguem poderia me dar uma ajuda nisto ?