如何链接sql数据

chanchen

如何链接sql数据

如题

罗生门

使用ADO

罗生门

sub sample()dim conn as new adodb.connectiondim rsr as new adodb.recordsetdim sqlstr as stringconn.open "provider=sqloledb,data source="c:\*.mdb",user id=fa,,password=123"rsr.activeconnection=connsqlstr="select * from tablename"rst.open sqlstr,,adopenkeyset,adlockoptimisticmsbbox"connection succeed"rst.closeend sub

老鬼

如果是从EXCEL连接SQL的话，可以用MS QUERY连接ODBC数据源实现。

罗生门

并且MS QUERY还提供了参数,可以把参数限制为工作表中的单元格.ADO也可以在EXCEL实现.上面的连接如果正确,把记录集导入到EXCEL的代码:dim i as longsheets(1).selectrst.movefirstfor i=1 to rst.recordcountactivesheet.cells(i,1).value=rst(0)activesheet.cells(i,2).value=rst(1)activesheet.cells(i,3).value=rst(2)'可以自己决定字段数量rst.movenextif rst.eof then exit fornext iend sub需要注意的是EXCEL单个工作表最多60000多行.如果记录集很大,就出错了.