首页 新闻 论坛 群组 Blog 文档 下载 读书 Tag 网摘 搜索 .NET Java 游戏 视频 人才 外包 培训 数据库 书店 程序员
中国软件网
欢迎您:游客 | 登录 注册 帮助
  • combine sql query result [无满意答案结帖,结帖人:monchichi1]
    进入用户个人空间
    加为好友
    发送私信
    在线聊天
    • monchichi1
    • 等级:
    • 可用分等级:
    • 总技术分:
    • 总技术分排名:
    • 结帖率:
    发表于:2008-08-19 15:16:11 楼主
    hi,is possible to combine sql query result??

    for example:
    machineno = A10
    trecord = 12

    combine result=A10&12

    this is current code:

    Dim rs1 As ADODB.Recordset
    Dim rs2 As ADODB.Recordset
    Dim rs3 As ADODB.Recordset
    Dim partno As String
    Dim machineno As String
    Dim dimension As String
    Dim startdate As String
    Dim enddata As String

    machineno = txtmachineno.Text
    partno = combopartno.Text
    dimension = Combodimension.Text
    startdate = DTPicker1.Value
    enddate = DTPicker2.Value


      Set m_rs = OpenRecordset("SELECT * FROM spcdata", adOpenStatic, adLockOptimistic)
      With combomachineno
            .clear
    Set rs2 = OpenRecordset("select Machineno,count(sampleno)as Trecords From spcdata where partno = '" & partno & "' and dimension ='" & dimension & "'and date between '" & Format$(startdate, "yyyy-mm-dd") & "' and '" & Format$(enddate, "yyyy-mm-dd") & "' group by machineno,dimension", adOpenStatic, adLockReadOnly)
     
      While Not rs2.EOF
                combomachineno.AddItem rs2!machineno & ""
                rs2.MoveNext
            Wend
            rs2.Close
    Set rs2 = Nothing
    End With


    please help.thanks
    20  修改 删除 举报 引用 回复
    进入用户个人空间
    加为好友
    发送私信
    在线聊天
    • monchichi1
    • 等级:
    • 可用分等级:
    • 总技术分:
    • 总技术分排名:
    发表于:2008-08-19 17:55:191楼 得分:0
    problem was fixed!
    修改 删除 举报 引用 回复

    网站简介广告服务网站地图帮助联系方式诚聘英才English 问题报告
    北京创新乐知广告有限公司 版权所有 京 ICP 证 070598 号
    世纪乐知(北京)网络技术有限公司 提供技术支持
    Copyright © 2000-2008, CSDN.NET, All Rights Reserved