[VB.NET]请问我如何在vb.net中调用pl/sql包中已经写好的方法？

最新推荐文章于 2021-04-13 21:29:30 发布

mohongmao

最新推荐文章于 2021-04-13 21:29:30 发布

阅读量806

点赞数

分类专栏： [VB.NET论坛] 文章标签： vb.net textbox table cmd sql

[VB.NET论坛] 专栏收录该内容

757 篇文章

订阅专栏

本文介绍如何在VB.NET中调用Oracle数据库中已定义的PL/SQL包内的过程，并展示了如何将过程返回的数据展示在界面上的具体实现。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

请问我如何在vb.net中调用pl/sql包中已经写好的方法？
sql文如下
CREATE TABLE TEST
(
NAME VARCHAR2(10),
PSW VARCHAR2(10)
)

CREATE OR REPLACE PACKAGE TROUBLEREPORT.test_cursor
IS

CURSOR CUR_TEST(cname test.name%TYPE) IS
SELECT
A.name,
A.psw
FROM test A
where A.name = cname;
CCUR_TEST CUR_TEST%ROWTYPE;

PROCEDURE OPEN_ONE_CURSOR (cname IN VARCHAR2,psw OUT VARCHAR2);

END;

CREATE OR REPLACE PACKAGE BODY TROUBLEREPORT.test_cursor is

PROCEDURE OPEN_ONE_CURSOR (cname IN VARCHAR2,psw OUT VARCHAR2)
IS
BEGIN
OPEN CUR_TEST(cname);
-- ループ開始
LOOP
FETCH CUR_TEST INTO CCUR_TEST;
EXIT WHEN CUR_TEST%NOTFOUND;
psw:=CCUR_TEST.psw;
END LOOP;
close CUR_TEST;
END OPEN_ONE_CURSOR;

END test_cursor;

请问我如何把OPEN_ONE_CURSOR过程返回的第2个参数的值，传到画面上的一个text中去呢？如果我返回的是游标，pl/sql文和vb.net程序该如何写呢？
__________________________________________________________________________
OracleCommand cmd = new OracleCommand();
cmd.Connection = conn;
cmd.CommandText = TROUBLEREPORT.test_cursor.OPEN_ONE_CURSOR ;
cmd.CommandType = CommandType.StoredProcedure;

cmd.Parameters.Add( cname , OracleType.VarChar).Value = admin ;
cmd.Parameters.Add( psw , OracleType.Cursor).Direction =
ParameterDirection.Output;

conn.Open();
OracleDataReader dr = cmd.ExecuteReader();

if(dr.Read())
{
textbox1.text=dr[i].ToString();
}

*****************************************************************************
欢迎使用优快云论坛专用阅读器 : 优快云 Reader(附全部源代码)

最新版本：20070212

http://www.cnblogs.com/feiyun0112/archive/2006/09/20/509783.html
__________________________________________________________________________
楼上正解，另外
需要在项目中把 system.data.oracleclient包含进去。
__________________________________________________________________________