如何在VB 6.0中使用内部联接记录集

时间:2011-06-21 08:40:55

标签: vb6 recordset

我有2张桌子

t1
sid   svalue
1    aaaa
2    bbbb


t2
pid   sid
1      1
2      2

我想要记录集以使其内容

pid     svalue
1       aaaa
2       bbbb

我用

With AdoResult
If .State = adStateOpen Then .Close
.Open "Select t1.svalue,t2.pid from t2 inner join t1 on t1.sid=t2.sid", con, adOpenStatic, adLockPessimistic
Do Until .EOF
MsgBox (.Fields(1))
.MoveNext
Loop
End With      

但是什么都没有,甚至没有错误细节

0 个答案:

没有答案