La Web del Programador: Comunidad de Programadores
https://www.lawebdelprogramador.com/foros/Visual-Basic/1122063-Office-y-VB6.0.html

Office y VB6.0

sin imagen de perfil

Office y VB6.0

Publicado por gonzalo (13 intervenciones) el 09/07/2009 03:43:19
Amigos, buenas noches.

Desarrolle una aplicación pequeña en donde creo un BD access y un archivo de excel 2003, funciona a la perfección en maquinas con officce 2003 pero al probarlas en pc con office 2000 no corre.¿De que manera puedo solucionar esto?, cree un instalador y tampoco funciona.

Atte.

Gonzalo

RE:Office y VB6.0

Publicado por JaImE GuErReRo (361 intervenciones) el 09/07/2009 19:25:58
el problema es la referencia del que haces del office, ya que las versiones de las librerias en ambas son diferentes. Cambia la referencia a la version del office 2000 y va a funcionar.

Pero para evitar estos problemas usa createobject.

en vez de hacer

Dim obj_Excel As Excel.Application

haces

Set obj_Excel = CreateObject("Excel.Application")

Pero antes quitas la referencia al excel de tu proyecto
sin imagen de perfil

RE:Office y VB6.0

Publicado por Gonzalo (13 intervenciones) el 09/07/2009 21:35:10
Gracias jaime, pero como lo haria con el Access.......tambien se puede hacer lo mismo??

RE:Office y VB6.0

Publicado por JaImE GuErReRo (361 intervenciones) el 10/07/2009 00:44:19
como haces tu conexion a access?
sin imagen de perfil

RE:Office y VB6.0

Publicado por gonzalo (13 intervenciones) el 10/07/2009 14:05:27
Jaime esta es la conexion que tengo....

Dim cnn as ADOBD.Connection

With cnn
.Provider = "Microsoft.jet.oledb.4.0"
.ConnectionString = "Data Souerse = " & app.path " "d.mdb"
.Open
end with

Todo me funcionaba bien pero solo con officce 2003 por eso estoy cambiando con el createobject que me recomendaste...

Ahora cree una BD de esa manera pero cuando la abro no me reconoce el formato:

Dim access as Object
set access = CreateObject("Access.Application")
Access.Newaccessproject "" & app.path & "d" & ".mdb"


No se si estoy bien.... de antemano muchas gracias.

Gonzalo

RE:Office y VB6.0

Publicado por JaImE GuErReRo (361 intervenciones) el 10/07/2009 16:58:47
 este caracter porque lo pones??? seguro por eso no lo reconoce
sin imagen de perfil

RE:Office y VB6.0

Publicado por Gonzalo (13 intervenciones) el 10/07/2009 17:20:11
Eso es un B no se por que lo muestra asi en esta pag.

Saludos

RE:Office y VB6.0

Publicado por JaImE GuErReRo (361 intervenciones) el 13/07/2009 21:22:15
esto estará correcto???

Dim access as Object
set access = CreateObject("Access.Application")
Access.Newaccessproject "" & app.path & "d.mdb"