Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > Firebird e Interbase
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 29-09-2005
Cuevas Cuevas is offline
Miembro
 
Registrado: abr 2005
Posts: 10
Poder: 0
Cuevas Va por buen camino
Script Con Inno setup para Interbase

Hola Amigo he estado haciendo un instlador para una aplicaion que trabaja con InterBase pero no me funciona el pues me parece que no estoy madando todos los archivos necesarios para que Interbase pueda trabar con la base de datos me podrian decir que archivos son inmpresindibles para el funcionamiento si no soy muy claro por favor diganmelo muchas gracias de antemano
__________________
Sabio no es el que abunda en conocimiento
Sabio es el que sabe usar 'Bien' lo poco que conoce
Responder Con Cita
  #2  
Antiguo 29-09-2005
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Poder: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Para mí tengo que entre los resultados de esta búsqueda vas a encontrar lo que precisas.
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita
  #3  
Antiguo 30-09-2005
Cuevas Cuevas is offline
Miembro
 
Registrado: abr 2005
Posts: 10
Poder: 0
Cuevas Va por buen camino
Gracias David, sin embargo ha consutado alguna cosas que encontrado aqui mismo pero aun asi no me funciona bien la instalacion que es lo que pasa no lose, pero resulta que si tengo intalado Interbase y para ver si funciona el intalador con InnoSetup lo desintalo lo intalo junto con mi aplicacion nuevamente y funciona, el proble es que si realizo la misma intalacion en una maquina que nunca se ha intaldo interbase este intalador ya no me funciona, pienso que existe algun archivo que interbase necesita. pero no se cual es????
__________________
Sabio no es el que abunda en conocimiento
Sabio es el que sabe usar 'Bien' lo poco que conoce
Responder Con Cita
  #4  
Antiguo 30-09-2005
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Poder: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

Me temo que no voy a poder ayudarte mucho, pero, ¿cuando dices que no te funciona qué quieres decir? Me explico. Si obtienes algún error, ¿cuál es el mensaje de error que obtienes? Creo que cuanta más información puedas proporcionar más sencillo será que alguien con conocimiento sobre el tema pueda echarte el cable que necesitas. ¿Verdad?
__________________
David Esperalta
www.decsoftutils.com
Responder Con Cita
  #5  
Antiguo 03-10-2005
Cuevas Cuevas is offline
Miembro
 
Registrado: abr 2005
Posts: 10
Poder: 0
Cuevas Va por buen camino
Unhappy

El intalador copia todos estos archivos

----------------------------------------------

Source: ibconfig; DestDir: {app}
Source: bin\ibserver.exe; DestDir: {app}\bin
Source: interbase.msg; DestDir: {app}
Source: isc4.gdb; DestDir: {app}
Source: isc4.gbk; DestDir: {app}
Source: gds32.dll; DestDir: {sys}
Source: msvcrt.dll; DestDir: {sys}
Source: bin\instreg.exe; DestDir: {app}\bin
Source: bin\ibguard.exe; DestDir: {app}\bin

----------------------------------------------

y al finalizar la instalacion se ejecuta


----------------------------------------------

Filename: {app}\bin\instreg.exe; Parameters: "install ""{app}"""; Flags: nowait runminimized
Filename: {app}\bin\ibguard.exe; Flags: nowait

----------------------------------------------


El guardian se jecuta sin problemas pareciera que todoesta bien
pero al momento de utilizar la base de datos no lo reconoce como una vace de datos valida.

pero si utlizo el intalador propio de interbase en una maquina "PC-1" funciona perfectamente luego desintalo interbase para hacer la prueba con el intalador hecho en innosetup , funciona exelentemente no hay problema, el problema se cuando intento intalar en tro maquina que no haya instalado intebase antes.

pienso que existe algun archivo que no estoy mandando a copiar, per que este se guarda en algun lugar que no es visible fasilmente si alguien sabe que es lo que me falta copiar por favor les pido que me ayuden. muchas gracias.
__________________
Sabio no es el que abunda en conocimiento
Sabio es el que sabe usar 'Bien' lo poco que conoce
Responder Con Cita
  #6  
Antiguo 05-10-2005
Toni Toni is offline
Miembro
 
Registrado: may 2003
Ubicación: Barcelona - España
Posts: 364
Poder: 21
Toni Va por buen camino
Hola,

Yo hace poco tambien consulte el foro en busca de informacion para realizar una instalacion de IB6 silenciosa conjuntamente con mi aplicación. Los ejemplos que encontre tanto en el foro como en las paginas dedicadas a interbase (para innosetup) no me han funcionado muy bien que se diga.

El motivo es que la instalacion de IB6 difiere en algunos aspectos segun en el sistema en el que lo vamos a instalar (W95/98, NT/W2K, XP).

He comparado los scritps y cada uno contempla algunas cosas que los otros no, claves en el registro y otras cosas.

Yo al final he decidido incluir en mi instalacion la instalacion original del IB6 empaquetado dentro de mi setup y se ejecuta automaticamente.

De todas formas aqui te incluyo el ejemplo mas completo que he encotrado.

Un saludo,



Cita:
; This script was first created by ISTool
; http://www.lerstad.com/istool/

; adaptation Claude GUTH

; Script d'installation d'une application IB 6

[Registry]
;enlever le commentaire de la clé ci-dessous si vous voulez que le serveur démarre avec le boot
;Root: HKLM; Subkey: Software\Microsoft\Windows\CurrentVersion\Run; ValueType: string; ValueName: InterBaseGuardian; ValueData: {app}\bin\ibguard.exe; Flags: uninsdeletekey

;Root: HKLM; Subkey: Software\Borland\InterBase; ValueType: DWord; ValueName: UseCount; ValueData: {reg:HKLM\Software\Borland\InterBase, UseCount|0} + 1
;Root: HKLM; Subkey: Software\Borland\InterBase\CurrentVersion; ValueType: DWord; ValueName: UseCount; ValueData: {reg:HKLM\Software\Borland\InterBase\CurrentVersion, UseCount|0} + 1
Root: HKLM; Subkey: Software\Borland\InterBase\CurrentVersion; ValueType: string; ValueName: GuardianOptions; ValueData: 1
Root: HKLM; Subkey: Software\Borland\InterBase\CurrentVersion; ValueType: string; ValueName: RootDirectory; ValueData: {app}\
Root: HKLM; Subkey: Software\Borland\InterBase\CurrentVersion; ValueType: string; ValueName: ServerDirectory; ValueData: {app}\bin

[Types]
Name: "Serveur"; Description: "Installation avec serveur en local"
Name: "ServeurMini"; Description: "Installation compacte avec serveur en local"
Name: "Client"; Description: "Installation en application client"
Name: "ClientMini"; Description: "Installation compacte en application client"

[Components]
Name: "Client"; Description: "Application en client"; Types: Client ClientMini Serveur ServeurMini; Flags: fixed
Name: "Serveur"; Description: "Application avec serveur sur le poste"; Types: Serveur ServeurMini
Name: "Administration"; Description: "Outils d'administration"; Types: Serveur
Name: "Documentation"; Description: "Documentation IB"; Types: Serveur

[Files]
;Mon application
;Source: c:\Program Files\Borland\Delphi5\Reso lib\IBFacilitator\TestIBFacilitator.exe; DestDir: c:\temp
;Ma base
;Source: c:\temp\test.gdb; DestDir: c:\temp
;Fichiers Interbase
Source: ibconfig; DestDir: {app}; Components: Serveur
Source: interbase.msg; DestDir: {app}
Source: isc4.gdb; DestDir: {app}; CopyMode: onlyifdoesntexist; Flags: uninsneveruninstall; Components: Serveur
Source: isc4.gbk; DestDir: {app}; CopyMode: onlyifdoesntexist; Flags: uninsneveruninstall; Components: Serveur
Source: bin\ibguard.exe; DestDir: {app}\bin; Components: Serveur
Source: bin\ibserver.exe; DestDir: {app}\bin; Components: Serveur
Source: gds32.dll; DestDir: {sys}
Source: msvcrt.dll; DestDir: {sys}
;le fichier suivant est à extraire de la distribution
Source: license.htm; DestDir: {app}
;Utilitaire installation service pour NT/2000
Source: bin\instsvc.exe; DestDir: {app}; Components: Serveur; MinVersion: 0, 4.0
;Fichiers IBConsole {mis en commentaire pour gain de place}
; Source: bin\IBConsole.exe; DestDir: {app}\bin; Components: Administration
;Fichiers Documentation {mis en commentaire pour gain de place}
; Source: bin\IBConsole.hlp; DestDir: {app}\bin; Components: Documentation
; Source: bin\IBConsole.cnt; DestDir: {app}\bin; Components: Documentation
; Source: bin\IBGloss.hlp; DestDir: {app}\bin; Components: Documentation
; Source: bin\IBGloss.cnt; DestDir: {app}\bin; Components: Documentation
; Source: bin\IBServer.hlp; DestDir: {app}\bin; Components: Documentation
; Source: bin\IBServer.cnt; DestDir: {app}\bin; Components: Documentation
; Source: bin\Perform.hlp; DestDir: {app}\bin; Components: Documentation
; Source: bin\Perform.cnt; DestDir: {app}\bin; Components: Documentation
; Source: bin\SQLRef.hlp; DestDir: {app}\bin; Components: Documentation
; Source: bin\SQLRef.cnt; DestDir: {app}\bin; Components: Documentation

[Dirs]
;Name: {app}\bin

[Run]
;Lance le serveur sous Win9x, sous NT/2000 démarrer le service ibserver
Filename: {app}\bin\ibguard.exe; Flags: nowait; MinVersion: 4.0, 0
;Utilitaire installation service pour NT/2000
Filename: {app}\bin\instsvc.exe; Flags: nowait; MinVersion: 0, 4.0

[Setup]
;
AppName=Test installation application IB6
AppCopyright=Claude GUTH, Inprise
;SourceDir=C:\Program files\Interbase Corp\Interbase
DefaultDirName={pf}\Borland\InterBase
AppVerName=Test IB 6.0
DefaultGroupName=Test Install IB6
;
;OutputDir=c:\temp\output
;MessagesFile=compiler:France.isl
DisableProgramGroupPage=false
AllowNoIcons=true
;inhibe l'installation si IB actif
;AppMutex=ibserver
;privilèges d'administrateur requis pour l'installation serveur sur NT/2000
AdminPrivilegesRequired= yes
; Components: Serveur

[UninstallRun]
;Filename: {app}\bin\instreg.exe; Parameters: remove; Flags: runminimized
__________________
Saludos,

Bitman
Responder Con Cita
  #7  
Antiguo 05-10-2005
cahp cahp is offline
Miembro
 
Registrado: may 2003
Ubicación: Alicante
Posts: 90
Poder: 21
cahp Va por buen camino
Código:
   
 try
           IBInstall1.SourceDirectory := ExtractFilePath(Application.ExeName) + 'Interbase';
           IBInstall1.InstallCheck;
           IBInstall1.InstallExecute;
           WinExecNoWait32(IBInstall1.DestinationDirectory + '\Bin\ibserver.exe',SW_SHOWNORMAL);
        Except
            ' lanzas un mesaje, o bien no se ha podido instalar o ya esta instalado'
end;
Con esto instalo el servidor compiando en el cd de instalacion en el la carpeta donde esta el ejecutable/interbase los ficheros de intalacion. IBInstall lo encontraras en la palete Interbas Admin.


Esto otro es el script de instalacion de Inno setup que uso para firebird:
Código:
; Script generated by the Inno Setup Script Wizard.
; SEE THE DOCUMENTATION FOR DETAILS ON CREATING INNO SETUP SCRIPT FILES!

[Setup]
AppName=Nombre de la aplicacion
AppVerName=Nombre y version
AppPublisher=Nombre empresa
AppPublisherURL=pagina web
AppSupportURL=pagina web
AppUpdatesURL=pagina web
DefaultDirName=c:\hf\
DisableDirPage=yes
DefaultGroupName=Nombre del grupo de programas
;InfoBeforeFile=licencia.txt
OutputBaseFilename=instalación
Compression=lzma
SolidCompression=yes

[Languages]
Name: "es"; MessagesFile: "compiler:languages\SpanishStd-2-5.1.0.isl"

[Tasks]
Name: "desktopicon"; Description: "{cm:CreateDesktopIcon}"; GroupDescription: "{cm:AdditionalIcons}"; Flags: unchecked

[Files]
Source: "C:\hf\Instalador\hf\*"; DestDir: "{app}"; Flags: ignoreversion recursesubdirs createallsubdirs
; NOTE: Don't use "Flags: ignoreversion" on any shared system files

[Icons]
Name: "{group}\Nombre aplicacion"; Filename: "{app}\ejecutable con la ruta completa"
Name: "{group}\{cm:UninstallProgram,Nombre aplicacion}"; Filename: "{uninstallexe}"
Name: "{userdesktop}\Nombre aplicacion"; Filename: "{app}\ejecutable con la ruta completa"; Tasks: desktopicon


[Run]
Filename: "{app}\Firebird.exe"; Description: "{cm:LaunchProgram,Servidor firebird}"; Flags: skipifsilent
Filename: "{app}\ejecutable con la ruta completa"; Description: "{cm:LaunchProgram,Nombre aplicacion}"; Flags: postinstall skipifsilent
Espero haber contribuido en en algo, si tienes dudas, no dudes en pantearlas.

Saludos

Claudio Herrador.
Responder Con Cita
  #8  
Antiguo 10-10-2005
Cuevas Cuevas is offline
Miembro
 
Registrado: abr 2005
Posts: 10
Poder: 0
Cuevas Va por buen camino
Muchas Gracias con este material boy a poder trabajar, gracia a la ayuda que me dieron cual quir cosa boy a consultarlos he muchas gracias bye bye
__________________
Sabio no es el que abunda en conocimiento
Sabio es el que sabe usar 'Bien' lo poco que conoce
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 23:17:18.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi