Problemas con cambios de versión

08/10/2003 - 16:30 por Emilio | Informe spam

Hola a tod@s

Acabamos de cambiar de sistema operativo W98->XP y de Office 97->XP y al
tratar de ejecutar un procedimiento de una hoja de calculo me produce el
error de que "el componente Active X no puede crear el objeto" en la
siguiente línea

Dim WKS As Workspace
' Obtiene el Workspace predeterminado.
Set WKS = DBEngine.Workspaces(0) <- Aquí

Sigue habiendo una referencia a Microsoft DAO 3.51, así que no sé donde
puede estar el problema. ¿Qué se os ocurre?

Gracias anticipadas

Saludos a tod@s

Emilio

Siga el debate

7 respuestas

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#6 Emilio

09/10/2003 - 13:06 | Informe spam

Muchas gracias Héctor Miguel
parece que vamos por buen camino, si me fio de tu segundo enlace, parece que
el problema es que DAO no está registrado en Excel
Trataré de confirmarlo con Sistemas.

Gracias otra vez

Emilio

"Héctor Miguel" escribió en el mensaje
news:

Hola, Emilio !

> No acabo entrando en esto de buscar por otro sistio que no sean las news

.:o(

[solo por no 'dejarlo en el tintero'] ;)

1.- prueba poniendo ANTES de la linea del 'Set WKS = [etc.]' la siguiente

instruccion:

DBEngine.DefaultType = dbUseODBC

2.- otras [posibles] alternativas de busqueda de informacion de ayuda: =>

OJO con los 'saltos de linea' <>

informacion 'general'
INFO: Solucionar el error 429 al automatizar las aplicaciones de Office

http://support.microsoft.com/defaul...?scid=http://support.microsoft.com:80/support/kb/articles/e244/2/64.asp&NoWebContent=1

si instalaste algun componente DAO 'dspues' de instalado excel...
Error DAO después de Instalar Aplicación DAO de Visual Basic

http://support.microsoft.com/defaul...?scid=http://support.microsoft.com:80/support/kb/articles/e189/6/07.asp&NoWebContent=1

Saludos,
Héctor.

Responder a este mensaje

#7 Emilio

10/10/2003 - 19:45 | Informe spam

Hola a

lo conseguí, es increible , lo que antes tenía definido como
Dim WKS As Workspace
Set WKS = DBEngine.Workspaces(0)
ahora queda así
Dim DBE as object
Dim WKS As Workspace

set DBE = DAO.DBEngine
Set WKS = DBE.Workspaces(0)
por si le puede servir a alguien

Gracias a

Saludos

Emilio

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

1 2

Busqueda sugerida