用ado啊dim Cn1 As ADODB.Connectiondim Rs1 As ADODB.RecordsetSet CN1 = New ADODB.ConnectionCN1.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=pubs;Data Source=123.456.789.123", "sa", "1234"set Rs1 = new adodb.recordsetRS1.Open "Select * from authors ", CN1, adOpenStatic