关于ADO的问题

<P>我写了这样一段代码：</P>
<P>Dim recsADO As New ADODB.Recordset</P>
<P>Dim cnn As New ADODB.Connection<BR>Dim cmd1 As New ADODB.Command</P>
<P>cnn.ConnectionString = "DSN=Article;UID=sa;PWD=sa"<BR>cnn.Open<BR>cmd1.CommandText = "select distinct 车站 from 车站路线表"<BR>Set cmd1.ActiveConnection = cnn<BR>recsADO.CursorType = adOpenStatic<BR>Set recsADO = cmd1.Execute<BR>Debug.Print recsADO.RecordCount<BR>List1.Clear<BR>recsADO.MoveFirst<BR>Do Until recsADO.EOF<BR>  List1.AddItem recsADO.Fields(0).Value<BR>  recsADO.MoveNext<BR>Loop<BR>Debug.Print List1.ListCount<BR>运行后，立即窗口返回-1和93，我不知道为什么 recsADO.RecordCount会返回-1,请各位高手帮忙，谢谢<BR></P><img src="images/post/smile/dvbbs/em02.gif" /><img src="images/post/smile/dvbbs/em02.gif" />

<P>没有找到记录,返回-1</P>