哇...好难回答哟...你要一些什么SQL语句?引用Microsoft ActiveX Data Object 2.x
Dim Cn As New Adodb.Connection
Dim Rs As Adodb.RecordsetCn.Open "Driver={SQL Server};Server=youServer;Uid=sa;pwd=;DataBase=Test"
Rs.Open "Select * From Test",Cn..如果你想学SQL的话,看看SQL Server的帮助吧!
Dim Cn As New Adodb.Connection
Dim Rs As Adodb.RecordsetCn.Open "Driver={SQL Server};Server=youServer;Uid=sa;pwd=;DataBase=Test"
Rs.Open "Select * From Test",Cn..如果你想学SQL的话,看看SQL Server的帮助吧!
Select 美女 From CSDN Where 婚否 ='否'"
dim cn as new adodb.connectionstrsql="....."
cn.open strsql
如:
connection.exec "sql语句"
recordset.open "sql语句"
dim a$
a = "否"
"Select 分数 From [CSDN] Where [解答] =" & chr(34) & a & chr(34)
dim strSql as string
set cn=new adodb.connection
strSql="select * from Tb1"
cn.open strSql
cn.close
set cn=nothing
dim strSql as string
set cn=new adodb.connection
strSql="select * from Tb1"
cn.Execute strSql
cn.close
set cn=nothing