史上最簡單的pro*c程式

來源:互聯網
上載者:User
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
EXEC SQL include sqlca;
EXEC ORACLE OPTION (RELEASE_CURSOR = YES);
EXEC SQL BEGIN DECLARE SECTION;
                VARCHAR username[20];
                VARCHAR password[20];
EXEC SQL END DECLARE SECTION;

void sql_error()
{
                EXEC SQL WHENEVER SQLERROR CONTINUE;
                printf("/n Oracle error detected:/n");
                printf("/n%.70s/n",sqlca.sqlerrm.sqlerrmc);
                EXEC SQL ROLLBACK RELEASE;
exit(1);
}

main()
{
                strcpy(username.arr,"gdnum_true");
                strcpy(password.arr,"gdnumtrue_10");
                username.len=strlen(username.arr);
                password.len=strlen(password.arr);

                EXEC SQL CONNECT :username IDENTIFIED BY :password;
                printf("sqlca.sqlcode=%d;/n",sqlca.sqlcode);
                printf("login user=%s",username.arr);
                exit(0);
}

proc pro1.pc
cc -o pro1 pro1.c -L $ORACLE_HOME/lib32 -lclntsh
不作文字說明,只作常式記載

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.