| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

AdoConnection

Mamed ©   (2004-03-26 10:13:00) 

ispolzuyu AdoConnection dlya soedeninya v SQL server 2000.
Connection String ustonovlivayu tak:
 s:='Provider=SQLOLEDB.1;Persist Security Info=False;';
 s:=s+'User ID='+UserName +';';
 s:=s+' Password='+UserPassword+';';
 s:=s+'Initial Catalog='+DatabaseName +';';
 s:=s+'Data Source='+Servername+';';
 s:=s+'Locale Identifier=1055;';
 s:=s+'Connect Timeout=900;';
 s:=s+'Use Procedure for ';
 s:=s+'Prepare=1;';
 s:=s+'Auto Translate=True;';
 s:=s+'Packet Size=4096;';
 s:=s+'Workstation ID='+Servername;
 AdoConnection1.Connectionstring=s
vse parametrı pravilnie.
(Servername,databasename,username,password)
No connection nikak ne mojet naxodit servera.V chem mojet bit problema?Pomogitre kto mojet.
Etimi je parametrami programma rabotatet v drugom kompe normalno.
U cliente est SQL 2000 Client tools

---

sniknik   (2004-03-26 10:32:00) [1]

Locale Identifier=1055 < уверен в значении? зачем все меняеш отлично от по умолчанию?

этого достаточно
AdoConnection1.Connectionstring:=
'Provider=SQLOLEDB.1;Password='+UserPassword+';Persist Security Info=True;User ID='+UserName+';Initial Catalog='+DatabaseName+';Data Source='+Servername;

(при условии конечно, что > vse parametrı pravilnie. ;о), в чем тоже сомнение)

---

Mamed   (2004-03-26 10:22:00) [2]

U menya problema ne v tom chtobi poymat osibku.problema v tom chto pochemu ne soedinyaetsya

---

stone   (2004-03-26 10:21:00) [3]

извиняюсь...
EditConnectionString(AdoConnection1)

---

stone   (2004-03-26 10:19:00) [4]

все гораздо проще

uses
 ADOConED;

...
if EditConnectionString(AdoConnection1.Connectionstring) then
 try
   AdoConnection1.Open;
 except
   // можно выдать сообщение об ошибке
 end;

---

Наверх