FiveTech Software tech support forums

Hello ,

Trying to use tTimePick with oTime:nStyle := NOR( oTime:nStyle, DTS_SHOWNONE )

tTime := nil@ 30 , 50 TMPicker oTime VAR tTime OF oDlg PIXEL SIZE 60,12;          VALID (MsgInfo(tTime) , .T.)oTime:nStyle := NOR( oTime:nStyle, DTS_TIMEFORMAT&#41 ...

Hello ,

Testing ADO oRs:Field := cExpression

I found some difficulties :

oRS.FILTER := "FIRST='Jon' OR (Married=0 AND LAST LIKE 'D*')"// Accepted
oRS.FILTER := FIRST='Jon' OR Married=0 AND LAST LIKE 'D*'" // NOT ACCEPTED
oRS.FILTER := "(FIRST='Jon' OR Married=0) AND LAST LIKE 'D*'" // NOT ...

Hello ,

I made some test with autoincrement field :

DBCREATE(cDbfFile , {{"ID","+",10,0}} , "DBFCDX" , .T. )
DBG DbStruct() // gives ID , + , 4 , 0
? FieldLen("ID") // 4 WHY TRUNCATED TO 4 ?????????????????????????

FOR i := 1 TO 10001
DBAPPEND()
NEXT

? Recno() , FIELD->ID // 10001 , 10001 ...

Hello ,

FWH 1402

DBG ors:Field(..) Gives an error in cValtoStr . in :

if Left( cVal, 1 ) == "*" .and. Len( cVal ) > 2 .and. ValType( uVal ) == 'N'

cVal seems to be a object

Solved with adding

------ IF VALTYPE(uVal)=="O" cVal := cStr(uVal) END ...

Hello ,

I try to use the defined datatypes from adodef.ch , i can only test in ADO , *.mdb or *.accdb

The goal is that the syntax is also accepted in MySql , MsSql , Oracle and Sqlite (see Adofuncs.prg)

Some defines are accepted in the syntax as :

[Fld2] TynyInt

where TynyInt comes from adoDef ...

Hello ,

It is ok , i was confused using VALTYPE(Fieldget(1)) , giving 'N'

Frank

Hello ,

After creating a dbf-file as :

aStruct := {{"Fld1","+",2,0},{"Fld2","=",10,2},{"Fld3","T",8,0},{"Fld4","@",10,0},{"Fld5","D",10,0}}DbCreate("TestFld.dbf",aStruct,,.T.)APPEND BLANKFieldput(5,Date()&#41 ...

Sorry , found the solution in thr source from xbrowse :

oCon:Properties("Data source Name"):Value

Hello ,

Using DBG oCon i can see the property's from this object i.e. :

7 Data Source Name DATA\TEST.MDB

I can't read this data with oCon:Data Source Name

How we can import the object properties in a array ?

Frank Demont

Sorry , as expected the same result.

The FW routine builds exact the same connection string and after creating the ADODB.connection
it executes :

oCn:Open( cCon )

The real question is : how install MYSQL with ODBC connector ?

1) download and install MySql\mysql-installer-web-community-5.7.17.0 ...

I still have problems to connect , see also http://forums.fivetechsupport.com/viewtopic.php?f=3&t=32470#p195453
During a few days i could make connection , from then no connection anymore.

Now , i try to start from scratch on a new computer. What i am doing wrong ?

From MySql site dowmload and ...

May I know what is your FWH version?

if FW_SetUniCode( .t. ) then Fw_OpenAdoConnection(...) automatically uses Unicode driver, without changing the prg.

FW_SetUnicode( .t. )oCn := FW_OpenAdoConnection( ... )FW_SetUnicode( .f. ) // if not required

Sorry , it is only ...

You have 3 options.

Hello ,

During a few days i am trying to use MySql :

1) Use TMySql.Lib // harbour contributions
I can't build this lib

2) Use dolphin.lib // great class from Mr Daniel
I can build the ewamples , they are working (made some corrections)
BUT : FWH:ERP2.prg Gives in module ...

You have 3 options.
1) Use TMySql.Lib // harbour contributions
2) Use dolphin.lib // great class from Mr Daniel
3) Use ADO

For options (1) and (2) you need to
(a) Obtain tmysql.lib or dolphin.lib built for xHarbour or Harbour
(b) Download libmysql.dll from mysql site
(c) Make implib libmysql.lib ...

Hello ,

I used to work with ADO (mdb-files) , till last month no problems.

Since then i can't changed data in a mdb-file , i.e.
(see also http://forums.fivetechsupport.com/viewtopic.php?f=3&t=33115)
oRs                 := TOleAuto():New( "ADODB ...