Microsoft SQL Server

[damianodec]

Qualcuno può darmi qualche esempio (se è possibile) di interrogazione tabelle con FWH e xharobur per Microsoft SQL server 8.0?

[Enrico Maria Giordano]

Devi cercare la stringa di connessione giusta (su www.connectionstrings.com) ed usare qualcosa del genere:

Code: Select all

#define adOpenForwardOnly 0
#define adOpenKeyset      1
#define adOpenDynamic     2
#define adOpenStatic      3

#define adLockReadOnly        1
#define adLockPessimistic     2
#define adLockOptimistic      3
#define adLockBatchOptimistic 4

#define adUseNone   1
#define adUseServer 2
#define adUseClient 3


FUNCTION MAIN()

    LOCAL oRs := CREATEOBJECT( "ADODB.Recordset" )

    oRs:Open( "SELECT * FROM Clienti ORDER BY Cliente", "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=clienti.mdb", adOpenForwardOnly, adLockReadOnly )

    WHILE !oRs:EOF
        ? oRs:Fields( "Cliente" ):Value
        oRs:MoveNext()
    ENDDO

    oRs:Close()

    RETURN NIL

EMG

[damianodec]

Sto provando l'esempio che mi hai segnalato, naturalmente tieni presente che sto riprendendo a ragionare in Fivewin dopo un pò di anni. La stringa che ricavo in quale riga la inserisco?

attualmente il programmino mi da quest'errore...

Error description: Error ADODB.Recordset/3 DISP_E_MEMBERNOTFOUND: OPEN

relativamente alla riga
oRs:Open( "SELECT * FROM Clienti ORDER BY Cliente", "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=clienti.mdb", adOpenForwardOnly, a

[Enrico Maria Giordano]

La stringa che ricavo in quale riga la inserisco?

Al secondo parametro del metodo Open().

EMG