Página 1 de 1
Browse ADO nas LIBs - parece piada, mas não é
Enviado: 17 Jun 2024 09:36
por 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.
Browse ADO nas LIBs - parece piada, mas não é
Enviado: 17 Jun 2024 12:30
por 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