To register for an Internet.com membership to receive newsletters and white papers, use the Register button ABOVE.
To participate in the message forums BELOW, click here
VBForums  

VB Wire News
Part 10 of the Visual Basic .NET 2010 Express Tutorial Complete!
How to Use the Visual Studio Code Analysis Tool FxCop
Article :: Interview with Andrei Alexandrescu (Part 3 of 3)
Introducing Visual Studio LightSwitch
Visual Studio LightSwitch Beta 1 is Available



Go Back   VBForums > General > Application Deployment

Reply Post New Thread
 
Thread Tools Display Modes
Old May 2nd, 2007, 06:58 AM   #1
Yovy7410
Junior Member
 
Join Date: Apr 07
Posts: 18
Yovy7410 is an unknown quantity at this point (<10)
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....
Yovy7410 is offline   Reply With Quote
Old May 2nd, 2007, 07:01 AM   #2
Dnereb
Fanatic Member
 
Dnereb's Avatar
 
Join Date: Aug 05
Location: Waddinxveen Netherlands
Posts: 769
Dnereb will become famous soon enough (80+)
Re: Error -2147467259

Is the same Microsoft FoxPro VFP Driver version (if any) installed on all machines?
__________________
why can't programmers keep and 31 Oct and 25 dec apart. Why Rating is Useful
for every question you ask provide an answer on another thread.
Dnereb is offline   Reply With Quote
Old May 2nd, 2007, 07:06 AM   #3
Hack
Super Moderator
 
Hack's Avatar
 
Join Date: Aug 01
Location: Sterling Heights, Michigan
Posts: 54,243
Hack has a brilliant future (2000+)Hack has a brilliant future (2000+)Hack has a brilliant future (2000+)Hack has a brilliant future (2000+)Hack has a brilliant future (2000+)Hack has a brilliant future (2000+)Hack has a brilliant future (2000+)Hack has a brilliant future (2000+)Hack has a brilliant future (2000+)Hack has a brilliant future (2000+)Hack has a brilliant future (2000+)
Re: Error -2147467259

Moved to Application Deployment
__________________
Please use [Code]your code goes in here[/Code] tags when posting code.
When you have received an answer to your question, please mark it as resolved using the Thread Tools menu.
Before posting your question, did you look here?
Got a question on Linux? Visit our Linux sister site.
I dont answer coding questions via PM or EMail. Please post a thread in the appropriate forum.

Creating A Wizard In VB.NET
Modifications Required For VB6 Apps To Work On Vista
Paging A Recordset
What is wrong with using On Error Resume Next
Good Article: Language Enhancements In Visual Basic 2010
IT professionals freelancer site. Register today to find coders, or offer your services for available freelance projects!
Upgrading VB6 Code To VB.NET
Microsoft MVP 2005/2006/2007/2008/2009/2010
Hack is offline   Reply With Quote
Old May 2nd, 2007, 07:10 AM   #4
Yovy7410
Junior Member
 
Join Date: Apr 07
Posts: 18
Yovy7410 is an unknown quantity at this point (<10)
Re: Error -2147467259

Yes...
Yovy7410 is offline   Reply With Quote
Old May 2nd, 2007, 11:01 AM   #5
Yovy7410
Junior Member
 
Join Date: Apr 07
Posts: 18
Yovy7410 is an unknown quantity at this point (<10)
Re: Error -2147467259

Why with the Visual Studio Installer it works fine, and with Inno Setup it fail...???
Yovy7410 is offline   Reply With Quote
Old May 2nd, 2007, 11:24 AM   #6
Yovy7410
Junior Member
 
Join Date: Apr 07
Posts: 18
Yovy7410 is an unknown quantity at this point (<10)
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
Yovy7410 is offline   Reply With Quote
Old May 3rd, 2007, 09:47 PM   #7
randem
Banned
 
randem's Avatar
 
Join Date: Oct 02
Location: Maui, Hawaii
Posts: 11,385
randem is a glorious beacon of light (400+)randem is a glorious beacon of light (400+)randem is a glorious beacon of light (400+)randem is a glorious beacon of light (400+)randem is a glorious beacon of light (400+)
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.
randem is offline   Reply With Quote
Reply

Go Back   VBForums > General > Application Deployment


Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
 
Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off

Forum Jump


All times are GMT -5. The time now is 05:05 AM.





Acceptable Use Policy

Internet.com
The Network for Technology Professionals

Search:

About Internet.com

Legal Notices, Licensing, Permissions, Privacy Policy.
Advertise | Newsletters | E-mail Offers

Powered by vBulletin® Version 3.8.1
Copyright ©2000 - 2010, Jelsoft Enterprises Ltd.