Stored Procedure

[delasaee]

سلام به همه دوستان

امروز داشتم تو بخش پایگاه داده می چرخیدم که به 1 تاپیک برخوردم که طرفدار زیادی داشت
ولی من چیز زیادی از اون سر در نیاوردم


یه برنامه بود به اسم Stored Procedure Generator که آقای delphiassistand زحمت نوشتنشو کشیده بودن

اینم لینک اون تاپیکhttp://barnamenevis.org/forum/showthread.php?t=87372

من برنامه رو گرفتم و یه جدول درست کردم و این برنامه رو تست کردم


Create Procedure sp_Table_1_Insert
@name nvarchar(50),
@family nvarchar(50),

As
Begin
Insert Into Table_1
(name,family)
Values
(@name,@family)
End
GO


Create Procedure sp_Table_1_Update
@id int,
@name nvarchar(50),
@family nvarchar(50)

As
Begin
Update Table_1
Set
name = @name,
family = @family
Where
id = @id
End

GO


این برنامه کوئری های inserto update ..... تولید میکنه

من می خوام بدونم چطور توی vb میشه از این stored procedure ها استفاده کرد

این برنامه فقط به درد این می خوره که commandemoon از توش کپی کنیم اونجا پیست کنیم؟

[Mani_rf]

خیلی ساده :

موقعی که Command را تعریف می کنی تا Query را از دیتابیس بگیری این طوری Command را تعریف کن :


Dim X As SqlClient.SqlCommand = New SqlClient.SqlCommand
X.CommandType = CommandType.StoredProcedure


این هم مثال :


Dim cmd As New SqlClient.SqlCommand()
Dim param As SqlClient.SqlParameter
Dim dr As SqlClient.SqlDataReader

cmd.Connection = dcNorthwind
cmd.CommandType = CommandType.StoredProcedure
cmd.CommandText = "CustOrderHist"

param = New SqlClient.SqlParameter("@CustomerID", TextBox1.Text)
cmd.Parameters.Add(param)

Try
dcNorthwind.Open()

dr = cmd.ExecuteReader()
' Process data reader here...

Catch ex As Exception
MessageBox.Show("Failed to execute command.")

Finally
dcNorthwind.Close()
End Try