请问如何通过语句更改SQL账号登录方式? 由于用户在安装SQL时没有将系统默认的使用域账户更改为使用本地系统账户,请问在安装完成之后如何通过语句将其更改为使用本地系统账户? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 实验中把自己的sqlserver搞坏了。mk一下。 procedure TForm1.Button1Click(Sender: TObject);var Reg: TRegistry;begin Reg := TRegistry.Create; try Reg.RootKey := HKEY_LOCAL_MACHINE; if Reg.OpenKey('\SYSTEM\CurrentControlSet\Services\MSSQLSERVER', True) then Reg.WriteString('ObjectName','".\administrator"'); finally Reg.CloseKey; Reg.Free; inherited; end;end; 小改了下代码:procedure TForm1.Button1Click(Sender: TObject);var Reg: TRegistry; user:string;begin //最好这里来段关闭sqlserver服务的代码,服务运行时修改容易引发异常,我刚才就死在这里。 user:='LocalSystem'; //此值为本地帐户 user:='spsp\administrator' //域帐户,赋此值为域帐户登录 Reg := TRegistry.Create; try Reg.RootKey := HKEY_LOCAL_MACHINE; if Reg.OpenKey('\SYSTEM\CurrentControlSet\Services\MSSQLSERVER', True) then Reg.WriteString('ObjectName',user); finally Reg.CloseKey; Reg.Free; inherited; end;end;隐约感到,以此允许不用密码验证的对sqlserver帐户修改,似乎会有什么安全隐患。楼下的有兴趣,发表发表意见?user:='spsp\administrator' //域帐户,赋此值为域帐户登录 还有其它的比这更好的方法吗?如调用API相关函的,如没有就结贴了! 用户尝试在查询分析器里面使用sa来连接SQL Server,或者在企业管理器里面使用sa来新建一个SQL Server注册时,经常会遇到如图 2 所示的错误信息。该错误产生的原因是由于SQL Server使用了"仅 Windows"的身份验证方式,因此用户无法使用SQL Server的登录帐户(如 sa )进行连接。解决方法如下所示: 1、 在服务器端使用企业管理器,并且选择"使用 Windows 身份验证"连接上 SQL Server; 2、 展开"SQL Server组",鼠标右键点击SQL Server服务器的名称,选择"属性",再选择"安全性"选项卡; 3、 在"身份验证"下,选择"SQL Server和 Windows "。 4、 重新启动SQL Server服务。 在以上解决方法中,如果在第 1 步中使用"使用 Windows 身份验证"连接 SQL Server 失败,那么我们将遇到一个两难的境地:首先,服务器只允许了 Windows 的身份验证;其次,即使使用了 Windows 身份验证仍然无法连接上服务器。这种情形被形象地称之为"自己把自己锁在了门外",因为无论用何种方式,用户均无法使用进行连接。实际上,我们可以通过修改一个注册表键值来将身份验证方式改为 SQL Server 和 Windows 混合验证,步骤如下所示: 1、点击"开始"-"运行",输入regedit,回车进入注册表编辑器; 2、依次展开注册表项,浏览到以下注册表键:[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSSQLServer\MSSQLServer] 3、在屏幕右方找到名称"LoginMode",双击编辑双字节值; 4、将原值从1改为2,点击"确定"; 5、关闭注册表编辑器; 6、重新启动SQL Server服务。 此时,用户可以成功地使用sa在企业管理器中新建SQL Server注册,但是仍然无法使用Windows身份验证模式来连接SQL Server。这是因为在 SQL Server 中有两个缺省的登录帐户:BUILTIN\Administrators 以及 <机器名>\Administrator 被删除。要恢复这两个帐户,可以使用以下的方法: 1、打开企业管理器,展开服务器组,然后展开服务器; 2、展开"安全性",右击"登录",然后单击"新建登录"; 3、在"名称"框中,输入 BUILTIN\Administrators; 4、在"服务器角色"选项卡中,选择"System Administrators" ; 5、点击"确定"退出; 6、使用同样方法添加 <机器名>\Administrator 登录。 以下注册表键HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSSQLServer\MSSQLServer\LoginMode 的值决定了SQL Server将采取何种身份验证模式。该值为1,表示使用Windows 身份验证模式;该值为2,表示使用混合模式(Windows 身份验证和 SQL Server 身份验证)。 看来只有这种方法可能解决,如能用API解决就好,问题解决了,就此结贴吧,谢谢各位好心人! FileExists帮忙改c++builder版的代码为delphi版 求大家帮我写个简单的报表,唉头疼!!!在线等!!! 如何设计接口解析文件 菜鸟急问个小问题 急:请问能用soap协议实现不基于web service的数据传输吗? 挑战你的DELPHI水平 关于dbgrideh标题的问题 如何锁定dbgrid前两列数据? 各位了老大,谁能告诉我delphi6从入门到精通的原程序的下在网址啊,急!!! 谁救我? 为什么LoadXMLDocument在线程类中使用会报错? DELPHI 函数请求帮忙解释
mk一下。
var
Reg: TRegistry;
begin
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_LOCAL_MACHINE;
if Reg.OpenKey('\SYSTEM\CurrentControlSet\Services\MSSQLSERVER', True)
then Reg.WriteString('ObjectName','".\administrator"');
finally
Reg.CloseKey;
Reg.Free;
inherited;
end;
end;
var
Reg: TRegistry;
user:string;
begin
//最好这里来段关闭sqlserver服务的代码,服务运行时修改容易引发异常,我刚才就死在这里。
user:='LocalSystem'; //此值为本地帐户
user:='spsp\administrator' //域帐户,赋此值为域帐户登录
Reg := TRegistry.Create;
try
Reg.RootKey := HKEY_LOCAL_MACHINE;
if Reg.OpenKey('\SYSTEM\CurrentControlSet\Services\MSSQLSERVER', True)
then Reg.WriteString('ObjectName',user);
finally
Reg.CloseKey;
Reg.Free;
inherited;
end;
end;隐约感到,以此允许不用密码验证的对sqlserver帐户修改,似乎会有什么安全隐患。楼下的有兴趣,发表发表意见?
user:='spsp\administrator' //域帐户,赋此值为域帐户登录