以下的code 會出現run-time error當行到"rs.find.." 時.
run-time error:The rowset cannot scroll backwards"
Set cn = New ADODB.Connection
cn.Open Connstr
Set rs = New ADODB.Recordset
rs.Open "get_details", cn, adOpenDynamic, adLockOptimistic
rs.Find ("code=' " & Text4.Text & " ' ")
註:"get_details" is a stored procedure
Thanks!