我知道在SQLServer上用“exec sp_databases”可以获取当前服务器上所有的数据库名称,但不知道在Delphi中如何调用,请各位高人指点!
ADOQuery1.SQL.Clear;
ADOQuery1.SQL.Add(sp_databases);
ADOQuery1.Open;
while not ADOQuery1.Eof do begin
ShowMessage(ADOQuery1.Fields[0].AsString);
ADOQuery1.Next;
end;
ADOQuery1.Close;
也可以用 select * from master..sysdatabases 得到数据库名,suid<>1 为用户创建的数据库名。
上面有一个地方错了,ADOStoredProc组件是专门用来调用存储过程
设好它的Connection和procedurename属性
With ADOStoredProc1 do
begin
Close;
ParamByName(@percentage).AsInteger:=100;//@percentage为存储过程的参数
Active:True;
end;