Error Starting application executable (error 424 - Object required) 
Author Message
 Error Starting application executable (error 424 - Object required)

--------------7C50F1BE26E00D57584E1AC6
Content-Type: text/plain; charset=us-ascii
Content-Transfer-Encoding: 7bit

I've developed an application in VB4.0 Pro, using a shared Access 7.0
database. This database is located on a Novell 3.12 server, in a shared
directory, as well as the system.mdw file. The application is installed
on the client computers running the same version of Windows 95 and all
of them have the same Office 95 installed.
I've installed my application on 10 machines, so far, and only in 2 of
them I get the following error on the startup form:

Error 424 - Object required

The following code is where the problem resides.

With DBEngine
      .SystemDB = sgMyPath & "System.mdw"
      Set MyWorkspace = .CreateWorkspace("New", slUserName, slPassword)

      .Workspaces.Append MyWorkspace
' DB opening
      slConectString = "MS Access;pwd=secretpassword"
      Set pBaseDados = .Workspaces("New").OpenDatabase(slMyFile, False,
False, slConectString)
End With

' Table opening
    With pBaseDados
      Set pTblProdutos = .OpenRecordset("Produtos", dbOpenTable)
      Set pTblMarca = .OpenRecordset("Marcas", dbOpenTable)
      pTblMarca.Index = "PrimaryKey"
      Set pTblFornecedor = .OpenRecordset("Fornecedores", dbOpenTable)
      pTblFornecedor.Index = "PrimaryKey"
      Set pTblPureza = .OpenRecordset("Purezas", dbOpenTable)
      pTblPureza.Index = "PrimaryKey"
      Set pTblArmazem = .OpenRecordset("Armazens", dbOpenTable)
      pTblArmazem.Index = "PrimaryKey"
      Set pTblCategoria = .OpenRecordset("Categorias", dbOpenTable)
      pTblCategoria.Index = "PrimaryKey"
    End With

Any help would be much appreciated.
Cheers

Gilberto

--------------7C50F1BE26E00D57584E1AC6
Content-Type: text/html; charset=us-ascii
Content-Transfer-Encoding: 7bit

<HTML>
I've developed an application in VB4.0 Pro, using a shared Access 7.0 database.
This database is located on a Novell 3.12 server, in a shared directory,
as well as the system.mdw file. The application is installed on the client
computers running the same version of Windows 95 and all of them have the
same Office 95 installed.
<BR>I've installed my application on 10 machines, so far, and only in 2
of them I get the following error on the startup form:

<P>Error 424 - Object required

<P>The following code is where the problem resides.<TT></TT>

<P><TT>With DBEngine</TT>
<BR><TT>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; .SystemDB = sgMyPath &amp; "System.mdw"</TT>
<BR><TT>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Set MyWorkspace = .CreateWorkspace("New",
slUserName, slPassword)</TT>
<BR><TT>&nbsp;</TT>
<BR><TT>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; .Workspaces.Append MyWorkspace</TT>
<BR><TT>' DB opening</TT>
<BR><TT>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; slConectString = "MS Access;pwd=secretpassword"</TT>
<BR><TT>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Set pBaseDados = .Workspaces("New").OpenDatabase(slMyFile,
False, False, slConectString)</TT>
<BR><TT>End With</TT><TT></TT>

<P><TT>' Table opening</TT>
<BR><TT>&nbsp;&nbsp;&nbsp; With pBaseDados</TT>
<BR><TT>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Set pTblProdutos = .OpenRecordset("Produtos",
dbOpenTable)</TT>
<BR><TT>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Set pTblMarca = .OpenRecordset("Marcas",
dbOpenTable)</TT>
<BR><TT>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; pTblMarca.Index = "PrimaryKey"</TT>
<BR><TT>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Set pTblFornecedor = .OpenRecordset("Fornecedores",
dbOpenTable)</TT>
<BR><TT>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; pTblFornecedor.Index = "PrimaryKey"</TT>
<BR><TT>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Set pTblPureza = .OpenRecordset("Purezas",
dbOpenTable)</TT>
<BR><TT>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; pTblPureza.Index = "PrimaryKey"</TT>
<BR><TT>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Set pTblArmazem = .OpenRecordset("Armazens",
dbOpenTable)</TT>
<BR><TT>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; pTblArmazem.Index = "PrimaryKey"</TT>
<BR><TT>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Set pTblCategoria = .OpenRecordset("Categorias",
dbOpenTable)</TT>
<BR><TT>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; pTblCategoria.Index = "PrimaryKey"</TT>
<BR><TT>&nbsp;&nbsp;&nbsp; End With</TT>
<BR>&nbsp;
<BR>Any help would be much appreciated.<TT></TT>
<BR><TT>Cheers</TT><TT></TT>

<P><TT>Gilberto</TT></HTML>

--------------7C50F1BE26E00D57584E1AC6--



Sat, 27 May 2000 03:00:00 GMT  
 
 [ 1 post ] 

 Relevant Pages 

1. Automation error... Error 424, Object Required

2. run-time error 424 object required

3. Run-time error '424': Object required

4. Runtime error 424: Object required

5. Error 424 Object Required

6. Run-Time error '424': object Required

7. Clipboard.Clear - Returns Error 424 - Object Required

8. Run-Time Error 424, Object-Required.

9. Object required (Error 424)

10. runtime error 424 object required

11. Error 424: Object required

12. VBscript - Error 424 Object Required - NEED a FIX

 

 
Powered by phpBB® Forum Software