错误提示 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 错误提示

共有2583人关注过本帖树形打印复制链接主题：错误提示

cqmeiyan

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：104 积分：939 威望：0 精华：0 注册：2011/6/8 9:13:00

错误提示

Post By：2014/6/10 14:41:00 [显示全部帖子]

Dim _datetime = _date1.AddDays(1)

Dim cmd As New SQLCommand

cmd=new SQLCommand

cmd.ConnectionName=conn

cmd.CommandText="select * from tbl_kq_dkjl where 工號='" & bh & "' and 日期='" & _datetime & "' and 時間>='23:00:00' and 時間<='23:59:59' and 機器類型='考勤機' order by 時間"

Dim dt As DataTable

dt=cmd.ExecuteReader

tb.Rows(i)("上班1")= dt.GetComboListString("時間")

此主题相关图片如下：1.jpg

请问这段代码为什么会有这样的错误的提示

cqmeiyan

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：104 积分：939 威望：0 精华：0 注册：2011/6/8 9:13:00

Post By：2014/6/10 14:48:00 [显示全部帖子]

是不是条件太长,我换一个不带条件,单纯 "select * from tbl_bc where 班次='" & _bc & "'" 这样就不报错

cqmeiyan

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：幼狐帖子：104 积分：939 威望：0 精华：0 注册：2011/6/8 9:13:00

Post By：2014/6/10 14:50:00 [显示全部帖子]

问题解决,改成如下就没有问题:

Dim _datetime = _date1.AddDays(1)

Dim _str2 = "select * from tbl_kq_dkjl where 工號='" & gh & "' and 日期='" & _datetime & "' and 時間>='23:00:00' and 時間<='23:59:59' and 機器類型='考勤機' order by 時間"

Dim cmd As New SQLCommand

cmd=new SQLCommand

cmd.ConnectionName=conn

cmd.CommandText=_str2

Dim dt As DataTable

dt=cmd.ExecuteReader

tb.Rows(i)("上班1")= dt.GetComboListString("時間")

下一主题 >> << 上一主题

主题：错误提示