Hey guys,
I just removed Access from my computer and now my application will not update the database. The error I get is a runt time error 3055. I used INNO script/setup to create the installer.
Thanks,
Brock
Printable View
Hey guys,
I just removed Access from my computer and now my application will not update the database. The error I get is a runt time error 3055. I used INNO script/setup to create the installer.
Thanks,
Brock
How are you accessing the DB? Did you call ACCESS anywhere? Is there an error message?
Like so...
Now, on some computers (without access) I get ActiveX error : cannot create object. This application runs great iff Access is installed. Now I thought Inno script was supposed to take care of those dependices?Code:'create data access object
Set dbWorkspace = DBEngine.Workspaces(0)
Set dbDatabase = dbWorkspace.OpenDatabase(strDBDir + strDatabase)
If Err Then
MsgBox "Unable to open the specified database, using default", vbCritical
Set dbDatabase = dbWorkspace.OpenDatabase("default.mdb")
If Err Then
MsgBox "Unable to open the default database 'default.mdb'", vbCritical
End If
End If
Set dbTable = dbDatabase.OpenRecordset(SQLQuery)
If dbTable.BOF Then
MsgBox "No records found!"
Exit Sub
End If
Do Until dbTable.EOF = True
LoadDataRecord 'load data record into gsdata and get mean, SD, etc.
.....
....
Thanks,
Brock
Just tried adding the Automatic OS Updater to my setup.exe, the same error returns.
Any ideas?
Brock
Post your project. Maybe someone without Access can try it.
How are you declaring DBEngine?
Well, right now I'm running the project without Access and getting the error.
I delcare my DB like so, above the code I already posted:
BrockCode:
Private dbWorkspace As Workspace
Private dbDatabase As Database
Private dbTable As Recordset
brockmasterflex,
You added the updater to your setup but did it run? Post you script.
Moved from Classic VB forum. :)
It appeared to run, here is the script...Quote:
Originally Posted by randem
Code:
; Date: August 29, 2005
; VB Runtime Files Folder: C:\Program Files\Randem Systems\**********\********** 4.0\VB 6 Redist Files\
; Visual Basic Project File (.vbp): C:\Documents and Settings\Brock\My Documents\Planer Embedded Ver 4.591\Main Windows Code\planer.vbp
; Inno Setup Script Output File (.iss): C:\Documents and Settings\Brock\My Documents\Inno Script\setup.iss
; ------------------------
; Visual Basic References
; ------------------------
; Microsoft DAO 3.6 Object Library
; Microsoft ActiveX Data Objects 2.0 Library
; Microsoft Data Binding Collection
; Microsoft Data Environment Instance 1.0
; --------------------------
; Visual Basic Components
; --------------------------
; Microsoft Internet Controls
[Setup]
AppName=NMI Planer Tally
AppVerName=Planer Tally 4.592
AppPublisher=Northern Milltech Inc.
AppVersion=4.591
VersionInfoVersion=4.592
AllowNoIcons=no
DefaultGroupName=NMI Planer Tally
DefaultDirName={pf}\NMI Planer Tally
AppCopyright=
PrivilegesRequired=Admin
MinVersion=4.1,5.0
OutputBaseFilename=setup4592
[Tasks]
[Files]
Source: c:\program files\randem systems\**********\********** 4.0\vb 6 redist files\msvbvm60.dll; DestDir: {sys}; Flags: sharedfile
Source: c:\program files\randem systems\**********\********** 4.0\vb 6 redist files\oleaut32.dll; DestDir: {sys}; Flags: sharedfile
Source: c:\program files\randem systems\**********\********** 4.0\vb 6 redist files\olepro32.dll; DestDir: {sys}; Flags: sharedfile
Source: c:\program files\randem systems\**********\********** 4.0\vb 6 redist files\asycfilt.dll; DestDir: {sys}; Flags: sharedfile
Source: c:\program files\randem systems\**********\********** 4.0\vb 6 redist files\stdole2.tlb; DestDir: {sys}; Flags: regtypelib
Source: c:\program files\randem systems\**********\********** 4.0\vb 6 redist files\comcat.dll; DestDir: {sys}; Flags: sharedfile
Source: c:\documents and settings\brock\my documents\Planer Embedded Ver 4.592\main windows code\bnd_def.mdb; DestDir: {app}\Bundle Data; Flags: ignoreversion
Source: c:\documents and settings\brock\my documents\Planer Embedded Ver 4.592\main windows code\bnd_def.md_; DestDir: {app}; Flags: ignoreversion
Source: c:\documents and settings\brock\my documents\Planer Embedded Ver 4.592\main windows code\default.md_; DestDir: {app}; Flags: ignoreversion
Source: c:\documents and settings\brock\my documents\Planer Embedded Ver 4.592\main windows code\bundle files\1234.bnd; DestDir: {app}\bundle files; Flags: ignoreversion
Source: c:\documents and settings\brock\my documents\Planer Embedded Ver 4.592\main windows code\option; DestDir: {app}; Flags: ignoreversion
Source: c:\documents and settings\brock\my documents\Planer Embedded Ver 4.592\main windows code\sec.dat; DestDir: {app}; Flags: ignoreversion
Source: z:\planer embedded\stock files\setup.txt; DestDir: {app}; Flags: ignoreversion
Source: c:\documents and settings\brock\my documents\Planer Embedded Ver 4.592\main windows code\setupdir.txt; DestDir: {app}; Flags: ignoreversion
Source: c:\documents and settings\brock\my documents\Planer Embedded Ver 4.592\main windows code\shift data\default.mdb; DestDir: {app}\Shift Data; Flags: ignoreversion
Source: z:\planer embedded\stock files\southern yellow pine stocks.stk; DestDir: {app}\stock files; Flags: ignoreversion
Source: z:\planer embedded\stock files\spf stocks.stk; DestDir: {app}\stock files; Flags: ignoreversion
Source: c:\windows\system32\mschrt20.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile
Source: c:\windows\system32\msadodc.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile
Source: c:\program files\common files\system\ado\msado25.tlb; DestDir: {sys}; Flags: uninsneveruninstall regtypelib
Source: c:\windows\system32\msdatgrd.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile
Source: c:\windows\system32\msdatlst.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile
Source: c:\embedded\extra files\msbind.dll; DestDir: {sys}; Flags: regserver restartreplace sharedfile
Source: c:\program files\common files\designer\msderun.dll; DestDir: {sys}; Flags: regserver restartreplace sharedfile
Source: c:\windows\system32\comctl32.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile
Source: c:\windows\system32\mscomct2.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile
Source: c:\windows\system32\comct332.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile
Source: c:\windows\system32\mscomctl.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile
Source: c:\program files\microsoft visual studio\common\tools\vcm\vcmaxb.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile
Source: c:\windows\system32\mswinsck.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile
Source: c:\documents and settings\brock\my documents\Planer Embedded Ver 4.592\main windows code\ccrpipa6.ocx; DestDir: {sys}; Flags: regserver restartreplace sharedfile
Source: c:\documents and settings\brock\my documents\Planer Embedded Ver 4.592\main windows code\moist.exe; DestDir: {app}; Flags: ignoreversion
;Source: c:\windows\system32\autprx32.dll; DestDir: {sys}; Flags: sharedfile
Source: c:\program files\common files\system\ado\msado15.dll; DestDir: {sys}; Flags: sharedfile
;Source: "C:\Documents and Settings\Brock\My Documents\Inno Script\Support\VB_DCOM_MDAC_JET_AutoSetup.exe"; DestDir: "{tmp}"; Flags: ignoreversion deleteafterinstall
Source: C:\Program Files\Common Files\Microsoft Shared\DAO\dao360.dll; DestDir: {sys}; Flags: sharedfile
[INI]
Filename: {app}\moist.url; Section: InternetShortcut; Key: URL; String: "http://www.northernmilltech.com"
[Icons]
Name: {group}\NMI Planer Tally; Filename: {app}\moist.exe; WorkingDir: {app}
Name: {group}\Northen Milltech Inc.; Filename: {app}\moist.url
Name: {group}\Uninstall NMI Planer Tally; Filename: {uninstallexe}
[Run]
;Filename: "{tmp}\VB_DCOM_MDAC_JET_AutoSetup.exe"; Parameters: /NORESTART /VERYSILENT WorkingDir: {tmp}; Flags: skipifdoesntexist
Filename: {app}\moist.exe; Description: Launch Planer; Flags: nowait postinstall skipifsilent; WorkingDir: {app}
[UninstallDelete]
Type: files; Name: {app}\moist.url
brockmasterflex,
Actually, you commented it out. How could it run?
:eek: thats it....its friday...... i'm going home..... :sick:Quote:
Originally Posted by randem