返回一个时间段中某个随机时间的Sql函数
创始人
2024-07-13 06:51:04
0

如果需要返回一个时间段之间一个随机时间,那么用SQL函数应该如何表示呢?下面就将为您介绍返回一个时间段中某个随机时间的Sql函数的例子,供您参考,希望对您学习SQL函数有所启迪。

SQL code

SET QUOTED_IDENTIFIER ON
GO
SET ANSI_NULLS ON
GO

/******************************
*    函数名:    RandDateTime
*    作用:    返回两个时间范围内的一个随机时间
*    参数:   
*        @RandNum:    0-1之际随机数值    建议 Rand()
*        @StartTime:    第一个时间
*        @EndTime:    第二个时间   
*    Author:    兰习刚
*    Date:    2009-11-30
*******************************/
ALTER  Function RandDateTime(@RandNum Decimal(38,18),@StartTime DateTime,@EndTime DateTime)
Returns DateTime
As
Begin
    Declare @HourDiff Decimal(38,18)    --两个时间之间的小时差值
    Declare @MsPartDiff Decimal(38,18)    --毫秒部分的差值   
    Declare @SmallDate DateTime
    Declare @ReturnDateTime DateTime   
   
    /*取各部分差值*/
    Set @HourDiff = DateDiff(hh,@StartTime,@EndTime)
    Set @MsPartDiff = Abs(DateDiff(ms,DateAdd(hh,@HourDiff,@StartTime),@EndTime))
    Select @SmallDate=(Case When @HourDiff>0 Then @StartTime Else @EndTime End)    --取较小的时间  
    Set @HourDiff = Abs(@HourDiff)
ActionLable:
    Declare @HourDecimal Decimal(38,18)    --小时的小数部分   
    Declare @HourString varchar(200)
    Set @HourDiff = @HourDiff * @RandNum   
    Set @HourString = CONVERT(VARCHAR(200),@HourDiff)
    Set @HourString = SubString(@HourString,CharIndex('.',@HourString)+1,Len(@HourString))
    Set @HourString = '0.' + @HourString
    Set @HourDecimal = Convert(Decimal(38,18),@HourString)    --获得小时的小数部分
    Set @MsPartDiff = (@MsPartDiff + @HourDecimal * 3600*1000) * @RandNum   
    /*毫秒差值
    由于之前@MsPartDiff是两个时间小时之后的毫秒差值   
    @HourDecimal * 3600*1000 有小时的小数部分的毫秒差值 不会大于1小时
    毫秒不会溢出
    */
    Set @ReturnDateTime = DateAdd(hh,@HourDiff,@SmallDate)
    Set @ReturnDateTime = DateAdd(ms,@MsPartDiff,@ReturnDateTime)       
    Return @ReturnDateTime
End

GO
SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO
 

 

【编辑推荐】

基于时间SQL函数详解

巧用SQL函数实现身份证15位变18位

教您使用SQL中的TRUNC函数

详解SQL中循环结构的使用

SQL中表变量的不足

 

相关内容

热门资讯

如何允许远程连接到MySQL数... [[277004]]【51CTO.com快译】默认情况下,MySQL服务器仅侦听来自localhos...
如何利用交换机和端口设置来管理... 在网络管理中,总是有些人让管理员头疼。下面我们就将介绍一下一个网管员利用交换机以及端口设置等来进行D...
施耐德电气数据中心整体解决方案... 近日,全球能效管理专家施耐德电气正式启动大型体验活动“能效中国行——2012卡车巡展”,作为该活动的...
Windows恶意软件20年“... 在Windows的早期年代,病毒游走于系统之间,偶尔删除文件(但被删除的文件几乎都是可恢复的),并弹...
规避非法攻击 用好路由器远程管... 单位在市区不同位置设立了科技服务点,每一个服务点的员工都通过宽带路由器进行共享上网,和单位网络保持联...
20个非常棒的扁平设计免费资源 Apple设备的平面图标PSD免费平板UI 平板UI套件24平图标Freen平板UI套件PSD径向平...
范例解读VB.NET获取环境变... VB.NET编程语言的使用范围非常广泛,可以帮助开发人员处理各种程序中的需求,而且还能对移动设备进行...
德国电信门户网站可实时显示全球... 德国电信周三推出一个门户网站,直观地实时提供其安装在全球各地的传感器网络检测到的网络攻击状况。该网站...