请问怎么登录服务器 客户端ADO连接服务数据库必须先登录服务器. 有什么方法解决吗? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 加一個連接服務器控件有TADOConnection或TDatabase或ADODataSet1先登錄服務器一次,然後修改它們的屬性LonginPrompt-->false但你還得設一下屬性Params-->添加user name和password這樣就OK了 我说的不是那个,楼上的理解错啦! 我已经用TADOConnection连接了好了服务器数据库. 我说的是:每次重启客户端,都要先登录服务器才能连接数据库.是输入服务器的用户密码登录.不是你说的要重新输入服务器数据库的用户密码连接数据库.难道你们没有遇到过这样的问题吗.这下应该说清楚了吧! 设置服务器登陆用windows用户登陆啊 那样就不用了 更改SQL SERVER 的认证模式为SQL+NT认证 SQL服务器登陆肯定要用SQL+NT认证模式的。否则你代码没办法写。改改吧。 原因是用到ODBC,选择system DSN选择SQL server输入一个名称,选择你的SQL server。下一个画面里选择你的SQL认证方式,输入用户名及密码。在Client Config里选则TCP/IP后面就是一些很简单的选项。应该明白了吧,你在建立连接时请选择表名,在输入密码后的一个画面上选change the default database to,然后选你所要用的表,用Tcp/Ip访问,配置连接时要用IP不能用计算机名。就不会出现那个问题了。 我的连接方式是这样的 FileName := GetCurrentDir() + '\DB.ini'; IniFile := TIniFile.Create(FileName); ServerName := IniFile.ReadString('DB', '服务器名', ''); dataname := IniFile.ReadString('DB', '数据库名', ''); username := IniFile.ReadString('DB', '用户名', ''); userpwd := IniFile.ReadString('DB', '密码', ''); ADOConnection1.LoginPrompt:=false; Connstr := 'Provider=SQLOLEDB.1;Password=' + userpwd + ';Persist Security Info=True;User ID='; Connstr := Connstr + username + ';Initial Catalog=' + dataname + ';Data Source='+ServerName ; ADOConnection1.ConnectionString:=Connstr; try begin ADOConnection1.Connected := true; end; except showMessage('数据库连接失败,请重新配置数据库!'); end; 用控制面板的ODBC--->system DSN--->SQL server--->名稱--->Client Config---->NetWork Libraries---->TCP/IP---->Server alias(名稱)--->Server Name(IP地址)--->Login ID:--->Password--->Change the default database to(表)--->下一步--->完成 请问怎么更改SQL SERVER 的认证模式为SQL+NT认证.是不是在SQL SERVER安装的时候设置 ORACLE数据库中的 group by 语句? 如何判断动态生成的tabsheet是否存在? 缺少dxCntner.pas 是怎么回事,急! 请教delphi多线程技术监控多个串口 多线程的问题,帮忙 ado问题,请指教 网络通讯问题,TcpServer和Tcpclient 现在工作好烦!!!!!! help:日期增加函数呀, 两个线程同时处理一个memo会出问题吗? 请用Delphi写一个函数对数组变量ArrMdChip进行排序(要求:排序算法不限,但效率优先)。谢谢!! 兄弟姐妹们,上海的"福建大陆桥电脑公司"你们了解吗?恳请大家告诉我这家公司的情况.
先登錄服務器一次,然後修改它們的屬性LonginPrompt-->false
但你還得設一下屬性Params-->添加user name和password
這樣就OK了
不是你说的要重新输入服务器数据库的用户密码连接数据库.难道你们没有遇到过这样的问题吗.
这下应该说清楚了吧!
FileName := GetCurrentDir() + '\DB.ini';
IniFile := TIniFile.Create(FileName);
ServerName := IniFile.ReadString('DB', '服务器名', '');
dataname := IniFile.ReadString('DB', '数据库名', '');
username := IniFile.ReadString('DB', '用户名', '');
userpwd := IniFile.ReadString('DB', '密码', ''); ADOConnection1.LoginPrompt:=false;
Connstr := 'Provider=SQLOLEDB.1;Password=' + userpwd + ';Persist Security Info=True;User ID=';
Connstr := Connstr + username + ';Initial Catalog=' + dataname + ';Data Source='+ServerName ; ADOConnection1.ConnectionString:=Connstr; try
begin
ADOConnection1.Connected := true;
end;
except
showMessage('数据库连接失败,请重新配置数据库!');
end;
NetWork Libraries---->TCP/IP---->Server alias(名稱)--->Server Name(IP地址)--->Login ID:--->Password--->Change the default database to(表)--->下一步--->完成