欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → MYSQL连接收据库例子

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有2992人关注过本帖平板打印复制链接

主题:MYSQL连接收据库例子

美女呀,离线,留言给我吧!
zm71212302
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游侠 帖子:201 积分:0 威望:0 精华:0 注册:2013/4/6 22:01:12
MYSQL连接收据库例子  发帖心情 Post By:2020/3/2 22:41:21    Post IP:36.102.6.116[只看该作者]

//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);


 回到顶部