Ado 如果连接远程的SQL数据库?

Question

我在做考试系统时,要用VB中的Ado 连接数据库,但是不知道Ado如果连接远程的SQL数据库?
   高手请帮我一把!!!!!!!!!!!!!

Answer 1

very easy
先找到你所要连的服务器名xt101
然后
private myconn as new adodb.connection
private myrecord as new adodb.recordset
dim mysql as string
set myconn=new adodb.connection
myconn.connectionstring="provider=SQLOLEDB.1;persist security infor=true;user id=ly;initial catalog=kaoshi;datasource=xt101"
myconn.open
set myrecord=new adodb.recordset
mysql="select *from  kaoshi"
myrecord.open mysql,myconn,adopendynamic,adlockoptimistic
myrecord.movefirst
showdata
end sub
就可以了