فراخوانی stored procedure

[shakiba_12]

در مورد فراخوانی stored procedure راهنمایی کنید اگه میشه یه نمونه کد برای راهنمایی بذارید
ممنون :oops:

[titbasoft]

dim cn as new sqlconnection
dim cm as new sqlcommand
cn.connectionstring = "..."
cn.open
cm.connection=cn
cm.commandType=storedprocedure
cm.Parameters.Add("@par", SqlDbType.TinyInt).Value = 12
dim dr as new sqldatareader = cm.executeReader
...
dr.close
cn.close
شرمنده که تند نوشتم

[shakiba_12]

به عنوان مثال:
در storeprocedure نوشتم:


CREATE PROCEDURE checkuser AS
Select * from TBLuser
where userid ="u" And pass ="p"
GO


و در برنامم نوشتم :


Dim cnn As SqlConnection
Dim strsql As String
Dim cmd As SqlCommand
Dim dr As SqlDataReader
cnn = New SqlConnection("server=HASTI;UID=sa;database=blog")
cmd = New SqlCommand("checkuser", cnn)
cmd.CommandType = CommandType.StoredProcedure
With cmd.Parameters
.Add("u", txtblogname.Text)
.Add("p", txtpass.Text)
End With
cnn.Open()
cmd.ExecuteNonQuery()

ولی ارور میده
:(

[titbasoft]

SP ای که نوشتید و کدتون یه کم مشکل داره. صحیح اش این طوریه:


CREATE PROCEDURE checkuser (@uid nvarchar(30),@pass nvarchar(20)) AS
Select * from TBLuser
where userid =@uid And pass =@pass
GO


Dim cnn As SqlConnection
Dim strsql As String
Dim cmd As SqlCommand
cnn = New SqlConnection("server=HASTI;UID=sa;database=blog")
cmd = New SqlCommand("checkuser", cnn)
cmd.CommandType = CommandType.StoredProcedure
With cmd.Parameters
.Add("@uid", SqlDbType.NVarChar).Value = txtblogname.Text
.Add("@pass", SqlDbType.NVarChar).Value =txtpass.Text
End With
cnn.Open()
Dim dr As SqlDataReader = cmd.Executereader
....

[shakiba_12]

ممنون
درست شد :oops: