调用带参数存储过程, 调用带参数存储过程
--1:存储过程返回DataSet 的例子:
C# 代码 :通用类
public static int SingleSTCD(DateTime StartTime,DateTime EndTime,int SMTP,
string JL,string STDCD,string STCDSTR, out DataSet ds )
{
int ret=0;
ds=null;
OleDbConnection Constring=new OleDbConnection();
OleDbCommand cmd=new OleDbCommand("P_Get_STCD_SingleAppraise_XunQi",
Constring);
try
{
OleDbDataAdapter ada=new OleDbDataAdapter();
;
("@StartTime", ).Value=StartTime ;
("@EndTime", ).Value=EndTime ;
("@SMTP", ).Value=SMTP ;
("@JL", , 50).Value=JL ;
//("@STDCD", , 50).Value=STDCD ;
//评价标准
("@STCDSTR", , 8000).Value=STCDSTR ;
data = new DataSet();
= cmd;
(,"");
ds = data;
ret=;
if ( ret ==-1 )
{
return -1000; //无数据
}
else
{
return ret;
}
}
catch(Exception e)
{
//数据库操作发生错误,返回错误代码
();
return -1001;
}
finally
{
();
();
}
调用:
Private Sub BindingDataGrid_Query()
Dim ds As
("1999-5-1", "1999-9-1", 1, "Ⅲ", "", "50181300,50185050,50181350,50185100,50185150,50185200,50185250,
50181200,50185150,51282300", ds)
= ds
()
End Sub
--1:存储过程返回数组字符串
REM 执行存储过程,返回一数组
Public Shared Function ExecuteSP_ToArrary(ByVal sConnString As String,
ByVal Text_STCD As String, ByVal Text_TIME As String,
ByRef TableInfo() As String)
Dim conn As OleDbConnection = New OleDbConnection(sConnString)
ReDim TableInfo(2)
Try
()
Dim command As OleDbCommand = New OleDbCommand("P_GET_QueryValue", conn)
=
Dim sqlParams() As OleDbParameter = {New OleDbParameter("@STCD", Text_STCD),
New OleDbParameter("@GETM", Text_TIME),<