صدازدن یک پروسیجراز دیتابیس دربرنامه

[mandana.k]

دوستان سلام
من یک پروسیجر دردیتابیسم که اراکل است نوشته ام ومی خواهم از آن در برنامه (vb.net2003)استفاده کنم چگونه باید آنراصدابزنم واز آن استفاده نمایم
:متفکر:

[Dariuosh]

اول یه کلاس جدید تو پروژت اضافه کن ؛
بعد


Imports System.Data.OracleClient
PublicClass OracleDataBase
PrivateShared mvarConnectionString AsString
PrivateShared mvarCnt As OracleConnection
PrivateShared mvarCmd As OracleCommand
PrivateShared mvarDa As OracleDataAdapter
PublicSharedProperty ConnectionString() AsString
Get
Return mvarConnectionString
EndGet
Set(ByVal value AsString)
mvarConnectionString = value
EndSet
EndProperty
PublicSharedReadOnlyProperty Cnt() As OracleConnection
Get
If IsNothing(mvarCnt) Then
mvarCnt = New OracleConnection
EndIf
If mvarCnt.State <> ConnectionState.Open Then
With mvarCnt
.ConnectionString = mvarConnectionString
.Open()
EndWith
EndIf
Return mvarCnt
EndGet
EndProperty
PublicSharedReadOnlyProperty Cmd() As OracleCommand
Get
If IsNothing(mvarCmd) Then
mvarCmd = New OracleCommand
EndIf
mvarCmd.Connection = Cnt
Return mvarCmd
EndGet
EndProperty
PublicSharedReadOnlyProperty Da() As OracleDataAdapter
Get
If IsNothing(mvarDa) Then
mvarDa = New OracleDataAdapter
EndIf
mvarDa.SelectCommand = Cmd
Return mvarDa
EndGet
EndProperty
EndClass
EndClass

دیگه الان فقط ConnectionStringرو ست کن


OracleDataBase.ConnectionString = "....."
OracleDataBase.Cmd.CommandType = CommandType.StoredProcedure

و بعد ادامه ماجرا

[mandana.k]

من از این کد درست سر درنیاوردم بهتره این طور بگم که من در پروسیجرم دارم:



CREATE OR REPLACE procedure pr( c out number) as
d number;
begin
c:=5;
d:=c;
dbms_output.put_line(d);
end;


تمام ارتباط من دربرنامه ام (vb.net2003)نیز برقراراست ودرست کارمیکند این پروسیجر راچطوردربرنامه ام صدابزنم تا نتیجه رابرگرداند

[mandana.k]

دوستان من این کد را استفاده کردم اما اسم پروسیجرم را پس از انجام تمامی مراحل باید به این صورت صدابزنم


Cmd.CommandText = "pr"




:گریه:

[Dariuosh]

دوستان من این کد را استفاده کردم اما اسم پروسیجرم را پس از انجام تمامی مراحل باید به این صورت صدابزنم


Cmd.CommandText = "pr"




:گریه:
اره اسم SP کافیه
فقط این یادت نره

Cmd.CommandType = CommandType.StoredProcedure