xuanniao110 发表于 2016-4-30 09:44:06

[已解决]学习操作数据库遇见问题,根据日期取值,求解,求帮助

本帖最后由 xuanniao110 于 2016-5-2 09:06 编辑

$addfld = ObjCreate("ADODB.Connection")
   $addfld.Open("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & $mdb_data_path & ";Jet Oledb:Database Password=" & $mdb_data_pwd)
        $RS = ObjCreate("ADODB.Recordset")
        $RS.ActiveConnection = $addfld
        GUICtrlSetData($Edit2, $RS.Open("SelectsjFrommymdbWHERErq='2016-04-30'"))
        $RS.close
        $addfld.Close

代码检查   没报任何错误   为什么控件中就没取的值呢

问题已经解决   请管理改成已解决    感谢

xuanniao110 发表于 2016-4-30 09:52:19

自己顶一下   等大神

chzj589 发表于 2016-4-30 15:44:37

回复 2# xuanniao110

是要搜索数据库的 '2016-04-30'?
如果是,不是这样的

guland 发表于 2016-4-30 21:19:15

回复 1# xuanniao110


    多看看数据库的例子就明白了,你的取值方式不对

kk_lee69 发表于 2016-4-30 22:00:06

本帖最后由 kk_lee69 于 2016-4-30 22:01 编辑

回复 1# xuanniao110


    $addfld = ObjCreate("ADODB.Connection")
   $addfld.Open("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & $mdb_data_path & ";Jet Oledb:Database Password=" & $mdb_data_pwd)
      $RS = ObjCreate("ADODB.Recordset")
      $RS.ActiveConnection = $addfld
       $RS.Open("SelectsjFrommymdbWHERErq='2016-04-30'")
       While (Not $RS.eof And Not $RS.bof);循环读表 有资料就跑回圈没资料就会跳出
      GUICtrlSetData($Edit2,$RS.Fields (0).value)
      $RS.movenext;下一笔资料
       WEnd;结束循环读表
      $RS.close
      $addfld.Close

xuanniao110 发表于 2016-5-1 09:46:53

回复 5# kk_lee69

谢谢   原来我少了循环读表   只有循环才能读取出数据    非常感谢

dabaiyun 发表于 2016-5-1 12:46:14

学习啦谢谢解说

kk_lee69 发表于 2016-5-1 22:09:48

回复 1# xuanniao110


    [已解決] 是 自己編輯修改 加入到標題內
页: [1]
查看完整版本: [已解决]学习操作数据库遇见问题,根据日期取值,求解,求帮助