-
Error -2147467259
Excuse my English
The problem is:
In my app i have this procedure:
Code:
Public Sub Consultar(cadena, ByVal Camino)
Dim mCadena As String
On Error GoTo Consultar_Error
Set cnn = New ADODB.Connection
cnn.ConnectionString = "Provider=MSDASQL.1;" & _
"Persist Security Info=False;" & _
"Extended Properties=" & _
"Driver={Microsoft FoxPro VFP Driver (*.dbf)};" & _
"UID=;" & _
"SourceDB= " & Camino & ";" & _
"SourceType=DBF;"
cnn.Open
Set rst = New ADODB.Recordset
rst.CursorLocation = adUseClient
rst.Open cadena, cnn, adOpenDynamic, _
adLockOptimistic, adCmdText
On Error GoTo 0
Exit Sub
Consultar_Error:
MsgBox "Error " & Err.Number & " (" & Err.Description & ") in procedure Consultar of Módulo de clase mTablas"
End Sub
it work Fine in my PC, but when i make the Installer with Inno Setup and install it on other machine something fail.....
the error is as follow:
Error -2147467259 [Microsoft][administrador de controlador ODBC] the controller don't admited this function...
But if i install it with the P&D wizard it work fine, it seems like something wrong is with inno setup, maybe my inexperience...
Here is the scripts i used..
Code:
[Setup]
AppName=Zeus..Etiquetas
AppVerName=Zeus..Etiquetas 1.0.0
AppPublisher=Artex.SA
AppPublisherURL=http://www.ciego.artex.sa
AppSupportURL=http://www.ciego.artex.sa
AppUpdatesURL=http://www.ciego.artex.sa
DefaultDirName={pf}\Zeus..Etiquetas
DefaultGroupName=Zeus..Etiquetas
AllowNoIcons=yes
OutputDir=C:\Documents and Settings\administrator.CIEGO\Escritorio
OutputBaseFilename=Instalador Zeus..Etiquetas
SetupIconFile=S:\Yovanys\Prueba\Codifica\ToolBox\Custom Tool Box\Icons\Bar Code.ico
Compression=lzma
SolidCompression=yes
ChangesAssociations=yes
[Languages]
Name: spanish; MessagesFile: compiler:Languages\Spanish.isl
[Tasks]
Name: desktopicon; Description: {cm:CreateDesktopIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
Name: quicklaunchicon; Description: {cm:CreateQuickLaunchIcon}; GroupDescription: {cm:AdditionalIcons}; Flags: unchecked
Name: VB5RT; Description: Visual Basic Runtime 5.0; Flags: checkedonce
Name: VB6RT; Description: Visual Basic Runtime 6.0; Flags: checkedonce
Name: DCOM95; Description: DCOM 1.3 for Windows 95; Flags: checkedonce restart; MinVersion: 4.0,0; OnlyBelowVersion: 4.1,0
Name: DCOM98; Description: DCOM 1.3 for Windows 98; Flags: checkedonce; MinVersion: 4.1,0; OnlyBelowVersion: 4.9,0
Name: MDAC; Description: Microsoft Data Access Components; Flags: checkedonce restart; MinVersion: 4.0,4.0; OnlyBelowVersion: 0,5.0
[Files]
Source: S:\Yovanys\Prueba\Zeus..Etiquetas.exe; DestDir: {app}; Flags: ignoreversion
Source: S:\Yovanys\Install\Sheridan\Disk1\Infragistic.exe; DestDir: {app}; Flags: ignoreversion
Source: S:\Yovanys\Prueba\DataBase\*; DestDir: {app}\DataBase; Flags: ignoreversion recursesubdirs createallsubdirs
Source: S:\Yovanys\Prueba\Help\*; DestDir: {app}\Help; Flags: ignoreversion recursesubdirs createallsubdirs
Source: S:\Yovanys\Prueba\Imagenes\*; DestDir: {app}\Imagenes; Flags: ignoreversion recursesubdirs createallsubdirs
; NOTE: Don't use "Flags: ignoreversion" on any shared system files
; START VISUAL BASIC
Source: S:\Yovanys\Prueba\Instalador\Support\STDOLE2.TLB; DestDir: {sys}; Flags: restartreplace uninsneveruninstall sharedfile regtypelib; Tasks: VB5RT VB6RT
Source: S:\Yovanys\Prueba\Instalador\Support\VB6ES.DLL; DestDir: {sys}; Flags: sharedfile
Source: S:\Yovanys\Prueba\Instalador\Support\MSVBVM60.dll; DestDir: {sys}; Flags: restartreplace uninsneveruninstall sharedfile regserver; Tasks: VB6RT
Source: S:\Yovanys\Prueba\Instalador\Support\OleAut32.dll; DestDir: {sys}; Flags: restartreplace uninsneveruninstall sharedfile regserver; Tasks: VB5RT VB6RT
Source: S:\Yovanys\Prueba\Instalador\Support\OlePro32.dll; DestDir: {sys}; Flags: restartreplace uninsneveruninstall sharedfile regserver; Tasks: VB5RT VB6RT
Source: S:\Yovanys\Prueba\Instalador\Support\AsycFilt.dll; DestDir: {sys}; Flags: restartreplace uninsneveruninstall sharedfile; Tasks: VB5RT VB6RT
Source: S:\Yovanys\Prueba\Instalador\Support\ComCat.dll; DestDir: {sys}; Flags: restartreplace uninsneveruninstall sharedfile regserver; Tasks: VB5RT VB6RT
;TERMINA VISUAL BASIC
;COMIENZA AHORA LAS DLL Y OCX
Source: S:\Yovanys\Prueba\Instalador\Support\BlnDialog.ocx; DestDir: {app}; Flags: restartreplace sharedfile regserver
Source: S:\Yovanys\Prueba\Instalador\Support\HookMenu.ocx; DestDir: {sys}; Flags: restartreplace sharedfile regserver
Source: S:\Yovanys\Prueba\Instalador\Support\DATGDES.DLL; DestDir: {sys}; Flags: sharedfile
Source: S:\Yovanys\Prueba\Instalador\Support\STDFTES.DLL; DestDir: {sys}; Flags: sharedfile
Source: S:\Yovanys\Prueba\Instalador\Support\MSSTDFMT.DLL; DestDir: {sys}; Flags: restartreplace sharedfile regserver
Source: S:\Yovanys\Prueba\Instalador\Support\MSDATGRD.OCX; DestDir: {sys}; Flags: restartreplace sharedfile regserver
Source: S:\Yovanys\Prueba\Instalador\Support\ADODCES.DLL; DestDir: {sys}; Flags: sharedfile
Source: S:\Yovanys\Prueba\Instalador\Support\MSADODC.OCX; DestDir: {sys}; Flags: restartreplace sharedfile regserver
Source: S:\Yovanys\Prueba\Instalador\Support\CMDLGES.DLL; DestDir: {sys}; Flags: sharedfile
Source: S:\Yovanys\Prueba\Instalador\Support\COMDLG32.OCX; DestDir: {sys}; Flags: restartreplace sharedfile regserver
Source: S:\Yovanys\Prueba\Instalador\Support\MSCMCES.DLL; DestDir: {sys}; Flags: sharedfile
Source: S:\Yovanys\Prueba\Instalador\Support\MSCOMCTL.OCX; DestDir: {sys}; Flags: restartreplace sharedfile regserver
Source: S:\Yovanys\Prueba\Instalador\Support\SmartMenuXP.ocx; DestDir: {sys}; Flags: restartreplace sharedfile regserver
Source: S:\Yovanys\Prueba\Instalador\Support\ssdw3bo.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile
Source: S:\Yovanys\Prueba\Instalador\Support\ssdw3a32.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile
Source: S:\Yovanys\Prueba\Instalador\Support\ssdw3ao.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile
Source: S:\Yovanys\Prueba\Instalador\Support\ssdw3b32.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile
Source: S:\Yovanys\Prueba\Instalador\Support\vbalToolboxBar6.ocx; DestDir: {sys}; Flags: restartreplace sharedfile regserver
Source: S:\Yovanys\Prueba\Instalador\Support\scrrnes.dll; DestDir: {sys}; Flags: sharedfile
Source: S:\Yovanys\Prueba\Instalador\Support\MSVCRT.DLL; DestDir: {sys}; Flags: sharedfile
Source: S:\Yovanys\Prueba\Instalador\Support\scrrun.dll; DestDir: {sys}; Flags: restartreplace sharedfile regserver
Source: S:\Yovanys\Prueba\Instalador\Support\msjro.dll; DestDir: {sys}; Flags: restartreplace sharedfile regserver
Source: C:\Archivos de programa\Archivos comunes\System\ado\msado25.tlb; DestDir: {sys}; Flags: regtypelib sharedfile
Source: S:\Yovanys\Prueba\Instalador\Support\MSBIND.DLL; DestDir: {sys}; Flags: restartreplace sharedfile regserver
Source: S:\Yovanys\Prueba\Instalador\Support\DBRPRES.DLL; DestDir: {sys}; Flags: sharedfile
Source: S:\Yovanys\Prueba\Instalador\Support\MSDBRPTR.DLL; DestDir: {sys}; Flags: restartreplace sharedfile regserver
Source: S:\Yovanys\Prueba\Instalador\Support\MrvBarCd.dll; DestDir: {sys}; Flags: restartreplace sharedfile regserver
Source: S:\Yovanys\Prueba\Instalador\Support\hh.exe; DestDir: {sys}; Flags: sharedfile
Source: S:\Yovanys\Prueba\Instalador\Support\itircl.dll; DestDir: {sys}; Flags: restartreplace sharedfile regserver
Source: S:\Yovanys\Prueba\Instalador\Support\itss.dll; DestDir: {sys}; Flags: restartreplace sharedfile regserver
Source: S:\Yovanys\Prueba\Instalador\Support\hhctrl.ocx; DestDir: {sys}; Flags: restartreplace sharedfile regserver
; TERMINAN TODOS LOS ARCHIVOS
; START MDAC
Source: C:\Archivos de programa\Microsoft Visual Studio\COMMON\IDE\IDE98\Redist\mdac_typ.exe; DestDir: {%TEMP}; MinVersion: 4.0,0; OnlyBelowVersion: 4.1,0; Tasks: MDAC; Flags: ignoreversion
Source: C:\Archivos de programa\Microsoft Visual Studio\COMMON\IDE\IDE98\Redist\mdac_typ.exe; DestDir: {tmp}; MinVersion: 4.1,4.0; OnlyBelowVersion: 0,5.0; Tasks: MDAC; Flags: ignoreversion
; END MDAC
[Icons]
Name: {group}\Zeus..Etiquetas; Filename: {app}\Zeus..Etiquetas.exe
Name: {group}\{cm:UninstallProgram,Zeus..Etiquetas}; Filename: {uninstallexe}
Name: {commondesktop}\Zeus..Etiquetas; Filename: {app}\Zeus..Etiquetas.exe; Tasks: desktopicon
Name: {userappdata}\Microsoft\Internet Explorer\Quick Launch\Zeus..Etiquetas; Filename: {app}\Zeus..Etiquetas.exe; Tasks: quicklaunchicon
[Registry]
Root: HKCR; Subkey: .etq; ValueType: string; ValueName: ; ValueData: Zeus..Etiquetas; Flags: uninsdeletevalue
Root: HKCR; Subkey: Zeus..Etiquetas; ValueType: string; ValueName: ; ValueData: Zeus..Etiquetas; Flags: uninsdeletekey
Root: HKCR; Subkey: Zeus..Etiquetas\DefaultIcon; ValueType: string; ValueName: ; ValueData: {app}\Zeus..Etiquetas.EXE,0
Root: HKCR; Subkey: Zeus..Etiquetas\shell\open\command; ValueType: string; ValueName: ; ValueData: """{app}\Zeus..Etiquetas.EXE"" ""%1"""
[Run]
; START MDAC 2.5- (see also: http://msdn.microsoft.com/library/default.asp?url=/library/en-us/mdacsdk/htm/wphistory_redistributemdac.asp)
Filename: {tmp}\mdac_typ.exe; Parameters: "/Q /C:""setup /QNT"""; WorkingDir: {tmp}; Flags: skipifdoesntexist; Tasks: MDAC; MinVersion: 4.1,4.0; OnlyBelowVersion: 0,5.0
; END MDAC 2.6+
Filename: "{app}\Infragistic.exe"; Description: "{cm:LaunchProgram,Infragistic.exe}"; Flags: shellexec
Filename: {app}\Zeus..Etiquetas.exe; Description: {cm:LaunchProgram,Zeus..Etiquetas}; Flags: nowait postinstall skipifsilent
Please help me..
Thanks....
-
Re: Error -2147467259
Is the same Microsoft FoxPro VFP Driver version (if any) installed on all machines?
-
Re: Error -2147467259
Moved to Application Deployment
-
Re: Error -2147467259
-
Re: Error -2147467259
Why with the Visual Studio Installer it works fine, and with Inno Setup it fail...???
-
Re: Error -2147467259
The problem was in the installation process....I look the size of vfpodbc.dll in the Client PC and it was 27 KB however in mine is 954 KB (i don't know why this occured)....just copy mine to the client and it works fine.....
Thanks Dnereb
-
Re: Error -2147467259
You should run into many other problems with that script. Use ********** to create your Inno Setup script then compare what is eliminated and why. You will find some interesting things.
