Installshield ile Setup Projesi Hazırlamada Yardımmm

[vbn]

Delphi ile bir otel rezervasyon programı yazdım ve bu benim bitirme projem. Ancak Setup'ını yapamıyorum. SQL'e erişim yok şeklinde bir hata ile karşılaşıyorum.

Veritabanı için SQL Server 2005'i kullandım. SQL'e erişim için de ADOConnection bileşenini kullanıyorum. SQL'e de OEM-02\SQLEXPRESS yolu üzerinden bağlanıyor. Ama başka bir bilgisayarda başka SQL bağlantısı başka bir isimle yapıldığından hata veriyor.

Bu durumda benim sanırım Object/Merge Modules bölümünde yapacağım bir ayar yok.

ODBC Resources bölümünde bir ayar yapmam lazım sanırım. Access'e yapılan bir bağlantıyı gösteren örnekte burada yapılmıştı. Ancak orada alias tanımlanıyor. Benim SQL için yapmam gereken nedir?

Yardımcı olursanız sevinirim..

[kahraman1285]

Size tavsiye kullandığınız AdoConnectionString ifadesini bir ini dosyasına yazdırın.

Ver her program açılışında connectionstring değerini buradan alsın.
Eğer kurulumu siz bizzat yapmayacaksanız program kurulumundan sonraki ilk açılışta programı yükleyenden bilgisayar adını istesin ona göre tekrar connectiostring oluşturup ini dosyası içerisine yazdırsaın.

Eğer kurulumu siz yapıyorsanız connection stringin bulunduğu dosyayı kopyalayın ve sadece bilgisayar adını manuel değiştirin.

[sabanakman]

Şöyle bir yapıda bu işi daha pratik bir şekilde çözebilirsiniz.

Kod: Tümünü seç

Sifre:='???';
SQLKullanici='sa';
DBAdi:='master';
DataSource:='Anamakina\SQLExpress';
ADOConn.ConnectionString:=Format('Provider=SQLOLEDB.1;Password=%s;Persist Security Info=True;User ID=%s;Initial Catalog=%s;Data Source=%s',[Sifre,SQLKullanici,DBAdi,DataSource]);

gibi bir yapı daha esnek ve kullanımı kolay olacaktır.

[kaank]

bir ini oluştur

[Veritabani]
Server=KAANK\SQLEXPRESS
User=sa
Pass=sifre

gibi daha sonra adoconnectionu connected yaptığın yere

Kod: Tümünü seç

var
  KaanINI: TIniFile;
  Yol : String; 
  DBUser,DBPass:String;
begin
  Yol:=ExtractFilePath(ParamStr(0));
  KaanINI  := TIniFile.Create(yol+'/Database.ini');
  hostname := kaanINI.ReadString('Veritabani','Server','');
  DBuser:=kaanINI.ReadString('Veritabani','User','');
  DBpass:=kaanINI.ReadString('Veritabani','Pass','');

ADOConn.ConnectionString:= 'Provider=SQLOLEDB.1;Password='+DBpass+';Persist Security Info=True;User ID='+DBuser+';Initial Catalog=XXX;Data Source='+hostname+';Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=KAANK;Use Encryption for Data=False;Tag with column collation when possible=False';

ADOConn.Open(DBUser,DBPass);

sorun çıkarsa yaz düzeltelim

[vbn]

Yardımlarınız için hepinize çok teşekkürler...
Bunun için çok uzun zaman harcamıştım... Sonunda nasıl yapılacağını buldum... Tekrar teşekkürler...