Page 1 of 1

Microsoft SQL Server

Posted: Thu Jun 14, 2007 3:53 pm
by damianodec
Qualcuno può darmi qualche esempio (se è possibile) di interrogazione tabelle con FWH e xharobur per Microsoft SQL server 8.0?

Re: Microsoft SQL Server

Posted: Thu Jun 14, 2007 3:55 pm
by 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

Posted: Fri Jun 15, 2007 1:37 pm
by 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

Posted: Fri Jun 15, 2007 3:07 pm
by Enrico Maria Giordano
damianodec wrote:La stringa che ricavo in quale riga la inserisco?
Al secondo parametro del metodo Open().

EMG