>>>>If want to use Btriece dabases over the interenet
>>>> and planned to use ADO
>>>>
>>>> We access the databases from Visual Foxpro 5.0 / 6.0
>>>>
>>>> We have setup a DSN named "TEST2"
>>>> The ODBC driver is Pervasive ODBC 32
>>>> The ODBC connection is working fine but the ADO connection gives
>>>> some problems
>>>> See Example
>>>>
>>>> ************************************************************
>>>> *** Example
>>>> *** Setting up Connection
>>>> connectionstring = "DSN=testt2;uid=;pwd="
>>>> lConnection = CreateObject("adodb.connection")
>>>> lConnection.Open(connectionstring)
>>>>
>>>> *** If i did it using odbc
>>>> ** = SQLCONNECT(x,"test2")
>>>> ** = SQLEXEC(x,"Select * from debitr","Mycursor")
>>>> ** This is working fine
>>>>
>>>> *** Setting up RecordSet
>>>> RecordSet = CreateObject("adodb.recordset")
>>>> *** This one is working fine
>>>> lSql = "Select * from debitr"
>>>> Recordset.open(lSql,lConnection,1,2)
>>>> Recordset.movefirst
>>>> DO WHILE !RecordSet.eof
>>>> ? RecordSet.fields('debnr').value
>>>> RecordSet.movenext
>>>> ENDDO
>>>> Recordset.Close
>>>>
>>>> *** If i did it using odbc
>>>> ** = SQLCONNECT(x,"test2")
>>>> ** = SQLEXEC(x,"Select * from debitr","Mycursor")
>>>> ** This is working fine
>>>>
>>>> *** Setting up RecordSet
>>>> RecordSet = CreateObject("adodb.recordset")
>>>> *** This one is working fine
>>>> lSql = "Select MAX(debnr) AS debnr from debitr"
>>>> *** also tried 2,2 1,3 1,5 etc.
>>>> Recordset.open(lSql,lConnection,1,2)
>>>> Recordset.movefirst
>>>> DO WHILE !RecordSet.eof
>>>> ? RecordSet.fields('debnr').value
>>>> RecordSet.movenext
>>>> ENDDO
>>>> Recordset.Close
>>>> RETURN
>>>>
>>>> *** If i did it using odbc
>>>> ** = SQLCONNECT(x,"exact2")
>>>> ** = SQLEXEC(x,"Select MAX(debnr) as debnr from debitr","Mycursor")
>>>> ** This is working fine just one record with the higest number
>>>>
>>>> ****************************************************************
>>>>
>>>> So a standaard SQL stamement is working fine
>>>> But special SQL statement give some trouble
>>>> Ho can help me
>>>>
>>>> Kind regards
>>>>
>>>>
>>>> Jan Dorresteijn
>>>> Email jan@dorresteijn.nl
>>>
>>>Jan,
>>>which one is not working fine?
>>>Pete Kane
>>
>>Peter,
>>
>> RecordSet = CreateObject("adodb.recordset")
>> *** This one is not working fine
>> lSql = "Select MAX(debnr) AS debnr from debitr"
>> *** also tried 2,2 1,3 1,5 etc.
>> Recordset.open(lSql,lConnection,1,2)
>>
>>This one is not working
>>But if i use the sqlexec is working fine so the ODBC driver
>>can handle it
>>
>>jan,
>
>Jan,
>is the data of "Numeric" type?, if so ADO can't handle it, try converting it to "Double"
>Pete


Peter,

The datatype is a character.

Jan,