&;middot;教你配置OSPF动态路由协议的身份验证&;middot;配置用于身份验证和授权的RADIUS服务器&;middot;Solaris 10实现安全Kerberos身份验证&;middot;ASP.NET中的窗体身份验证&;middot;ASP.NET中的Windows身份验证&;middot;SQL Server 2000 身份验证与安全控制(1)&;middot;ISA防火墙中的防火墙客户身份验证&;middot;PHP中使用crypt()实现用户身份验证&;middot;Apache中实现身份验证和访问控制(1)&;middot;SQL Server 2000 身份验证与安全控制(2)Option Compare DatabasePublic appAccess As Access.ApplicationSub CallSQLDMOSQLServerLogin() Dim srvname As String Dim suid As String Dim pwd As String ' 设置 SQL Server 的登录参数 srvname = "(local)" 'suid = "sa" 'pwd = "" ' 调用 SQL Server 登录过程 SQLDMOSQLServerLogin srvname, suid, pwdEnd SubSub SQLDMOSQLServerLogin(srvname As String, suid As String, pwd As String) Dim srv1 As SQLDMO.SQLServer ' 新建一个服务器实例 Set srv1 = New SQLDMO.SQLServer ' 调用 SQL Server 登录连接方法 srv1.Connect srvname, suid, pwd ' 断开连接 srv1.Disconnect Set srv1 = NothingEnd SubSub CallSQLDMOWindowsLogin() Dim srvname As String ' 设置 Windows 登录参数 srvname = "(local)" SQLDMOWindowsLogin srvnameEnd SubSub SQLDMOWindowsLogin(srvname As String) Dim srv1 As SQLDMO.SQLServer ' 新建一个服务器实例 Set srv1 = New SQLDMO.SQLServer ' 在调用前，设置 LoginSecure 属性为 True ' 使用服务名进行连接 srv1.LoginSecure = True srv1.Connect srvname ' 断开连接 srv1.Disconnect Set srv1 = NothingEnd SubSub CallChangeServerAuthenticationMode() Dim constAuth As Byte ' 设置 constAuth 参数为： ' SQLDMOSecurity_Integrated 为 Windows Authentication 模式 ' SQLDMOSecurity_Mixed 为 Mixed Authentication 模式 ' 设置 constAuth 的默认值 constAuth = SQLDMOSecurity_Mixed ' 调用改变 SQL Server 身份认证模式的方法 ChangeServerAuthenticationMode constAuthEnd Sub
您可能对 [SQL Server] 的这些文章也感兴趣：