//SQL命令操作没有问题,PEL试过各种办法都读取不了,VBA读取正常。有大神PLE读取成功的麻烦告知下,谢谢!
{---------------MYSQL的ODBC连接----------------------------}
{在桌面建立UDL空文件,设置ODBC的DNS,打开找到字符串,填入DATABASE函数命令中,注意,DATABASE不支持换行或是多余空格}
DATABASE('Provider=MSDASQL.1;Password=Jtg44dforx4Fq0DX;Persist Security Info=True;User ID=root;Data Source=mysesaq;Initial Catalog=test001;');
//DBEXECUTE('exit');
{-----------------常用命令--------------------------}
//DBEXECUTE('use test001');//选择数据库
//DBEXECUTE('DROP TABLE runoob_tbl');//删除数据表
{-----------------添加数据--------------------------}
{DBEXECUTE('INSERT INTO runoob_tbl (runoob_title,
runoob_author, submission_date) VALUES
("学习 MySQL", "菜鸟教程", NOW())');
{------------------创建数据表------------------}
{DBEXECUTE('CREATE TABLE IF NOT EXISTS `runoob_tbl`(
`runoob_id` INT UNSIGNED AUTO_INCREMENT,
`runoob_title` VARCHAR(100) NOT NULL,
`runoob_author` VARCHAR(40) NOT NULL,
`submission_date` DATE,
PRIMARY KEY ( `runoob_id` )
)ENGINE=InnoDB DEFAULT CHARSET=utf8');
{--------------------获取数据--------------------------}
DBEXECUTE('select * from runoob_tbl');
DBTABLE('Select * from runoob_tbl Order By runoob_id');
vvv:=DBSTRING('runoob_id'),LINETHICK0;
DRAWTEXT(1,c ,vvv);