[firebase-br] FireBird com ADO  sem compontes
    mamsistemas em uol.com.br 
    mamsistemas em uol.com.br
       
    Qui Jun 26 19:53:28 -03 2008
    
    
  
Olá , estou iniciando do FireBird e usando o BDS 2006 .
Trabalhava antes com o VB,  fazia assim:
Private  cnn As New ADODB.Connection, rsconexao As ADODB.Recordset
 cnn.Provider = "Microsoft.Jet.OLEDB.4.0"
 cnn.ConnectionString = "\STKS\STKS.FDB"
cnn.Open (cnn.ConnectionString)
 If cnn.State <> 1 Then
      MsgBox "Não foi possível estabelecer comunicação e abrir banco de dado 
STKS.MDB"
 End If
 Set rsconexao = New ADODB.Recordset
 With rsconexao
     .CursorLocation = adUseClient
     .LockType = adLockPessimistic
     .CursorType = adOpenDynamic
     Sc = "Select * From PARAMETRO Where PARCHAVE = " & " """ & StrChave & 
""""
     .Source = Sc
     .ActiveConnection = cnn
     .Open
  End With
  rsconexao.ActiveConnection = Nothing
Sem necessidade de utlizar os componentes  DATASET , DATASOURCE e companhia.
Nao estou conseguindo achar nada semelhante no Delphi.
Alguem pode me ajudar.
Marlene Abi-Ali
    
    
Mais detalhes sobre a lista de discussão lista