goConn = CREATEOBJECT("ADODB.Connection")
goConn.ConnectionString ="Provider=MSDASQL.1;Password=*******;Persist Security Info=False;User ID=root;Data Source=myodbc;Initial Catalog=dbf_main"
// 连接串的使用Provider=MSDASQL.1;Password=*******;Persist Security Info=False;User ID=root;Data Source=myodbc;Initial Catalog=dbf_main
goConn.Open
RS = CREATEOBJECT("adodb.recordset")
RS.open('select * from userinfo ',goConn,3,1)
RS.movefirst
DO WHILE !RS.eof()
IF !ISNULL(rs.fields(3).value) OR rs.fields(3).value<>""
?rs.fields(3).value
RS.MOVENEXT
ENDIF
ENDDO
ODBC 下载地址
https://download.csdn.net/download/jack_wang0823/12047451
原地址
https://cdn.mysql.com//Downloads/Connector-ODBC/5.2/mysql-connector-odbc-noinstall-5.2.7-win32.zip