Set recordset = connection.OpenSchema (QueryType, Criteria, SchemaID)
MSDN 中有介绍,可以得要数据库中的表名称
MSDN 中有介绍,可以得要数据库中的表名称
解决方案 »
- 远程连接不上sql server 2000?
- 求一年的天数和某日是一年的第几天
- 对精确到秒的datetime建聚集索引有意义吗
- excel导入问题
- 求助:sqlserver的model库问题咨询
- 几天一开机,出现连接不上的问题,不知道怎么回事
- 请教sql查询问题,为每个objectGuid选出最新更新的两条记录
- 近学习邹老大的算法,碰到难题!!!!!!!!!!!!!
- 跨数据库的表的复制
- 请大家介绍一下SQL Server及其有何特点
- 谢谢yang_sun,mshy! but how to get weblogic jdbc for sql server?
- 呀呀,完了,别人机器上的sqlserver被我卸了,没卸干净,现在用也用不了,卸也卸不下,装也装不上,怎么办??
Dim rstSchema As ADODB.Recordset
Dim strCnn As String
Set cnn1 = New ADODB.Connection
strCnn = "Provider=sqloledb;" & _
"Data Source=srv;Initial Catalog=pubs;User Id=sa;Password=; "
cnn1.Open strCnn
Set rstSchema = cnn1.OpenSchema(adSchemaTables)
Do Until rstSchema.EOF
Debug.Print "Table name: " & _
rstSchema!TABLE_NAME & vbCr & _
"Table type: " & rstSchema!TABLE_TYPE & vbCr
rstSchema.MoveNext
Loop
rstSchema.Close
cnn1.Close
End Sub