客户端ADO连接服务数据库必须先登录服务器. 有什么方法解决吗?
解决方案 »
- 求教,DELPHI在中文输入法状态,输入框输入第一个字符返回英文,第二个字符才进入输入法
- delphi如何访问webbrowser网页中的多维数组
- 小问题
- 招全/兼职Delphi网页数据采集系统制作人员
- IIS7以后对ISAPI的支持有变化?
- 能不能在一个事件处理过程中屏蔽另一个事件?
- 如何根据服务器名获取对应的服务端口号?
- 给出代码的 ghostmirror 大哥, 进来拿分!
- Delphi 有没有和 C++ 中 try、catch 类似的功能
- 用powerdesigner输出RTF或HTM格式report时,中文出现乱码?高手指点
- 请用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(表)--->下一步--->完成