存储过程是采用动态的sql语句。
SQL code:
...
EXECUTE sp_executesql @StrSql,N'@UserID uniqueidentifier OUTPUT,@SysTime VARCHAR(20) OUTPUT,@EmpCode VARCHAR(5) , @PassWord VARCHAR(8)',@UserID OUTPUT ,@SysTime OUTPUT,@EmpCode,@PassWord
IF ....
BEGIN
RETURN 0
END
...
VB code:
With cmd
Set .ActiveConnection = g_Conn
.CommandType = adCmdStoredProc '设置Command类型为“存储过程”
.CommandText = "P_Attend" '存储过程的名称
'返回型参数
.Parameters.Append .CreateParameter("@RetVal", adInteger, adParamReturnValue)
'传入参数
.Parameters.Append .CreateParameter("@EmpCode", adChar, adParamInput, 5, strEmpCode)
.Parameters.Append .CreateParameter("@PassWord", adChar, adParamInput, 5, strPassWord)
'传入输出型的参数
.Parameters.Append .CreateParameter("@UserID", adGUID, adParamOutput)
.Parameters.Append .CreateParameter("@SysTime", adGUID, adParamOutput)
.Execute
'得到操作结果，登陆成功返回用户ID
Attend= .Parameters("@RetVal").Value
If Attend= 0 Then
UserID = .Parameters("@U
select count(1) from FX_RETURNBOOKCHECKLIST fxreturnbo0_ where fxreturnbo0_.BOOKID='164 ' AND fxreturnbo0_.RETURNID='00025.S0000001'
上面一个简单的SQL,执行时间2.6� ......
