Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Syntax ADO in cursoradapter ( Date )
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 9 SP2
Miscellaneous
Thread ID:
01460787
Message ID:
01460797
Views:
38
Oh sorry marTina...!
IF compagny.lbobads = .T.
      *-- Toujours AC_
      THIS.cprogrammetoexport = "BOBLINKADSADT"
      THIS.ctabledbf = "AC_COMPAN.ADT"
      THIS.cDossierJn = "AC_"
      
      
   
    
    
    
      THIS.cConnectString = 'Provider=Advantage.OLEDB.1;' + ;
        'Data Source=' + THIS.gboblinkdir && + 'User ID=adssys;Password=""'
      *-----------------------------------------------------------------------
    ELSE
      * && Pour avoir 'BO' dans c:\Bob\BO\
      THIS.cDossierJn = THIS.cdossierbob
      THIS.cConnectString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+ ;
        THIS.gboblinkdir + ";Extended Properties=Paradox 7.x"
    ENDIF
it's OLEDB Paradox


thank in advance for interest...







>And value of oPrivatecParamCR.cconnectstring is?
>
>>Cursoradapter...
>>
>>
>>WITH oCA
>>
>>  .ADOCODEPAGE = 850
>>  .ADDPROPERTY( "oconnection" , CREATEOBJECT( "adodb.connection" ) )
>>  .oconnection.ConnectionString = oPrivatecParamCR.cconnectstring
>>  .oconnection.OPEN()
>>  .Setconnection ( .oconnection )
>>  *-- Foxpro n'accepte pas de chiffre ds un alias !
>>  .ALIAS 	= "Alias" + m.cFich && "boaccoun"
>>  .TABLES	= THIS.cDossierJn + UPPER( m.cFich ) && "boaccoun"
>>  .DATASOURCE.cursorlocation = 3
>>  .DATASOURCE.locktype= 3
>>  .BUFFERMODEOVERRIDE = 5
>>
>>
>>
>>
>>
>>
>>
>>>How is connecstring?
>>>
>>>MartinaJ
>>>
>>>>Hi martina,
>>>>
>>>>when i use your code
>>>>
>>>>TEXT TO .SELECTCMD NOSHOW TEXTMERGE PRETEXT 15
>>>>			SELECT HDBK, Hid , HDOCNO, HAMOUNT,  HDOCDATE ,CREATEDBY,
>>>>			Createdon , hremint   FROM <<.TABLES>>
>>>>			WHERE hdocdate > {d '2010-01-31'}
>>>>      ENDTEXT
>>>>
>>>>I have the error in attachment
>>>>
>>>>>Hi Bernhart,
>>>>>
>>>>>You try use escape sequence...
>>>>>
>>>>>...where hdocdate > {d '2010-01-31'}
>>>>>...where hdocdatetime > {ts '2010-01-31 12:13:14'}
>>>>>
>>>>>
>>>>>MartinaJ
>>>>>
>>>>>>Hi all,
>>>>>>
>>>>>>please see attachment.
>>>>>>
>>>>>>
>>>>>>...where hdocdate > {^2010-01-31}...
>>>>>>
>>>>>>
>>>>>>Fails..
>>>>>>
>>>>>>what 's the good command ?
>>>>>>
>>>>>>Thank in advance
>>>>>>
>>>>>>
>>>>>>bernhart
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform