Bei Setup mit InnoSetup festellen ob Datenbank lokal

**norwegen60**

Hallo zusammen,

bei der Installation eines Programms gebe ich die Möglichkeit eine lokale MsSQL-Datenbank und eine zentrale MsSQL-Datenbank anzugeben. Wie kann ich feststellen ob:

die erste Datenbank wirklich lokal liegt
die beiden Datenbanken nicht dieselben sind

Man könnte die Hostverbindung ja einmal mit LOCALHOST und einmal mit PC-03-TEST angeben und beides ist der lokale PC

Vielen Dank für schnelle Hilfe

Gerd

**mkinzler**

Einfach sämtlich lokalen IP-Adressen ermitteln und mit aufgelösten Servernamen vergleichen.

**norwegen60**

Und wie mache ich das in InnoSetup?

**mkinzler**

Mit einem externen Programm, welches vom Setup temporär entpackt und ausgeführt wird.

**norwegen60**

Ich glaube ich habe eine einfachere Möglichkeit gefunden.

markieren

Delphi-Quellcode:

			sPcName = lowercase(GetComputerNameString);  

if (pos(sPcName, lowercase(sServerName)) > 0) or      // PC-Name Teil des Servernamens

   (pos('local', lowercase(sServerName)) > 0) or      // LOCAL Teil des Servernamens, z.B. LOCALHOST

   (pos('127.0.0.1', sServerName) > 0) then               // 127.0.0.1 des Servernamens

      MsgBox('Angegebener Server ist lokaler Server', mb_Infomation, MB_OK);

Oder spricht da was dagegen?

Bei Setup mit InnoSetup festellen ob Datenbank lokal

Bei Setup mit InnoSetup festellen ob Datenbank lokal

AW: Bei Setup mit InnoSetup festellen ob Datenbank lokal

AW: Bei Setup mit InnoSetup festellen ob Datenbank lokal

AW: Bei Setup mit InnoSetup festellen ob Datenbank lokal

AW: Bei Setup mit InnoSetup festellen ob Datenbank lokal

Forumregeln

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.851 Beiträge Delphi 11 Alexandria	#2 AW: Bei Setup mit InnoSetup festellen ob Datenbank lokal 21. Jan 2016, 15:57 Einfach sämtlich lokalen IP-Adressen ermitteln und mit aufgelösten Servernamen vergleichen. Markus Kinzler
	Zitat

norwegen60 Registriert seit: 23. Dez 2007 Ort: Schwarzwald 504 Beiträge Delphi 12 Athens	#3 AW: Bei Setup mit InnoSetup festellen ob Datenbank lokal 21. Jan 2016, 16:41 Und wie mache ich das in InnoSetup?
	Zitat

mkinzler (Moderator) Registriert seit: 9. Dez 2005 Ort: Heilbronn 39.851 Beiträge Delphi 11 Alexandria	#4 AW: Bei Setup mit InnoSetup festellen ob Datenbank lokal 21. Jan 2016, 16:45 Mit einem externen Programm, welches vom Setup temporär entpackt und ausgeführt wird. Markus Kinzler
	Zitat