FWH 16.08 : Built-in MySql/MariaDB functionality (Updated )

[nageswaragunupudi]

Actually you do not even have to open RowSet.
You can directly save the result of SQL statement to DBF.
Important: You should link DBFCDX to the application.

Sample:

Code: Select all  Expand view

   cSql  := "SELECT FIRST,CITY,AGE,SALARY FROM customer"
   oCn:SaveToDBF( cSql, "c:\fwh\samples\custpart.dbf" )

   USE c:\fwh\samples\custpart NEW SHARED VIA "DBFCDX"
   XBROWSER "custpart"
 

The entire execution is extremely fast.
Note: This creates a new DBF file.

[Maurizio]

Thanks Rao,
I can't use oRs:savetodbf() because I need to do in a cycle like the example above.
Maurizio

[vilian]

Maurizio,

IF you really needs to do this in a cycle, I think you could to do by this way:

Code: Select all  Expand view

aValues := oCn:Execute(cString)
FOR n = 1 TO Len(aValues)
      oCn:Insert(cTable,,aValues[n])    
NEXT
 

[nageswaragunupudi]

Code: Select all  Expand view

  do while !oRs:Eof()
      (cAlias)->( DBAPPEND() )
      (cAlias)->( AEVAL( oRs:Scatter( .t. ), { |u,i| FieldPut( i, u ) } ) )
      oRs:Skip( 1 )
   enddo
 

OR

Code: Select all  Expand view

  nFieldCount := oRs:FCount()
   do while !oRs:Eof()
      (cAlias)->(DBAPPEND())
      for n := 1 to nFieldCount
         (cAlias)->( FieldPut( n, oRs:FieldGet( n ) ) )
      next
      oRs:Skip( 1 )
   enddo
 

[dutch]

Dear Mr.Rao,

WIll it be compatible with BCC7?

For MSVC32 Users


If the MSVC32 application is linked with mysqlclient.lib instead of with libmysql32.lib, the exe works independently and does not require libmysql.dll. You can distribute the exe only without any dlls.

Thanks.

[nageswaragunupudi]

No
Only MSVC32.
But the Exe will be too large.

[dutch]

Thank you, Mr.Rao.

[Maurizio]

Thanks Rao ,

Just what I wanted .

It's possible to have a list of the methods of RowSet class ?

Regards Maurizio

[nageswaragunupudi]

Please see

viewtopic.php?f=3&t=33286

[Maurizio]

Thanks Rao ,

I have a loop that every 60 minutes connecting to a server

FWCONNECT oCn HOST cServer USER cUser PASSWORD cPassword

I read the new data and i close .

oCn:Close()

Sometimes I get this error :
2013 Lost connection to MySQL server at 'waiting for initial comunication packet' ,system error 2 .

it's possible not view the message and write in a log ?

Regards Maurizio

Regards Maurizio

[nageswaragunupudi]

I understand you already know the use of oCn:lShowErrors and oCn:lLogErr.

Normally no errors or other messages are either displayed or logged unless you explicitly set the above flags.

But we thought some messages about losing connection are very important to the user to know what is happening or why data is not being saved, etc. For this reason we are displaying some connection related error messages compulsorily. We expect such messages would help the user to check his cables/internet connections etc and continue the program.

Let us consider an option to suppress these messages also in specific cases like yours. Your requirement is just in time before the next release.

Setting oCn:lLogErr to .t. anyway logs all error messages including this message

[Maurizio]

Thanks Rao ,

but in this case the error is when I connect , lLogErr it should be in

FWCONNECT oCn HOST cServer USER cUser PASSWORD cPassword

Maurizio

[nageswaragunupudi]

I see.
Let me think.

In the meantime better we also look for avoiding this error.
clean up you temporary folder. (try)

[nageswaragunupudi]

Instead of

FWCONNECT oCn HOST cServer USER cUser PASSWORD cPassword


Please try
oCn := maria_Connect( cServer, nil, cUser, cPassword, .F. )

This would suppress display of error messages while connecting

[Maurizio]

Hello Rao ,

I have the same message with

oCn := maria_Connect( cServer, nil, cUser, cPassword, .F. )

I use FW January 2017

Maurizio