چگونه در دلفی بفهمیم SQL نصب شده است

[omidaligoo]

سلام میخواستم بدونم که در دلفی چه طور میتونم کدی رو بنویسک که با اون بفهمم آیا sql server نصب شده یا نه؟
و یک کد که بفمم دیتا بیس من تو پایگاه داده اتچ شده یا نه؟

[vcldeveloper]

لزومی نداره که SQL Server حتما روی همون سیستمی نصب باشه که برنامه هم روی اون نصبه. SQL Server ممکنه روی هر سیستمی که از طریق شبکه در دسترس هست، نصب باشه. برای پیدا کردن اینکه آیا SQL Server ایی به صورت لوکال یا داخل یک شبکه محلی در حال اجرا هست، یا نه؛ در این تالار چندین تاپیک و چندین نمونه کد وجود داره.

[omidaligoo]

شلام من نمیدونم چی رو جستجو کنم ولی خودم یک قطعه کد میخوام تا 1 ببینه دیتا بیس در سیستم لوکال هست و 2 ببینه آیا دیتا بیس مورد نظر attach شده یا نه؟

[az-navaei]

procedure TFConvertor.BAttach;
var
AdoTemp:TADOQuery;
ADOCMaster:TADOConnection;
exepath:string;
begin
AdoTemp:=TADOQuery.Create(Self);
ADOCMaster:=TADOConnection.Create(self);
ADOCMaster.Close;
ADOCMaster.LoginPrompt:=false;
ADOCMaster.ConnectionString:='Provider=SQLOLEDB.1; Password='+MESqlPass.Text+';Persist Security Info=True;User ID='
+ESqlUser.Text+';Initial Catalog=master;Data Source='+ESqlServer.Text;
ADOTemp.Connection:=ADOCMaster;
ADOTemp.Close;
ADOTemp.SQL.Text:='USE master SELECT DB_NAME(dbid) AS DB_NAME '
+' FROM sysdatabases '
+' Where DB_NAME(dbid)='+#39+ESqlBank.Text+#39;
ADOTemp.Open;
if ADOTemp.RecordCount <=0 then
begin
ADOCommand:=TADOCommand.Create(Self);
ADOCommand.Connection:=ADOCMaster;
ADOCommandExec('EXECUTE sp_attach_db @dbname = N'+#39+ESqlBank.Text+#39+','
+' @filename1 = N'+#39+EMasirBankFile.Text+EDataFile.Text+#39+','
+' @filename2 = N'+#39+EMasirBankFile.Text+ELodFile.Text+#39) ;
ADOCommand.Destroy;
MessageDlg('. بانك اطلاعاتي متصل شد',mtInformation,[mbOK],0);
end
else
MessageDlg('بانك اطلاعاتي متصل است',mtInformation,[mbOK],0);

AdoTemp.Destroy;
ADOCMaster.Destroy;

end;


اول ميبينه ديتابيس attach شده يا نه اگر نه attach مي كنه.

سوال اولتون را هم نمي دونم جستجو كنيد اگر پيدا كردين بنويسين تا ما هم استفاده كنيم