Bluehost MySQL Server through Fivewin

[Otto]

Hello Antonio,
Do you know if it is possible to access MySQL Server located on Bluehost through Fivewin.
Thanks in advance
Otto

[ShumingWang]

Yes! But your app ip should be fixed, set permission ip on the bulehost control panel.
Shuming Wang

[Antonio Linares]

Otto,

Here you have an example published by Rafa Carmona using a web service:

viewtopic.php?p=184458

[Otto]

Dear Antonio and Shuming,
Thank you for your help.
I will post here all the steps I do till I have finished a working sample.

As Shuming told me you have to setup Bluehost first to accept remote access.

->login bluehost cPanel
->database tools
->Remote Mysql access
Submit an IP or Class C
I submitted Class C access which you get with the add link

Then I downloaded HeidiSQL and tested the remote access from my desktop
Now I want to start to access from a Fivewin programm.

Which SQL driver would you suggest to start with?
Is there a working sample?
Best regards,
Otto

[Antonio Linares]

Otto,

Look for FW_OpenAdoConnection in FWH\samples\*.prg

Also you can review FiveDBU source code

[Carles]

Otto,

You can use libmysql.dll. It's working very good.

Edited: With TDolphin, of course

[Otto]

Dear Antonio,
Can you show us how the connectionstring should look like.
These are my parameters I use in HeidiSQL which work fine.


LOCAL cHost := "box894.bluehost.com"
LOCAL cUser := "axxxxnge"
LOCAL cPsw := "14Adxxxx1"
LOCAL nPort := 3306
LOCAL cDb := "atzwange_xxxxxe3"

Thanks in advance
Otto




FUNCTION SQLEXEC( cQuery )

LOCAL cCns := "Your connectionstring here"

LOCAL oCn := CREATEOBJECT( "ADODB.Connection" )

oCn:CursorLocation = adUseClient

oCn:Open( cCns )

oCn:Execute( cQuery )

oCn:Close()

RETURN NIL

[Antonio Linares]

Otto,

Here you have some examples:

https://msdn.microsoft.com/en-us/library/ms807027.aspx

[Otto]

Dear Antonio,
thank you for your help.
Now I can successfully connect to Bluehost with FIVEDBU.
Great.
Download:
mysql-connector-odbc-5.1.13-win32.msi
Click on ICON "ADO open"





Best regards,
Otto

[Antonio Linares]

Otto,

great!