我想把查詢到到第一條記錄和最後一條記錄之間某字段的值賦值給數組。
Set conn = New ADODB.Connection
Set rs = new ADODB.RecordSet
conn.Open 你的連接字符串
sql = "select * from table where ..."
rs.Open sql, conn
c = rs.Count
i = 1
while not (rs.eof)
if i <> 1 and i <> rs.Count Then
msgbox rs!字段
end if
rs.MoveNext
end while