在 IBM i 上使用 RPG 编程语言连接 MySQL 数据库的示例代码
作者:佚名
上传时间:2023-04-30
运行软件:IBM Rational Developer for i
* 软件版本号:V1R1M0
**************************************************************/
H actgrp(*CALLER) dftactgrp(*NO)
D *NODATETIME *NOSHOWCPYSRC
/include qsysinc/qrpglesrc,mysql
/include qsysinc/qrpgle
软件版本:V1R1M0
**************************************************************/
H actgrp(*CALLER) dftactgrp(*NO)
D *NODATETIME *NOSHOWCPYSRC
/include qsysinc/qrpglesrc,mysql
/include qsysinc/qrpglesrc,odbc
D Hdbc S
版权申诉
本示例代码是一个简单的 RPG 程序,演示了如何连接 MySQL 数据库。其中使用了 ODBC 数据库连接方式。该程序可在 IBM i 操作系统上运行,并采用 IBM Rational Developer for i 进行编写。本例中将通过创建 DSN 连接来实现连接MySQL 数据库。
/**************************************************************
* 功能:RPG 程序连接 MySQL 数据库
* 编写者:IBM i 用户组
* 编写软件:IBM Rational Developer for i
* 软件版本号:V1R1M0
**************************************************************/
H actgrp(*CALLER) dftactgrp(*NO)
D *NODATETIME *NOSHOWCPYSRC
/include qsysinc/qrpglesrc,mysql
/include qsysinc/qrpglesrc,odbc
D Hdbc S Like(sqlHdbc_t)
D Hstmt S Like(sqlHstmt_t)
D ConnAttr DS LikeDS(SQL_CONNECT_ATTR)
D MysqlInfo DS LikeDS(sqlMysql_t)
D SqlState DS LikeDS(sqlSqlState_t)
D iError S 10i 0 Inz(0)
D Connection S LikeDS(mysql_t)
C/EXEC SQL
C+ INCLUDE SQLCA;
C/END-EXEC
/**************************************************************/
* 初始化 MYSQL 信息
/**************************************************************/
C Eval MysqlInfo.Host = '192.168.1.100';
C Eval MysqlInfo.Port = 3306;
C Eval MysqlInfo.User = 'root' ;
C Eval MysqlInfo.Pwd = 'password';
C Eval MysqlInfo.DbName = 'test';
/**************************************************************/
* 连接 MYSQL 数据库
/**************************************************************/
C Eval iError = SQLConnectAttrs(ConnAttr%Addr);
C Eval iError = MysqlDBStartup(MysqlInfo%Addr, Connection%Addr);
C Eval iError = MysqlConnect(Connection%Addr);
/**************************************************************/
* 执行 SQL 语句
/**************************************************************/
C Eval iError = SQLAllocHandle(SQL_HANDLE_STMT, Hdbc, %Addr(Hstmt));
C Eval iError = SQLExecDirect(Hstmt,
C 'select * from test' +
C ' where id = ?',
C SQL_NTS);
免责申明:文章和图片全部来源于公开网络,如有侵权,请通知删除 server@dude6.com
用户评论
相关推荐
在 IBM i 上使用 RPG 编程语言连接 MySQL 数据库的示例代码
本示例代码是一个简单的 RPG 程序,演示了如何连接 MySQL 数据库。其中使用了 ODBC 数据库连接方式。该程序可在 IBM i 操作系统上运行,并采用 IBM Rational Develop
V1R1M0
**************************************************************/
H actgrp(*CALLER) dftactgrp(*NO)
D *NODATETIME *NOSHOWCPYSRC
/include qsysinc/qrpglesrc,mysql
/include qsysinc/qrpglesrc,odbc
D Hdbc S
IBM Rational Developer for i
* 软件版本号:V1R1M0
**************************************************************/
H actgrp(*CALLER) dftactgrp(*NO)
D *NODATETIME *NOSHOWCPYSRC
/include qsysinc/qrpglesrc,mysql
/include qsysinc/qrpgle
2023-04-30 06:03
在IBM i (OS/400)中使用RPG编程语言连接到MySQL数据库的示例代码
本示例代码演示了如何使用RPG编程语言在IBM i (OS/400)上连接并查询MySQL数据库。其中包括设置数据库连接、执行查询语句、获取查询结果等功能的实现方式。** 设置数据库连接参数
IBM i 7.3
IBM RPG编译器
2023-03-22 06:14
在IBM i上使用RPG编程语言
IBM i RPG编程入门RPG(Report Program Generator)是一种面向业务逻辑的编程语言,主要用于数据处理和报表编制。RPG最初是在IBM System/3上开发的,现在已经
IBM i 7.3
IBM ILE RPG compiler
2023-04-04 04:19
在IBM i (OS/400)上用RPG语言连接到网站API的示例代码
本示例代码演示如何在IBM i (OS/400)操作系统上使用RPG语言连接到一个Web API并将数据解析为RPG数据结构。这个API可以提供天气预报数据。实现方式是使用RPG程序语言编写程序实现网
IBM i 7.4
IBM Rational Developer for i
2023-04-27 14:38
在IBM i (OS/400)上连接MySQL数据库的示例代码
本示例代码介绍如何在IBM i (OS/400)上使用RPG程序连接MySQL数据库,包括连接字符串的设置和基本的数据库操作。/***********************************
IBM i 7.3
Rational Developer for i
2023-03-18 13:45
在IBM i上使用RPG程序远程连接Oracle数据库
该示例代码演示了如何在IBM i (OS/400)上使用RPG程序远程连接到Oracle数据库。使用了IBM提供的JT400库来建立与Oracle数据库的连接,并使用SQL语句对数据库执行查询操作。
IBM i 7.3
RPG IV
2023-05-23 04:15
在IBM i上连接Oracle数据库的示例代码
此示例代码演示了如何在IBM i上使用JDBC连接Oracle数据库,包括连接参数和代码实现。使用此代码可以在IBM i上查询和操作Oracle数据库中的数据。/* 导入所需的Java库 */im
IBM i 7.3
Java
2023-04-10 00:43
在IBM i (OS/400)中使用RPG程序连接MySQL数据库
本示例展示如何使用RPG程序在IBM i (OS/400)系统中连接MySQL数据库,并进行读写操作。使用IBM i (OS/400)自带的JDBC驱动程序进行连接,并通过sample数据表进行增删改
IBM i (OS/400) V7R3
RPG程序
2023-05-28 10:09
如何在 IBM i 上使用 RPG 编程语言
这篇文章将介绍如何在 IBM i 操作系统中使用 RPG 编程语言,包括定义变量、创建函数和过程以及调用 API。RPG 是一种适用于 IBM i 系统的高级编程语言,可用于开发商业应用。H DFT
IBM i 7.4
RPG IV (ILE RPG)
2023-04-28 02:24
在IBM i (OS/400)上使用RPG编程语言(IBM i (OS/400))
IBM i (OS/400)是一种流行的操作系统,广泛用于企业级应用程序的开发和部署。其中,RPG编程语言是一种高级编程语言,适用于开发企业级应用程序。本文将介绍在IBM i (OS/400)上使用R
IBM i (OS/400) V7R4,Rational Developer for i 9.6
Rational Developer for i
2023-04-03 04:01