下面是我的代码?
dim bdate as date
y = int(Val(bYear))
m = int(Val(Left(bMonth, 1)))
d =int( Val(Left(bDay, 1)))
bdate = DateSerial(y, m, d)
Print bdate
'打开数据集
mySql = "select * from NJYY_Y01MJZ where RQ=bdate" 其中“RQ=bdate"行吗?
dim bdate as date
y = int(Val(bYear))
m = int(Val(Left(bMonth, 1)))
d =int( Val(Left(bDay, 1)))
bdate = DateSerial(y, m, d)
Print bdate
'打开数据集
mySql = "select * from NJYY_Y01MJZ where RQ=bdate" 其中“RQ=bdate"行吗?
支持up
mySql = "select * from NJYY_Y01MJZ where RQ= #" &bdate &"#"