Extension Modules > MySQL
Module MySQL Overview
Support:
Original MySQL Documentation
Script_test:
--- Code: --- mysql::RealConnect(host,user,password,database [,port])
--- End code ---
Does it work on non-local connections?
I am trying on different external mysql servers and only receive error.
--- Code: ---(0): error 0x00080002:Extension specific error: %s
--- End code ---
Ty
Support:
Many MySQL servers don't allow external connections due to abuse and resource utilization trying to access it by brute force.
I would try accessing the server with Excel / ODBC just to make sure you have access rights, If all is good there, we can dig a little deeper why the SB extension module is returning an extension error.
Script_test:
I can connect without problems with the command > mysql -u
To test, I have created a database in a free hosting.
--- Code: ---include mysql.bas
dbh = mysql::RealConnect("sql8.freemysqlhosting.net","sql8183953","N9yUkvribn","sql8183953","3306")
PRINT "Host info is: ",mysql::GetHostInfo(dbh),"\n"
--- End code ---
--- Code: ---mysql -u sql8183953 -h sql8.freemysqlhosting.net -p
--- End code ---
Support:
I'm not sure but sending the port number as a string may be causing a problem.
My guess is at this point you're getting a CR_CONN_HOST_ERROR response error message.
Update
My guess was correct and not passing the port number as a string allowed me to connect to your remote MySQL server with the Script BASIC extension module.
--- Code: Script BASIC ---include mysql.basdbh = mysql::RealConnect("sql8.freemysqlhosting.net","sql8183953","N9yUkvribn","sql8183953",3306)PRINT "Host info is: ",mysql::GetHostInfo(dbh),"\n"
jrs@jrs-laptop:~/sb/examples/test$ scriba mysql_remote.sb
Host info is: sql8.freemysqlhosting.net via TCP/IP
jrs@jrs-laptop:~/sb/examples/test$
Here is an example of querying the MySQL information_schema tables.
--- Code: Script BASIC ---IMPORT mysql.basdbh = mysql::RealConnect("sql8.freemysqlhosting.net","sql8183953","N9yUkvribn","sql8183953",3306)mysql::query(dbh,"SELECT * FROM INFORMATION_SCHEMA.TABLES")WHILE mysql::FetchHash(dbh,tbls) FOR x = 0 TO UBOUND(tbls) STEP 2 PRINT tbls[x]," - ",tbls[x+1],"\n" NEXT PRINTNLWENDmysql::Close(dbh)
Navigation
[0] Message Index
[#] Next page
Go to full version