StrConn = "driver={Microsoft ODBC for Oracle};server=hbjy;uid=hbjy;pwd=hbjy"
Set Conn = CreateObject("ADODB.Connection")
Conn.Open StrConn Dim Trs As New ADODB.Recordset
Set Trs = Conn.Execute("Select * from test")
)Trs就是取到的数据集哟,任意用 改删的时候用Conn.Execute("update test set a=1")
Set Conn = CreateObject("ADODB.Connection")
Conn.Open StrConn Dim Trs As New ADODB.Recordset
Set Trs = Conn.Execute("Select * from test")
)Trs就是取到的数据集哟,任意用 改删的时候用Conn.Execute("update test set a=1")
非常感谢你的回答,不过还晚了,我书都买了...