在IBM i (OS/400)中使用RPG程序连接MySQL数据库

本示例展示如何使用RPG程序在IBM i (OS/400)系统中连接MySQL数据库，并进行读写操作。使用IBM i (OS/400)自带的JDBC驱动程序进行连接，并通过sample数据表进行增删改查操作。

// RPG程序连接MySQL示例代码
       /*******************************************************/
       ** 数据库连接参数                                       
       /*******************************************************/
       d dbUrl          s           1024    varying       inz('jdbc:mysql://localhost:3306/sample')  // 数据库URL
       d dbUser         s              20    varying       inz('username')                             // 数据库用户名
       d dbPwd          s              20    varying       inz('password')                             // 数据库密码

       /*******************************************************/
       ** 建立数据库连接                                          
       /*******************************************************/
       d CONND          PR                  extproc('java.sql.DriverManager.getConnection')
       d   url                          *   value
       d   user                         *   value
       d   pass                         *   value
       d   class                        *   value

       d conn           s               *   inz( CONND( dbUrl : dbUser : dbPwd 
                                                             : 'com.mysql.jdbc.Driver' ) )
       /*******************************************************/
       ** 获取数据库连接                                          
       /*******************************************************/
       /FREE
           conn = CONND( dbUrl : dbUser : dbPwd : 'com.mysql.jdbc.Driver' );
           if (conn <> *NULL);
              // 在此进行SQL语句操作
              // ...
           endif;
           // 关闭数据库连接，释放资源
           conn.close();
       /END-FREE

免责申明：文章和图片全部来源于公开网络，如有侵权，请通知删除 server@dude6.com