rs.activeconnection=cnn
rs.open"sql 语句"
set datacombo1.datasource=rs.feilds().value
mcnn.open"连接语句"
rs.close
rs.activcnnection=mcnn
set datacombo1.datasource=rs.feilds().value
你要的是不是这个
是的话,给分
rs.open"sql 语句"
set datacombo1.datasource=rs.feilds().value
mcnn.open"连接语句"
rs.close
rs.activcnnection=mcnn
set datacombo1.datasource=rs.feilds().value
你要的是不是这个
是的话,给分
cbo.DataField = "f1"
Set cbo.RowSource = rs2
cbo.ListField = "f2"
cbo.BoundColumn = "f3"