关于VB.NET连接字符串
写了一个类,代码如下PublicClassgztjPublicSharedSubtj1(ByValccAsString,ByValjjAsTextBox)DimcsAsS...
写了一个类,代码如下
Public Class gztj
Public Shared Sub tj1(ByVal cc As String, ByVal jj As TextBox)
Dim cs As String
cs = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=L:\te1\TEST\WebSite1\db.mdb"
Dim conn As New OleDbConnection(cs)
conn.Open()
Dim da As String = "SELECT Count(检测项目) FROM b where 检测项目='cc'"
Dim cmd As New OleDbCommand(da, conn)
Dim C As Integer = cmd.ExecuteScalar()
jj.Text = C.ToString
conn.Close()
End Sub
End Class
然后我调用
gztj.tj1("有机碳", TextBox2) 统计出来的是0个,而我直接把
Dim da As String = "SELECT Count(检测项目) FROM b where 检测项目='cc'" 中的CC直接改成 有机炭 就可以正常统计,请问哪里写错?
另外还问下,如果有textbox1 和textbox2 要在textbox里面输入日期,跟数据库里面的一个保存时间的列比较,该咋样写,如 tb1<表.完成时间<tb2
谢谢 如果我的检测项目有些特殊符号,比如 买、卖 卖/买 买-卖 CC那里该咋改 展开
Public Class gztj
Public Shared Sub tj1(ByVal cc As String, ByVal jj As TextBox)
Dim cs As String
cs = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=L:\te1\TEST\WebSite1\db.mdb"
Dim conn As New OleDbConnection(cs)
conn.Open()
Dim da As String = "SELECT Count(检测项目) FROM b where 检测项目='cc'"
Dim cmd As New OleDbCommand(da, conn)
Dim C As Integer = cmd.ExecuteScalar()
jj.Text = C.ToString
conn.Close()
End Sub
End Class
然后我调用
gztj.tj1("有机碳", TextBox2) 统计出来的是0个,而我直接把
Dim da As String = "SELECT Count(检测项目) FROM b where 检测项目='cc'" 中的CC直接改成 有机炭 就可以正常统计,请问哪里写错?
另外还问下,如果有textbox1 和textbox2 要在textbox里面输入日期,跟数据库里面的一个保存时间的列比较,该咋样写,如 tb1<表.完成时间<tb2
谢谢 如果我的检测项目有些特殊符号,比如 买、卖 卖/买 买-卖 CC那里该咋改 展开
2个回答
展开全部
Dim da As String = "SELECT Count(检测项目) FROM b where 检测项目='cc'"
这句写错啦,你直接传送的是检测项目为字符串"cc"的参数,并不是你程序写的CC参数
改为:
Dim da As String = "SELECT Count(检测项目) FROM b where 检逗纤测项目='" & cc & "'"
建议通过程序组织的sql语句可以通过msgbox da 弹出来看看,这样你较容易查出是什么错误,较长的就用textbox1.text=da来看了,不过记得设置断点"exit sub"
使用ACCESS数据库的日期列比较,应为:
"select * from 表 where 日期列=" &"#" & cdate(textbox1.text) &"#"
注意前后两个“#”号
使用sqlserver
"select * from 表 where 日期列=" &"'" & cdate(textbox1.text) &"'"
当然日期格式要注意,如长短日期谈悄等含指渣。
日期期间:between 小日期 and 大日期(记得加#号)
这句写错啦,你直接传送的是检测项目为字符串"cc"的参数,并不是你程序写的CC参数
改为:
Dim da As String = "SELECT Count(检测项目) FROM b where 检逗纤测项目='" & cc & "'"
建议通过程序组织的sql语句可以通过msgbox da 弹出来看看,这样你较容易查出是什么错误,较长的就用textbox1.text=da来看了,不过记得设置断点"exit sub"
使用ACCESS数据库的日期列比较,应为:
"select * from 表 where 日期列=" &"#" & cdate(textbox1.text) &"#"
注意前后两个“#”号
使用sqlserver
"select * from 表 where 日期列=" &"'" & cdate(textbox1.text) &"'"
当然日期格式要注意,如长短日期谈悄等含指渣。
日期期间:between 小日期 and 大日期(记得加#号)
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
1、Dim da As String = "SELECT Count(检测项目) FROM b where 检测项目='" & cc & "带庆'"
如果用模糊查询就用
Dim da As String = "SELECT Count(检测项目) FROM b where 检测项目='%" & cc & "%'"
2、
"select * from b where 表.完成时间>槐行春#"& tb1 &"# and 表.完成时间<#"& tb2 &铅耐"# "
如果用模糊查询就用
Dim da As String = "SELECT Count(检测项目) FROM b where 检测项目='%" & cc & "%'"
2、
"select * from b where 表.完成时间>槐行春#"& tb1 &"# and 表.完成时间<#"& tb2 &铅耐"# "
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询