RCompleteHourEnd>=v_NowByMinute and (RCompleteTimeBegin is null or

RCompleteTimeBegin<=sysdate) 
                    and (RCompleteTimeEnd is null or RCompleteTimeEnd>=sysdate-1)
                    and RowNum<1001;
                  end if;
                  smcount:= smcount + 1;
          end loop;       
      end;
end;
/

二.使用VB调用OW_SMP_Package.GetSendSM存储过程:

Sub GetSendSM()
  Dim  cmd as New ADODB.Command
  Dim rs as New ADODB.RecordSet
  cmd.ActiveConnection = GetConnection'获得数据库连接
  cmd.CommandText = "{call ow_smp_package.GetSendSM(?,{resultset

上一页  [1] [2] [3] [4] [5] [6] [7] 下一页