怎样执行存储过程?

baqiaoyang 2004-08-06 03:00:50
各位:
在用Delphi.net开发asp.net web application过程中,怎样运行存储过程?并取得其
运行结果(即返回的数据).
谢谢!
...全文
154 10 打赏 收藏 转发到动态 举报
写回复
用AI写文章
10 条回复
切换为时间正序
请发表友善的回复…
发表回复
zgmiao 2005-03-07
  • 打赏
  • 举报
回复
传送参数方法
procedure Database.PrepareCommand(command: SqlCommand; connection: SqlConnection; transaction: SqlTransaction; commandType: CommandType; commandText: string; commandParameters: SqlParameter[]; [Out] var mustCloseConnection: boolean);
begin
if (command = nil) then
raise ArgumentNullException.Create('command');
if ((commandText = nil) or (commandText.Length = 0)) then
raise ArgumentNullException.Create('commandText');
if (connection.State <> ConnectionState.Open) then
begin
mustCloseConnection := true;
connection.Open
end
else
mustCloseConnection := false;
command.Connection := connection;
command.CommandText := commandText;
if (transaction <> nil) then
begin
if (transaction.Connection = nil) then
raise ArgumentException.Create('The transaction was rollbacked or commited, please provide an open transaction.', 'transaction');
command.Transaction := transaction
end;
command.CommandType := commandType;
if (commandParameters <> nil) then
Database.AttachParameters(command, commandParameters)
end;

zgmiao 2005-03-07
  • 打赏
  • 举报
回复
执行带参数的存储过程,并返回DataSet的方法如下
function Database.ExecuteDataset(connection: SqlConnection; commandType: CommandType; commandText: string; [ParamArray] commandParameters: SqlParameter[]): DataSet;
var
set2: DataSet;
command1: SqlCommand;
flag1: boolean;
adapter1: SqlDataAdapter;
begin
if (connection = nil) then
raise ArgumentNullException.Create('connection');
command1 := SqlCommand.Create;
flag1 := false;
Database.PrepareCommand(command1, connection, nil, commandType, commandText, commandParameters, @(flag1));
{using adapter1}
begin
adapter1 := SqlDataAdapter.Create(command1);
try
set1 := DataSet.Create;
adapter1.Fill(set1);
command1.Parameters.Clear;
if (flag1) then
connection.Close;
set2 := set1
finally
adapter1.Dispose
end
endbegin
result := set2;
exit
end
end;


haoco 2005-03-04
  • 打赏
  • 举报
回复
up
haoco 2005-02-21
  • 打赏
  • 举报
回复
up
kdg2000 2004-12-20
  • 打赏
  • 举报
回复
帮你顶
xiangding 2004-08-10
  • 打赏
  • 举报
回复
跟D7用有区别吗?
ADO.net中用SqlCommand对像就可以
GoldShield 2004-08-09
  • 打赏
  • 举报
回复
BD UP
baqiaoyang 2004-08-09
  • 打赏
  • 举报
回复
MS SQL Server
juliens 2004-08-09
  • 打赏
  • 举报
回复
UP
klbt 2004-08-07
  • 打赏
  • 举报
回复
什么数据库?

1,978

社区成员

发帖
与我相关
我的任务
社区描述
.NET技术 其他语言讨论
社区管理员
  • 其他语言社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧