摘要: Dim rs,sqset conn=createobject("adodb.connection")set rs=createobject("adodb.recordset")conn.open="Driver={Microsoft ODBC for Oracle};Server=SID_HOST.DOMAIN.COM;Uid=mssqa;Pwd=password;"sql="select * from CLIENT_TABLE"rs.open sql,conn,3,3do while not rs.eofvalu 阅读全文
posted @ 2014-01-06 14:35 赏客 阅读(375) 评论(0) 推荐(0) 编辑