如何确定有多少人登陆数据库？

2016-01-29 15:02 12 1 收藏

如何确定有多少人登陆数据库？,如何确定有多少人登陆数据库？

【 tulaoshi.com - Access数据库】

Sub ShowUserRosterMultipleUsers()
    Dim cn As New ADODB.Connection
    Dim cn2 As New ADODB.Connection
    Dim rs As New ADODB.Recordset
    Dim i, j As Long

cn.Provider = "Microsoft.Jet.OLEDB.4.0"
cn.Open "Data Source=c:Northwind.mdb"

cn2.Open "Provider=Microsoft.Jet.OLEDB.4.0;" _
& "Data Source=c:Northwind.mdb"

    ' The user roster is exposed as a provider-specific schema rowset
    ' in the Jet 4 OLE DB provider.  You have to use a GUID to
    ' reference the schema, as provider-specific schemas are not
    ' listed in ADO's type library for schema rowsets

Set rs = cn.OpenSchema(adSchemaProviderSpecific, _
, "{947bb102-5d43-11d1-bdbf-00c04fb92675}")

'Output the list of all users in the current database.

Debug.Print rs.Fields(0).Name, "", rs.Fields(1).Name, _
"", rs.Fields(2).Name, rs.Fields(3).Name

    While Not rs.EOF
        Debug.Print rs.Fields(0), rs.Fields(1), _
        rs.Fields(2), rs.Fields(3)
        rs.MoveNext
    Wend

End Sub

来源:http://www.tulaoshi.com/n/20160129/1495070.html

上一篇：如何拆分复制的Access 97数据库
下一篇：浅析《世界OL》锤子的未来和出路

看过《如何确定有多少人登陆数据库？》的人还看了以下文章更多>>

如何操作Access数据库

标签：编程语言网络编程

如何操作access数据库一、查找记录 find.htm 请输入您要查找的人的姓名: find.asp 二、过滤记录 filter.asp 三、添加记录 add.asp 四、更新记录和上面的“添加记录”一样，只需把“添加”命令改做“更新”就可以了： objrs.update 五、删除记录本文来自学习网(www.gzu521.com)，原文地址：http://www.gzu521.com/campus/artic...

如何优化Access数据库

标签：编程语言网络编程

How to speed up database access Here is a trick to loop through a recordset faster. Often when looping through a recordset people will use the following code: Do While Not Records.EOF Combo1.AddItem Records![Full Name] Eecords.Movenext LoopThe problem is that everytime the database moves to the next re...

如何恢复系统数据库？

标签： SQLServer

关于系统数据库的恢复总结如下: 在SQL Server数据库中，系统信息存储在系统数据库中，主要的系统数据库包括： master-从整体上控制用户数据库和SQL Server操作，在创建了任何用户定义的对象后，都要备份它 model-为新数据库提供模版和原型 msdb-包含了有关作业、报警及操作员等信息如果包含系统数据库的介质变了，那么必须重...

Access数据库最多大概能承受多少数据？

标签：编程语言网络编程

1、Access数据库最多大概能承受多少数据？ 2、50M大小的Access数据库如果转换成MYSQL大概需要多少数据库空间？如果转换成SQL2000大概需要多少空间呢？答: 1、ACCESS最大的数据库能到4G（我觉得这个是以前的理论，4G是fat32磁盘文件的限制，如果ntfs……）至于ACCESS数据库多大后你的系统运行不了了，那得看相关运行...

用MySQL创建数据库和数据库表