752
社区成员
发帖
与我相关
我的任务
分享
CREATE PROCEDURE [dbo].[P_test]
(
@cPath NVARCHAR(4000) ,
@cErrMsg NVARCHAR(1000) output
)
AS
......
IF ( SELECT fSize FROM #SIZE WHERE cDriver = LEFT (@cPath, 1) ) <= @fDBSize
BEGIN
SET @cErrMsg = N'指定的路径剩余磁盘空间太少,请选择其他路径或清理磁盘空间!'
RAISERROR(@cErrMsg, 16, 1) WITH NOWAIT
RETURN -1
END
DECLARE P_test procedure for P_test
@cPath = :gs_Path,
@cErrMsg = :ls_return OUTPUT
USING SQLCA;
EXECUTE P_test;
Fetch P_test INTO :ls_return;
mle_1.text=ls_return
messagebox('错误!',ls_return+ SQLCA.SQLErrText)