科技行者

行者学院 转型私董会 科技行者专题报道 网红大战科技行者

知识库

知识库 安全导航

至顶网软件频道基础软件VC下利用Pro*C开发Oracle接口

VC下利用Pro*C开发Oracle接口

  • 扫一扫
    分享文章到微信

  • 扫一扫
    关注官方公众号
    至顶头条

本文介绍了使用Pro*C/C 在Visual C 环境下开发Oracle数据库接口程序的方法。

作者:王公琳 董明玉 王俊江 来源:计算机与信息技术 2007年10月19日

关键字:

  • 评论
  • 分享微博
  • 分享邮件
编程举例

  1、程序内容

  一般SQL嵌入式程序主要有说明、包含头文件、子程序声明、主程序和子程序等部分组成,在主程序中调用有关子程序。必备的子程序通常有连接到数据库子程序、断开数据库子程序、错误处理子程序和完成某项具体事务(如查询、插入、修改、删除等)的工作子程序。

  2、程序举例

  下面是一完整的可通过预编译、编译链接和运行的示例程序。

/* exam01.pc 开发Oracle接口程序举例 */
/* 说明:本程序介绍用PROC开发Oracle库接口的编程特点。通过向AUTHS
* 表输入作家代码,查询作家姓名及工资。运行前应建表、插入数据并提交。*/
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
/* 包含SQL通讯区,它用于处理错误。*/
#include <sqlca.h>
void connect(); /* 连接到Oracle Server */
void disconnect(); /* 断开到Oracle Server的连接 */
void sql_error(char *); /* 处理错误句柄 */
void select(); /* 查询子程序 */
extern sqlglm(char *,int *,int *);
/* 主程序 */
void main()
{
 /* 安装错误处理句柄 */
 EXEC SQL WHENEVER SQLERROR DO sql_error("Oracle错误--\n");
 /* 连接到数据库 */
 connect();
 /* 执行查询 */
 select();
 /* 断开数据库连接 */
 disconnect();
}
/* 子程序 */
/* 连接子程序 connect() */
void connect()
{
 EXEC SQL BEGIN DECLARE SECTION;
 VARCHAR username[10], password[10], server[10];
 EXEC SQL END DECLARE SECTION;
 /* 输入用户名、口令以及服务器名 */
 printf("\n输入用户名:");
 gets(username.arr);
 username.len=(unsigned short)strlen((char *)username.arr);
 printf("\n输入口令:");
 gets(password.arr);
 password.len=(unsigned short)strlen((char *)password.arr);
 printf("\n输入服务器名:");
 gets(server.arr);
 server.len=(unsigned short)strlen((char *)server.arr);
 /* 连接到Oracle服务器上 */
 EXEC SQL CONNECT :username IDENTIFIED BY :password USING :server;
 printf("\n以用户%s成功地连接到了服务器%s上!\n", username.arr, server.arr);
}
/* 断开连接子程序 disconnect() */
void disconnect()
{
 char temp;
 printf("\n是否在断开连接前提交所有事务? (Y/N)");
 scanf("%c", &temp);
 fflush(stdin);
 if(temp !='Y' && temp != 'y')
 {
  /* 回退事务,断开连接。 */
  EXEC SQL ROLLBACK WORK RELEASE;
  printf("\n回退事务,断开连接,退出程序!\n\n");
 }
 else
 {
  /* 提交事务,断开连接。 */
  EXEC SQL COMMIT WORK RELEASE;
  printf("\n提交事务,断开连接,退出程序!\n\n");
  exit(1);
 }
}
/* 查询子程序 select()
* 首先输入作家代码,然后查询作家姓名和工资。*/
void select()
{
 EXEC SQL BEGIN DECLARE SECTION;
 char author_code[8], name[10];
 float salary;
 short salary_ind;
 EXEC SQL END DECLARE SECTION;
 printf("\n输入作家代码: ");
 gets(author_code);
 /* 查询作家姓名和工资 */
 EXEC SQL SELECT name, salary INTO :name, :salary:salary_ind
 FROM auths
 WHERE author_code = :author_code;
 /* 根据指示变量的值来确定该作家的工资是否为空。*/
 if (salary_ind ==0)
 {
  printf("\n作家代码\t作家姓名\t作家工资\n");
  printf("--------\t--------\t--------\n");
  printf("%8s\t%8s\t%8.2f\n", author_code, name, salary);
 }
 else
 {
  printf("作家%s的工资未录入,为空值!\n", name);
 }
}
/* 错误处理子程序 sql_error() */
void sql_error(char *msg)
{
 char err_msg[128];
 size_t buf_len, msg_len;
 /* 出现SQL错误,继续往下执行。 */
 EXEC SQL WHENEVER SQLERROR CONTINUE;
 printf("\n%s\n", msg);
 buf_len=sizeof(err_msg);
 /* 调用函数sqlglm()获得错误消息。 */
 sqlglm(err_msg, &buf_len, &msg_len);
 printf("%.*s\n", msg_len, err_msg);
 /* 回退事务,断开连接,退出程序。 */
 EXEC SQL ROLLBACK RELEASE;
 exit(EXIT_FAILURE);
}

  3、建表和插入数据记录

  上述示例程序如要正确运行,还需以Oracle库的合法用户登录,并创建AUTHS表和插入一些数据记录。建表文件、建表命令和插入数据记录的示例命令如下所述。这里叙述的工作完成后,上节生成的可执行文件才能正确运行。

  REM 以下为建表文件auths.SQL

DROP TABLE auths CASCADE CONSTRAINTS
/
CREATE TABLE auths(
AUTHOR_CODE VARCHAR2(8) NOT NULL,
NAME VARCHAR2(10),
BIRTHDATE DATE,
ENTRY_DATE_TIME DATE,
SALARY NUMBER(7,2),
remark VARCHAR2(255))
/
REM 下一行为在PL/SQL环境中运行建表文件的命令
REM @ E: \ PROCW \ Exam01 \ auths.sql
REM 下一行为在PL/SQL环境中向auths表插入数据的命令,插入后应提交(COMMIT)!
REM INSERT INTO auths(author_code,name,salary) VALUES('A00001','王达琳',1200);

查看本文来源

    • 评论
    • 分享微博
    • 分享邮件
    邮件订阅

    如果您非常迫切的想了解IT领域最新产品与技术信息,那么订阅至顶网技术邮件将是您的最佳途径之一。

    重磅专题
    往期文章
    最新文章