|
|
马上注册，结识高手，享用更多资源，轻松玩转三维网社区。
您需要 登录 才可以下载或查看，没有帐号？注册
x
Dim TL1 As Double + }9 D9 ^3 P2 l6 O$ W4 F2 y
'连接数据库
( b$ e: U2 n/ h; x- I8 C# _Set adoCon = New Connection ; K1 B. i; d! F% m; i5 z; y, ^0 q3 _- Z
adoCon.CursorLocation = adUseClient / y2 T u2 S- g: G
adoCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\Chen\Documents\abc.mdb;" , S1 z3 ]! j% s
O; G- F/ S W
Set adoRs = New Recordset / }, r8 O! i5 ^- Q( d2 f5 X9 j
adoRs.Open "Ergonomics", adoCon, adOpenDynamic, adLockOptimistic 5 J& |5 }9 p% L. l' o. Q: g
" N' A/ ?1 Y7 y% Z
TL1 = "SELECT CL FROM Ergonomics where Hmin=100" " Y% s% N2 z$ U6 }& Z5 l
* t* {$ [$ C$ S8 W6 @) `, g6 z/ C
我想问的是：打开数据库以后，如何查询其中的某个数据，然后给一个变量赋值？上面的程序是查询Ergonomics表中当HMIN值为100时候 返回对应的CL值。然后赋给TL1。。。请高手指导！谢谢！
6 f0 x9 G: t5 P2 p" I2 A% k! f系统提示最后一句有“类型错误”。。请问如何解决？
0 e; Z+ P' U; C4 B( F6 o k$ S/ [% j; c$ \' p% T4 s$ ?
打开数据库以后，如何查询其中的某个数据，然后给一个变量赋值 |
|
发表于 2009-2-3 23:35:12
发表于 2009-2-4 08:15:54
楼主