Browse ADO nas LIBs - parece piada, mas não é

[JoséQuintas]

Então.....

o TBrowse do harbour aceita qualquer coisa....

HWGUI não tem opção pra ADO, mas BROWSE ARRAY resolve muito bem....

Já as outras LIBs, elas tem BROWSE com opção específica pra ADO, mas.... não funciona...

Parece piada, mas não é....
Só na LIB que não tem opção pra ADO, é onde o browse de ADO funciona.

[JoséQuintas]

Por exemplo, não sei se entendi bem pra que serve esse bookmark, mas minigui usa:

Código: Selecionar todos

      ::bKeyNo := {| n | iif( n == NIL, ::oRSet:AbsolutePosition, ::oRSet:AbsolutePosition := n ) }, ;
   ::bRecNo := {| n | iif( n == NIL, iif( ::oRSet:RecordCount() > 0, ::oRSet:BookMark, 0 ), ;
      iif( ::oRSet:RecordCount() > 0, ( ::oRSet:BookMark := n ), 0 ) ) }

Na página de exemplo da Microsoft, note que tem o teste se o recurso existe no recordset atual:

Código: Selecionar todos

    blnCanBkmrk = objRs.Supports(adBookmark)  
    If blnCanBkmrk = True Then  
        varBookmark = objRs.Bookmark   ' record the bookmark  
        objRs.MoveLast                 ' move to a different record  
        objRs.Bookmark = varBookmark   ' return to the bookmarked (sixth) record  
    End If  

Bom.... recordset tem um recurso parecido com DBF, que seria o AbolutePosition que no DBF é RecNo(), ou seria parecido com Array, o número sequencial....
Se você pode usar RecNo(), porque precisaria de um bookmark?

Pois é... não entendi
Talvez pra criar problema.... kkkk

https://learn.microsoft.com/en-us/sql/a ... rver-ver16