当前位置：工控论坛 > > 产品 > 自动化软件 > GE 数字集团软件

从新发贴:IFIX查询数据库问题？ 点击：279 | 回复：8



bhdxzgp

    
  • 精华：5帖
  • 求助：8帖
  • 帖子：141帖 | 5451回
  • 年度积分：0
  • 历史总积分：21609
  • 注册：2006年4月16日
发表于：2012-08-19 10:12:45
楼主
求助帖5分-已结帖

通过时间范围来查询数据库；

下面程序段；在VB中使用是正常的；但在IFIX的VBA中使用就不正常；

当选择开始和结束时间后；点查询后；得到查询结果；

而后再改变时间范围后；点查询后；就不起作用；还是以前第一次查询的结果！

不知道是什么原因？

查询代码如下：

Private Sub CheckSQL_Click()
    Dim By, Bm, Bd
    Dim Ny, Nm, Nd
    Dim BeginDate
    Dim EndDate
   
    By = DTPicker1.Year
    Bm = DTPicker1.Month
    Bd = DTPicker1.Day
   
    BeginDate = By & "-" & Bm & "-" & Bd & " " & "00:00:00"
    Fix32.Fix.DT1.A_CV = BeginDate
   
    Ny = DTPicker2.Year
    Nm = DTPicker2.Month
    Nd = DTPicker2.Day
   
    EndDate = Ny & "-" & Nm & "-" & Nd & " " & "23:59:59"
    Fix32.Fix.DT2.A_CV = EndDate
   
    With Adodc1
        .ConnectionString = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=MAINDATA;Data Source=MICRO-4316EA8F9"
        .CursorType = adOpenDynamic
        .CommandType = adCmdText            ‘将Source作为命令
        .RecordSource = "SELECT * FROM ribao WHERE riqi BETWEEN ‘" & BeginDate & "‘and‘" & EndDate & "‘ORDER BY riqi"
‘        .Refresh
    End With
    Set DataGrid1.DataSource = Adodc1  ‘使用DataGrid的表；
    DataGrid1.Refresh
    Adodc1.Refresh
End Sub

分享到：
收藏 邀请回答 回复楼主 举报



余 辉

  • [版主]
  • 精华：53帖
  • 求助：44帖
  • 帖子：3350帖 | 28451回
  • 年度积分：603
  • 历史总积分：131640
  • 注册：2006年4月25日
发表于：2012-08-19 11:02:32
1楼
学习了   感谢楼主的精彩分享     更感谢楼主对工控网的大力支持
回复 引用 举报

bhdxzgp

  • 精华：5帖
  • 求助：8帖
  • 帖子：141帖 | 5451回
  • 年度积分：0
  • 历史总积分：21609
  • 注册：2006年4月16日
发表于：2012-08-19 11:17:49
2楼

我这是提的问题啊；呵呵！
希望对这IFIX使用VBA高手给以指点 ！！！

在此深表感谢！！

回复 引用 举报

bhdxzgp

  • 精华：5帖
  • 求助：8帖
  • 帖子：141帖 | 5451回
  • 年度积分：0
  • 历史总积分：21609
  • 注册：2006年4月16日
发表于：2012-08-19 13:57:44
3楼

在些再顶一下啊；

希望有知道的给回！谢谢！！！

回复 引用 举报

bhdxzgp

  • 精华：5帖
  • 求助：8帖
  • 帖子：141帖 | 5451回
  • 年度积分：0
  • 历史总积分：21609
  • 注册：2006年4月16日
发表于：2012-08-19 21:57:03
4楼

再顶一下了啊！！

希望能得到消息啊！！！

回复 引用 举报

HOTEAM

  • 精华：3帖
  • 求助：0帖
  • 帖子：337帖 | 23748回
  • 年度积分：0
  • 历史总积分：70347
  • 注册：2007年4月05日
发表于：2012-08-23 22:13:30
5楼

友情帮顶

这个东西还真不太了解

回复 引用 举报

bhdxzgp

  • 精华：5帖
  • 求助：8帖
  • 帖子：141帖 | 5451回
  • 年度积分：0
  • 历史总积分：21609
  • 注册：2006年4月16日
发表于：2012-08-23 22:21:09
6楼

到目前为止还没有人给回应；看样子很少有这样用的啊？

 

回复 引用 举报

纵横军团-王道火山

  • 精华：2帖
  • 求助：5帖
  • 帖子：86帖 | 1878回
  • 年度积分：0
  • 历史总积分：7858
  • 注册：2012年1月11日
发表于：2012-08-23 22:30:57
7楼
最近也在研究这VBS得脚本记录，还不懂啊 友情帮顶
回复 引用 举报

bhdxzgp

  • 精华：5帖
  • 求助：8帖
  • 帖子：141帖 | 5451回
  • 年度积分：0
  • 历史总积分：21609
  • 注册：2006年4月16日
发表于：2012-08-24 21:32:14
8楼
希望多多交流啊；呵呵！！！
回复 引用 举报

热门招聘
相关主题

官方公众号
智造工程师