| 发表于:2007-05-16 21:31:483楼 得分:0 |
private sub form_load() adodc1.connectionstring = "provider=msdasql.1;persist security info=false;data source=jwl_dbf " adodc1.recordsource = "select cs.js_dm,cs.备件代码,cs.备件名称,cs.备件规格,cs.进口计算机号,cs.最低库存量,sl.结存数量,sl.结存金额,sl.结存单价,sl.类别代码 from jwck_bm as cs,jwl_jiec as sl " & _ " where cs.备件代码 = sl.备件代码 " & " and cs.备件代码> " & " ' ' " & " order by sl.类别代码,sl.备件代码 " adodc1.refresh datagrid1.refresh end sub | | |
|