首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

vb和sql连接 日期函数转换有关问题

2012-01-21 
vb和sql连接 日期函数转换问题那位指点一下 我有一个程序是VB和sql做的,sql有一个字段叫做维护时间 类型是

vb和sql连接 日期函数转换问题
那位指点一下 我有一个程序是VB和sql做的,sql有一个字段叫做维护时间 类型是datetime 我想用DateDiff函数做日期比较 但是只能比较维护时间的第一行日期 我想让只要比较所有维护时间里的数值! (我问了问,有人说是数据类型不匹配,我改成了m = DateDiff("d", rs("维护时间"), Now) 改成 m = DateDiff("d", rs("sql"), Now) 也报错 希望高人指点 代码如下:Dim m As Integer
Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset

  conn.ConnectionString = "Driver={sql server};server=niy;uid=;pwd=;database=sb"
conn.ConnectionTimeout = 30
conn.Open
sql = "select 维护时间 from 维护管理"
rs.Open sql, conn, adOpenKeyset, adLockPessimistic
m = DateDiff("d", rs("维护时间"), Now)
If m = 0 Then
Text1.Text = m
Print
End If
End Sub

[解决办法]
sql = "select DateDiff('d', rs!维护时间, Now) from 维护管理"
rs.Open sql, conn, adOpenKeyset, adLockPessimistic
[解决办法]
SQL Server 的语法

VB code
sql = "select 维护时间 from 维护管理 where Datediff(d, 维护时间, GetDate())=0" 

热点排行