Adodc调用存储过程无结果

用Adodc调用很简单的一个存储过程，居然没反应？Private Sub Command1_Click()
Adodc1.RecordSource = "exec guocheng"
Adodc1.RecordSource = "select * from tmp_text"
Adodc1.Refresh
MsgBox ("成功")
End SubAdodc1.RecordSource = "exec guocheng" 这一行没有任何反映，程序可以顺利通过，求助！