一个网友想做一个每新建一个用户就为该用户建一张表的例子。我就为他写下了下面的过程及如何调用存储过
程的方法以供参考
CREATE PROCEDURE autoCreateTable
@tableName char(10)
AS
exec('
create table '+@tableName+'
(
ID int identity(1,1) primary key,
name char(16)
)')
GO
如何调用存储过程
with datamodule1.ADOStoredProc_Pub do
begin
if active then close;
procedureName:='autoCreateTable';
parameters.Clear;
parameters.Add;
parameters[0].Value:=UserName;
try
execproc;
except
exit;
end;
messagebox(0,pchar('建表成功'),pchar('成功'),mb_ok+mb_iconinformation);
end;// end with