SQL语句
time1=format(now,"hh:mm:ss")
fromtime,totime
sCmd = "Update Tables Set SiteStatus=1 Where TableName In (Select TableName from tableBook Where BookDate='" & Format(Now, "yyyy-mm-dd") & "' And DatePart=" & tmpDatePart & " and fromTime < " & time1 & " and " & time1 & " < ToTime ) And SiteStatus <2"
error: fromTime < " & time1 & " and " & time1 & " < ToTime
time1=format(now,"hh:mm:ss")
fromtime=Format(DTPicker1.Value, "hh:mm:ss")
Totime=Format(DTPicker2.Value, "hh:mm:ss")
格式是一样的
修改一下
sCmd = "Update Tables Set SiteStatus=1 Where TableName In (Select TableName from tableBook Where BookDate='" & Format(Now, "yyyy-mm-dd") & "' And DatePart=" & tmpDatePart & " and fromTime < #" & time1 & "# and ToTime > #" & time1 & "# ) And SiteStatus <2"
来晚了,顶一下
也可以这样写
sCmd = "Update Tables Set SiteStatus=1 Where TableName In (Select TableName from tableBook Where BookDate='" & Format(Now, "yyyy-mm-dd") & "' And DatePart=" & tmpDatePart & " and #" & time1 &a
相关问答：
大家好，请问在表M中有字段：a b c d e
我想查出其中满足下面任意一项的数据，1.字段a 的值不是 ‘书或笔或本’中任一，2.a为书的时候字段b,c是空;3.当a值为笔的时候d是空;4.当a为本的时候b,d,e都是空;5.� ......
with adod_dict do
begin
close;
commandtext:='select bgqxcode,count(*) wjsl from wscl_wsda_file where wjnd=:tnd group by bgqxcode'; ......
执行的顺序：
1）文件浏览框（选择文件使用）
选择好文件后
点击一个导入按钮的时候 ，把上面上传框里的csv文件以一个ID为文件名，上传到**/**文件夹下
2）读取这个文件夹下的csv的文件，转换成sql
3 ......
