对象“refresh”的方法“IAdodc”失败怎么改啊!?
代码Subinitxm()sqlstr="select作者姓名fromwriterorderby作者姓名"Adodc1.RecordSource=sqlstrAdodc1...
代码
Sub initxm()
sqlstr = "select 作者姓名 from writer order by作者姓名"
Adodc1.RecordSource = sqlstr
Adodc1.Refresh
While Not Adodc1.recordset.EOF
Cboxm.AddItem Adodc1.recordset.Fields("作者姓名")
Adodc1.recordset.MoveNext
Wend
End Sub 展开
Sub initxm()
sqlstr = "select 作者姓名 from writer order by作者姓名"
Adodc1.RecordSource = sqlstr
Adodc1.Refresh
While Not Adodc1.recordset.EOF
Cboxm.AddItem Adodc1.recordset.Fields("作者姓名")
Adodc1.recordset.MoveNext
Wend
End Sub 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询