请教,
如何在Delphi获取sql server的服务器名?
adoconnection怎么和sql实现动态连接,
不同的机子sql server 的连接不同,
有的在连接时,选择windows 身份验证,有的选择Sql server身份验证
这样连接时,是不是要判断对方机子采用哪种连接?
能否写出代码?谢谢!!!
如何在Delphi获取sql server的服务器名?
adoconnection怎么和sql实现动态连接,
不同的机子sql server 的连接不同,
有的在连接时,选择windows 身份验证,有的选择Sql server身份验证
这样连接时,是不是要判断对方机子采用哪种连接?
能否写出代码?谢谢!!!
解决方案 »
- 报表问题,想把明细合并
- 关于字体背景。。。。待牛人解决
- [Error] dlzpas.pas(106): Cannot assign to a read-only property 什么意思
- QRDBText如何设置数据格式为 ###,###,##0.###???
- 求教:wise安装程序制作完后,无法删除程序组名称,程序部分全部删除了,不知如何解决
- 求一随机数问题
- TListView中选择光条的问题
- 请各位现在在沿海奋战的兄弟们把那边的人才招聘情况讲一下
- 为什么delphi6生成的.exe文件拿到别的电脑就不能运行? 有什么可以解决的办法吗?
- 如何创建一个ODBC的System DSN?
- 请教一条数据库语句SQL?
- 如何对库里的记录进行完全匹配的查找?
2.判断本地SQL的验证方式
说明:,以下注册表键::
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\MSSQLServer\MSSQLServer\LoginMode
的值决定了SQL Server将采取何种身份验证模式.
1、表示使用"Windows 身份验证"模式
2、表示使用混合模式(Windows 身份验证和 SQL Server 身份验证).
没测试,楼主自已适当调整一下!
Uses
Registry
Var
myReg:TRegistry;
sAdoConString:String;
Begin
If ADOConnection.Connected Then
ADOConnection.Connected := False;
myReg:=TRegistry.Create;
Try
myReg.RootKey:=HKEY_LOCAL_MACHINE;
If myReg.OpenKey('上述键值',True) then
If myReg.ReadString('LoginMode')='1' then
sAdoConString:='Windows验证字符串';
If myReg.ReadString('LoginMode')='2' Then
sAdoConString:='混合验证字符串';
Finally
myReg.CloseKey;
myReg.Free;
End;
Adoconnection.ConnectionString:=sAdoConString
Try
Adoconnection.connected:=true
Except
ShowMessage('连接失败');
End;
http://topic.csdn.net/t/20030810/23/2130991.html