公司总机:0769-86215755
虚拟主机,主页空间,国际域名,asp空间,论坛空间,论坛主机,asp.net空间,主机租用,空间,网站空间,服务器租用,主机租用,服务器托管,主机托管,网页空间,网络空间 虚拟主机,主页空间,国际域名,asp空间,论坛空间,论坛主机,asp.net空间,主机租用,空间,网站空间,服务器租用,主机租用,服务器托管,主机托管,网页空间,网络空间 虚拟主机,主页空间,国际域名,asp空间,论坛空间,论坛主机,asp.net空间,主机租用,空间,网站空间,服务器租用,主机租用,服务器托管,主机托管,网页空间,网络空间
 首   页   域名注册   虚拟主机   主机托管    网页设计    企业邮局   双线主机    代理申请   帮助中心    购物车
虚拟主机,主页空间,国际域名,asp空间,论坛空间,论坛主机,asp.net空间,主机租用,空间,网站空间,服务器租用,主机租用,服务器托管,主机托管,网页空间,网络空间
  中国民网 -=> 服务器托管 -=> 正文 欢迎光临中国民网。
 
 

SQLServer身份验证管理子程序

 最近发现很多客户的程序使用SQLServer身份验证管理,出现很多验证失败,无法验证的问题,我们特总结了一段子程序,建议使用万网NT系统的独立服务器用户配置测试:

Option Compare Database
Public appAccess As Access.Application

Sub 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, pwd
End Sub

Sub 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 = Nothing
End Sub

Sub CallSQLDMOWindowsLogin()
Dim srvname As String
' 设置 Windows 登录参数
srvname = "(local)"    -----修改成您数据服务器或者127.0.0.1
SQLDMOWindowsLogin srvname
End Sub

Sub 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 = Nothing
End Sub

Sub CallChangeServerAuthenticationMode()
Dim constAuth As Byte
' 设置 constAuth 参数为:
' SQLDMOSecurity_Integrated 为 Windows Authentication 模式
' SQLDMOSecurity_Mixed 为 Mixed Authentication 模式
' 设置 constAuth 的默认值
constAuth = SQLDMOSecurity_Mixed
' 调用改变 SQL Server 身份认证模式的方法
ChangeServerAuthenticationMode constAuth
End Sub

---------------------------------------------------------------
上一篇:ARP协议原理

下一篇:网站的防盗链系统是如何做的?

欢迎转载<<SQLServer身份验证管理子程序>>,转载时请注明来自己虚拟主机中国民网

 

 
ASP空间 | 关于我们 | 新闻中心 | 合作伙伴 | 联系方式 | 网站地图 | 付款信息 | 机房环境 | 虚拟主机

合作伙伴
 

中国广东:东莞市南城区国际商会大厦3A09 销售专线:0769 - 86215755 85795999 22772907 本站3721网络实名:网页空间
主机托管咨询电话:0769-85795999 夜间值班电话:13712017908 传真:0769-86215756

版权所有:中国民网 严禁复制 工商注册号:4419002009137 粤ICP备05127709号