易截截图软件、单文件、免安装、纯绿色、仅160KB

vb和access

我想用vb查询access
StrSql = "select * from t_VoteIp where NewsID=" & CLng(Trim(Text4.Text)) & ""
NewsID是长整型,可是我在Text4中输入1075却查询不到内容,1075是确实存在的。
还有
StrSql = "select * from t_news where news_date>" & cdate(text1.text) & " and news_date<" & text2.text & ""
news_date是now()返回值,我在文本框输入2010-1-1和2011-2-1也查询不到内容。
涕跪老手予以指教。。。。。。。。
应该是你的SQL语言构建错误。
http://download.csdn.net/source/1644211

在查询中测试你的sql语句,如果查询中不能通过,一定是你的sql语句胡问题....

别的我不知道,你那个CLng好像是多余的:)如是校验的话最好还是另外多处理一下


一、在ACCESS中测试
  select * from t_VoteIp where NewsID=1075
  的结果。
二、在ACCESS中日期要用#引起来,如#2010-1-1#
  在ACCESS中测试
  select * from t_news where news_date>#2010-1-1# and news_date < #2011-2-1#
  的结果。

一、每个语句最后的&""可以不要
二、第二个查询是从TEXTBOX取出的STRING类型,要转换为DATE类型,同时要注意DATE的格式,另外,日期前后要加#

StrSql = "select * from t_VoteIp where NewsID=" & Text4.Text & "" 
StrSql = "select * from t_news where news_date>#" & cdate(text1.text) & "# and news_date <#" & text2.text & "#" 


相关问答:

vb中如何实现对象属性的动态设置 - VB / 基础类

本人使用的是VB6.0版本
假设有一个对象A,A内有类型为B的对象属性。现在的问题是,需要添加若干个B对象作为A对象的属性。如,
 A.B1,A.B2,...
但具体添加多少个B对象作为A对象的属性则视具体情况不同而不同 ......

请教!用的是VB 6.0 - VB / 控件

把已有数据(数据大于20行)的RS(recordset)的第10行数据与第11行数据做加法后,删除第11行的数据,然后把后面的数据向前移。
RS的话修改数据是会更新数据库,现在的问题是RS里的已有数据是用SQL语句分类统计出来的 ......

vb读取用word转换成的xml里的数据 - VB / 基础类

Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' 打开刚创建的文件。
ReDim MyString(LOF(1) - 1)
  Put #1, , MyRecord ' 读入所有字符到变量中 ......

VB怎么制作进度条? - VB / 控件

点击按钮后弹出进度条窗口,要在30%的时候停顿1秒 40%停顿2秒,然后走完进度条后提示保存成功!
请问如何写?
进度条用那个VB6自带的progressbar控件,定时用timer
我在本站找了这几个帖,估计够你用
http://topic ......
© 2009 ej38.com All Rights Reserved. 关于E健网联系我们 | 站点地图 | 赣ICP备09004571号