Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

SE ANIMAN A QUE LE DEMOS SOLUCION A ESTO AOindex no es un indice en esta tabla.

690 views
Skip to first unread message

elricho

unread,
Oct 4, 2004, 9:00:04 AM10/4/04
to
Bueno espero tener la colaboracion o al menos la lectura de ustedes ya que
tengo que encarar y solucionar este problema pero para que sea solucionado
por todos los que los pasan, porque jamas he visto solucion de esto.

Apelo a la lectura de todos a cualquier colaboracion sobre este tema para
encontrar una solucion tengo 1 pero no es la mejor.

Asi que invoco a los fantasticos Buho CarCar Chea Juan Emilio JuanK espero
no olvidarme de nadie y todo
persona que quiera dar su experiencia y opinion al respecto.

LES CUENTO LO QUE HICE TODO EL FIN DE SEMANA aparte de leerme todos los
mails que han enviado sobre este tema y que no hubo ninguna solucion probe
todo lo que dicen.

El que quiera la base me la pide y se la envio por email no es grande. Pesa
217 Kb
La base tiene 31 relaciones y tiene cada tabla campo autonumericos como
clave. (CREO que ahora que me pasa esto es un grave error usar autonumericos
como clave.) Despues me gustaria discutirlos con ustedes.

2) La base no se puede abrir de ninguna manera desde access directamente
osea que no se
puede importar nada.

3) Actualice la dll el jet4 utilice el jetcom y nada de nada.

Me pregunto algo porque microsoft no tiene ninguna herramienta que lo
solucione ??? hay una que se llama Access Recovery que si la arregla yo me
baje un demo http://www.officerecovery.com/access/ pero claro baja
parcialmente la base.

Bueno encarando el tema, como no hay forma de abrirla genere una base de
datos en blanco con los mismas tablas le puse la misma clave y desde otra
mdb me vincule a ella con esa extructura.

Luego lo que hice fue renombrar esta base y nombrar a la base dañada como la
anterior y desde mi mdb que vinculaba a ella puedo obtener todos las tablas
pero vinculadas osea los datos estan !!!

Ahora como podria hacer para exportar desde una vinculada todas la tablas a
una nueva por codigo ?

Ya que desde access no puedo entrar a la base salvo con este truquito de
vincularme a ella atraves de otra tabla sana y luego renombrarla porque sino
tampoco podria vincularme.

Use otro soft que se llama Easy Recovery Pro me recupera abosolutamente todo
las tablas , pero pierde todos los campos clave autonumerico osea que los
pasa a numericos y la relaciones ni hablar.

Es posible rengerar este bendito indice interno de la base ???

Bueno escucho sugerencias.
GRACIAS A TODOS


Eduardo Olaz

unread,
Oct 4, 2004, 9:15:21 AM10/4/04
to
Pásame la BD a ver qué puedo hacer:

Saludos desde la calle Estafeta de Pamplona:

Eduardo Olaz
Microsoft [MVP] Access

eduardoALGARROBAolaz.net
ALGARROBA = @

elricho

unread,
Oct 4, 2004, 9:12:43 AM10/4/04
to
Dejo la ruta de la base por si alguien quiere experimentar.
http://www.elricho.com.ar/subir/agv-base.zip
la clave es segurosagv

"elricho" <nin...@nadie.com> escribió en el mensaje
news:enO4cLhq...@tk2msftngp13.phx.gbl...

leandro (2x3)

unread,
Oct 4, 2004, 9:20:52 AM10/4/04
to

--
¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te
sirvió o no la respuesta dada. Muchas gracias.
'Siempre hay otra forma para hacer lo mismo...

Hola:


Me ha pasado algo similar algunas veces, que la base estaba deteriorada, y
no me deja entrar a repararla.

Lo solucione desde EXCEL, Datos/Obtener datos externos/crear nueva
consulta/Nueva fuente de datos/aceptar
Nombre:Uno cualquiera, driver de microsoft access/conectar/
Base de datos/seleccionar/selecciona tu base dañada, y entonces le das al
boton reparar y/o compactar.

un saludo.


"elricho" <nin...@nadie.com> escribió en el mensaje
news:enO4cLhq...@tk2msftngp13.phx.gbl...

Eduardo Olaz

unread,
Oct 4, 2004, 9:30:43 AM10/4/04
to
Tendrás que hacer otro fichero Zip, ya que este no se puede abrir, nin con
WinZip ni con WinRar.

Emilio (en el curro)

unread,
Oct 4, 2004, 9:41:46 AM10/4/04
to
--------------------------------------------------------------------------

¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te
sirvió o no la respuesta dada. Muchas gracias
--------------------------------------------------------------------------
Yo he podido abrirlo, pero no he podido solucionar nada :(

Saludos a tod@s
Emilio
miliuco56 ALGARROBA hotmail.com
"Eduardo Olaz" <eduardoA...@olaz.net> escribió en el mensaje
news:OW50Pahq...@TK2MSFTNGP11.phx.gbl...

elricho

unread,
Oct 4, 2004, 9:39:57 AM10/4/04
to
Leandro Bastante cerca pero no hay caso con el tema de la contraseña me dice
que es una invalida. No se porque si bien se la he puesto.

Dejo la ruta de la base por si alguien quiere experimentar.
http://www.elricho.com.ar/subir/agv-base.zip
la clave es segurosagv

Esa seria una buena solucion si la reparara no se si funcionara.

"leandro (2x3)" <dosx...@hotmail.com> escribió en el mensaje
news:%23e9%23yUhqE...@TK2MSFTNGP10.phx.gbl...

elricho

unread,
Oct 4, 2004, 9:42:32 AM10/4/04
to
Emilio hay alguna forma de exportar las tablas por codigo ??? desde otra
base mdb vinculandose a esta ? ya que Yo tambien he podido desde una mbd
obtener los datos pero no reparar.

Ahora incluso le ejecute un compact y reparar por codigo y no dice ni mu !
no da error pero no la repara.


"Emilio (en el curro)" <miliu56 ARROBA hotmail.com> escribió en el mensaje
news:%23Yi2Efh...@TK2MSFTNGP09.phx.gbl...

elricho

unread,
Oct 4, 2004, 9:46:07 AM10/4/04
to
Eduardo el que te envie por mail ? o el que esta en la web ?

"Eduardo Olaz" <eduardoA...@olaz.net> escribió en el mensaje
news:OW50Pahq...@TK2MSFTNGP11.phx.gbl...

Emilio (en el curro)

unread,
Oct 4, 2004, 10:05:57 AM10/4/04
to
--------------------------------------------------------------------------
¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te
sirvió o no la respuesta dada. Muchas gracias
--------------------------------------------------------------------------
He hecho un intento de copiar la base de datos mediante una aplicación
diseñada para ello, pero no me ha dejado como consecuencia de la contraseña

Saludos a tod@s
Emilio
miliuco56 ALGARROBA hotmail.com

"elricho" <nin...@nadie.com> escribió en el mensaje
news:O4wuLjhq...@TK2MSFTNGP12.phx.gbl...

elricho

unread,
Oct 4, 2004, 10:08:03 AM10/4/04
to
Emilio la contraseña tambien se la pude sacar por codigo.


Fijate le tire este codigo y la saco. Ahora mismo la subo nuevamente sin
clave !!!

Option Compare Database

Private Sub desprotejo_Click()
DesprotejeBase ("C:\agv-base.mdb")
End Sub

Sub DesprotejeBase(Base As String)

On Error GoTo Err_Comando2_Click
Dim WrkJeT As Workspace
Dim dbs As Database
Set WrkJeT = DBEngine.Workspaces(0)
Set dbs = WrkJeT.OpenDatabase(Base, True, False, ";PWD=segurosagv")
dbs.NewPassword "segurosagv", ""
dbs.Close
Set dbs = Nothing
WrkJeT.Close
Set WrkJeT = Nothing
Exit Sub

Exit_Comando2_Click:
Exit Sub

Err_Comando2_Click:
MsgBox "Error Nº: " & Err.Number & ", " & Err.Description, vbCritical,
"ERROR COPIA TABLA"
Resume Exit_Comando2_Click
End Sub

"Emilio (en el curro)" <miliu56 ARROBA hotmail.com> escribió en el mensaje

news:%23Xgrlsh...@tk2msftngp13.phx.gbl...

Búho

unread,
Oct 4, 2004, 10:15:34 AM10/4/04
to
La contraseña se la he quitado yo mediante DAO y no me ha dado problemas.¿La
quereis sin contraseña para operar con ella?

--

Saludos desde Valladolid
Francisco Javier García Aguado

---

Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.772 / Virus Database: 519 - Release Date: 01/10/2004


elricho

unread,
Oct 4, 2004, 10:12:45 AM10/4/04
to
Búho ya la subi sin contraseña .

No sabes lo contento que estoy por tenerlos a todos aunque sea un breve
lapso de tiempo.


Búho te hago una pregunto si podemos acceder por codigo a la base, no hay
forma de regenerar o copiar la tablas con sus autonumerico tal cual estan
alli.

Las relaciones las podria volver a hacer a mano, pero los autonumericos no.

Creo que es un dolor de cabeza usar autonumericos porque sino ya hubiese
podido exportar los datos a otra tabla y listo no tu que piensas al respecto
???


"Búho" <pacoQU...@nemo.es> escribió en el mensaje
news:OKrgQyhq...@TK2MSFTNGP15.phx.gbl...

leandro (2x3)

unread,
Oct 4, 2004, 10:20:22 AM10/4/04
to
al tener contraseña, si te conectas desde excel, al conectar, antes de hacer
nada, hay un boton que pone avanzadas, y ahi se pone el nombre de
usuario:admin en este caso, y la contraseña que das.

Me dice que la repara, pero de ahi no paso, se podria mirar por codigo si
las tablas estan ocultas y ponerlas a visible? quiza asi si deje ver los
datos, porque me deja pasar hasta que me pide seleccionar tablas, pero no se
ven, aunque se ve el combo, por eso pienso que pueden estar ocultas.


"elricho" <nin...@nadie.com> escribió en el mensaje

news:OO4vyhhq...@TK2MSFTNGP11.phx.gbl...

Emilio (en el curro)

unread,
Oct 4, 2004, 10:28:58 AM10/4/04
to
--------------------------------------------------------------------------
¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te
sirvió o no la respuesta dada. Muchas gracias
--------------------------------------------------------------------------
Nada, no puedo, me casca por todas partes y no puedo seguir ahora, esta
tarde, tarde, quizá pueda volver a intentarlo :(

McPegasus

unread,
Oct 4, 2004, 10:29:53 AM10/4/04
to
Hola elricho,

> Creo que es un dolor de cabeza usar autonumericos porque sino ya hubiese

nos "jartamos" de decir que no se usen autonuméricos para relaciones, sí
para otras cosas.


suerte.
-------- ¡Importante! Colabora con el grupo. Contesta a este mensaje y dinos
si te sirvió o no la respuesta dada. Muchas gracias -------- Un saludos,
Rafael Andrada Valencia [es] ..:: Tu Access, Mi Pasión ::..
www.mcpegasus.net [Office Systems - Access]
"elricho" <nin...@nadie.com> escribió en el mensaje
news:eRLPE0hq...@TK2MSFTNGP09.phx.gbl...

elricho

unread,
Oct 4, 2004, 10:26:31 AM10/4/04
to
Leandro las tablas no estan ocultas, al menos si te conectas como haces tu
pero directamente por MS ACCESS DATABASES vas a ver que las ves.

Al menos yo las veo.

Ahora volvi a subir la base desprotegida sin contraseña, ya que la
desprotegi por codigo.

GRACIAS por tus intentos.


"leandro (2x3)" <dosx...@hotmail.com> escribió en el mensaje

news:%2329ep2h...@TK2MSFTNGP09.phx.gbl...

elricho

unread,
Oct 4, 2004, 10:30:22 AM10/4/04
to
Emilio te agradezco infinitamente tu ayuda, gracias por haber intentado.

Que bronca me da no poder repararla y que microsoft no nos de una
herramienta para hacerlo ya que mejor que ellos nadie sabria como hacerlo.

Lo ultimo que probe fue

DoCmd.TransferDatabase acImport, "Microsoft Access", _
"C:\agv-base.MDB", acTable, "Fichas", "Fichas"

Y me sale el error AOindex.

Que frustracion !

"Emilio (en el curro)" <miliu56 ARROBA hotmail.com> escribió en el mensaje
news:exiZc5hq...@tk2msftngp13.phx.gbl...

leandro (2x3)

unread,
Oct 4, 2004, 10:42:36 AM10/4/04
to
Ya he podido ver los datos y las tablas, aunque no puedo conectarme con
access, se pueden sacar todos los datos por excell, e importarlos en una
tabla nueva.

te mando la base que tengo a algun sitio , la subo aqui?


"E. Feijoo" <e.feijoo()retemail.es> escribió en el mensaje
news:%23o%23xv9hq...@TK2MSFTNGP12.phx.gbl...


E. Feijoo

unread,
Oct 4, 2004, 10:47:27 AM10/4/04
to
Bueno, he borrado (al menos lo he intentado) mi mensaje anterior, pues no salio bien..
Salia en dos trozos y solo se veia uno...

He abierto las tablas y no me parecieron dañadas, mantiene los indices autonumericos y me ha permitido exportarlas de una en una a otra base en blanco.
Solo he visto creada una relacion entre la tabla Operaciones <==> Fichas y permite crear nuevos registros enlas que tienen como indice un auto-numerico.

Si esto te vale de algo... esta a tu disposicion, dime simplemente donde la deposito...

Un saludo E. Feijoo

leandro (2x3)

unread,
Oct 4, 2004, 11:00:36 AM10/4/04
to
Por lo visto ya ves esos datos!, entonces no seria mas facil crear una
nueva, lo unico que tendrias que hacer a mano seria las relaciones, cosa que
igual se pueden sacar por codigo.

"leandro (2x3)" <dosx...@hotmail.com> escribió en el mensaje
news:%237qXeCi...@TK2MSFTNGP09.phx.gbl...

elricho

unread,
Oct 4, 2004, 10:55:55 AM10/4/04
to
in...@elricho.com.ar si no es molestia.

Lo que si como hiciste con los autonumericos ??? porque las relaciones que
tengo se basan en ellos.

"leandro (2x3)" <dosx...@hotmail.com> escribió en el mensaje
news:%237qXeCi...@TK2MSFTNGP09.phx.gbl...

elricho

unread,
Oct 4, 2004, 10:57:25 AM10/4/04
to
FEIJOO !!!!
MAESTRO como hiciste por favor contanos ??? Osea que mantubo los mismos
autonumericos grandioso.

in...@elricho.com.ar si no es molestia enviamela cuando puedas.

"E. Feijoo" <e.feijoo()retemail.es> escribió en el mensaje
news:eFMuSEiq...@TK2MSFTNGP10.phx.gbl...

elricho

unread,
Oct 4, 2004, 10:58:21 AM10/4/04
to
Estimado McPegasus si ahora me doy cuenta que son un dolor de cabeza es que
estaba muy acostumbrado a usarlos son super practicos, pero .......

"McPegasus" <mcpe...@XQuitarXmcpegasus.net> escribió en el mensaje
news:%235qXL7h...@tk2msftngp13.phx.gbl...

E. Feijoo

unread,
Oct 4, 2004, 11:04:19 AM10/4/04
to
-------------------------------------------------------------------
- Importante! Colabora con el grupo. Contesta a este mensaje -
- y dinos si te sirvió o no la respuesta dada. Muchas gracias -
-------------------------------------------------------------------

A ver, que nos liamos... yo la he abierto y copiado sus tablas a otra base de datos, que esta a tu disposición, si deseas enviarme algo, puedes utilizar el correo que sale en la cabecera, simplemente sustituye los paréntesis (ambos) por la arroba.
Si lo que deseas en que te remita la base, (supongo que los datos son 'al menos parcialmente', privados) pues me indicas una dirección y luego ya en tu poder, dispones libremente de ella.

Un saludo E. Feijoo
P.D.
Y si no lo he entendido bien (será a causa del sopor que produce la digestión), pues me corriges en el punto equivocado.

"leandro (2x3)" <dosx...@hotmail.com> escribió en el mensaje news:%237qXeCi...@TK2MSFTNGP09.phx.gbl...

Marciano

unread,
Oct 4, 2004, 11:08:23 AM10/4/04
to
Seguramente estoy dando PALOS DE CIEGO, pero recuerdo que en alguna ocasion
he conseguido reparar una mdb estropeada desde linea de comandos con el
modificador /decompile.
No recuerdo muy bien como era, pero creo que lo encontre por aqui, y seguro
que hay alguien que lo sepa.
Como he dicho es dar palos de ciego, pero ... POR PROBAR ....

Creo que era algo asi:

rutaYnombreCompletos de msacces.exe /decompile rutaYNombreCompletosMDB


Chea

unread,
Oct 4, 2004, 11:11:30 AM10/4/04
to
Pues yo uso autonuméricos y nunca he tenido un problema por ello :-|


--
Saludos.

José Bengoechea Ibaceta [MS-MVP Access]
http://perso.wanadoo.es/j.bchea
"McPegasus" <mcpe...@XQuitarXmcpegasus.net> escribió en el mensaje
news:%235qXL7h...@tk2msftngp13.phx.gbl...

Eduardo Olaz

unread,
Oct 4, 2004, 11:47:41 AM10/4/04
to
Ya la he bajado y tengo los mismos problemas que el resto :((

Saludos desde la calle Estafeta de Pamplona:

Eduardo Olaz
Microsoft [MVP] Access

eduardoALGARROBAolaz.net
ALGARROBA = @

"elricho" <nin...@nadie.com> escribió en el mensaje
news:uQF1Llhq...@TK2MSFTNGP10.phx.gbl...

McPegasus

unread,
Oct 4, 2004, 11:52:46 AM10/4/04
to
(yatamoselincordiantedeturno)

Pues es como todo en esta vida Sr.Anchoa ;)))), mi opinión es no usarlos ya
que en una ocasión tuve que hacer modificaciones en una db y sufrí un poco,
de esto ya hace tiempo, era un chaval inexperto, pero esas cosas se quedan
clavadas, ahora que estoy más pelao de pelo pero no lo digo por otra cosa,
pues me creo mis autoincrementadores y estoy pues como que mucho más feliz
;)).

-------- ¡Importante! Colabora con el grupo. Contesta a este mensaje y dinos
si te sirvió o no la respuesta dada. Muchas gracias -------- Un saludos,
Rafael Andrada Valencia [es] ..:: Tu Access, Mi Pasión ::..
www.mcpegasus.net [Office Systems - Access]

"Chea" <j.bcheatar...@wanadoo.es> escribió en el mensaje
news:eMfboRi...@TK2MSFTNGP09.phx.gbl...

elricho

unread,
Oct 4, 2004, 11:53:16 AM10/4/04
to
Ahora que me paso esto opino como tu, totalmente de acuerdo.

McPegasus como harias para simular un autonumerico. Osea para que lo cree
independientemente tu codigo, en que evento lo pondrias y como harias con el
tema de que la base es multiusuario para que no alla conflictos de
duplicados ?

Gracias por tu experiencia.

"McPegasus" <mcpe...@XQuitarXmcpegasus.net> escribió en el mensaje

news:%23HZLpoi...@TK2MSFTNGP15.phx.gbl...

elricho

unread,
Oct 4, 2004, 11:58:20 AM10/4/04
to
FEIJOO !!!!
MAESTRO como hiciste por favor contanos ??? Osea que mantubo los mismos
autonumericos grandioso.

in...@elricho.com.ar si no es molestia enviamela GRACIAS.

"E. Feijoo" <e.feijoo()retemail.es> escribió en el mensaje

news:%23tMl9Ni...@TK2MSFTNGP14.phx.gbl...

Eduardo Olaz

unread,
Oct 4, 2004, 1:09:24 PM10/4/04
to
Te ha enviado un fichero Excel con los datos de todas las tablas.
Cada hoja tiene el nombre de la tabla, y los encabecimientos de columnas los
nombres de los campos.

Curiosamente se puede acceder al fichero deteriorado con Visual Basic y con
VB.Net, en cambio con Access da el error comentado.
No he probado con otros programas.

Incluso con VB.Net se pueden analizar los tipos de campos.


Saludos desde la calle Estafeta de Pamplona:

Eduardo Olaz
Microsoft [MVP] Access

eduardoALGARROBAolaz.net
ALGARROBA = @


"elricho" <nin...@nadie.com> escribió en el mensaje
news:%237rhEvi...@TK2MSFTNGP10.phx.gbl...

Eduardo Olaz

unread,
Oct 4, 2004, 1:10:10 PM10/4/04
to
Ya lo he probado y no funciona

Saludos desde la calle Estafeta de Pamplona:

Eduardo Olaz
Microsoft [MVP] Access

eduardoALGARROBAolaz.net
ALGARROBA = @


"Marciano" <marciano...@ugr.es> escribió en el mensaje
news:eG98BQi...@TK2MSFTNGP11.phx.gbl...

E. Feijoo

unread,
Oct 4, 2004, 1:31:24 PM10/4/04
to
-------------------------------------------------------------------
- Importante! Colabora con el grupo. Contesta a este mensaje -
- y dinos si te sirvió o no la respuesta dada. Muchas gracias -
-------------------------------------------------------------------

No efectué maniobras raras, simplemente tengo predeterminado que se abra el Access (XP) en modo XP y no en 2000 ... dio el mensaje de error y no se dejaba compactar, pero dado que tenia acceso a las tablas, las exporte de forma unitaria... antes de eso, abrí la ventana de relaciones y solo había una, por lo que espero que no se modificasen los contadores... cosa que solo podrás saber tu si intentas reconstruir las relaciones.

Si al menos te son útiles los datos, pues Eureka, en otro caso a esperar el milagro.
No cantes victoria de momento... aun es pronto, ya llegara el momento de descorchar la botella de champaña.

Un saludo E. Feijoo

"elricho" <nin...@nadie.com> escribió en el mensaje news:%237rhEvi...@TK2MSFTNGP10.phx.gbl...

Eduardo Olaz

unread,
Oct 4, 2004, 1:48:22 PM10/4/04
to
Un sistema clásico:

Supongamos que tenemos sólo dos tablas en las que hay que emular
autonuméricos.
La tabla CabeceraFacturas, con el campo idfactura
La tabla Clientes con el campo idCliente.

Creamos una tabla auxiliar llamada "Autonumericos"

Esta tabla tiene dos campos
1º [NombreCampo] texto, 2º [idCampo] de tipo Long
La tabla tendrá un registro por cada tabla que tenga que controlar

Por ejemplo, en nuestro caso, supongamos que en la tabla Clientes vamos por
el cliente 1234 y en la tabla facturas por la factura 2151

La tabla Autonumericos tendrá 2 registros.
El primero tendrá como datos
[NombreCampo] [idCampo]
Cliente 1234
Factura 2151

Supongamos que quiero dar de alta a un cliente Nuevo.
Procedimiento a seguir.
Abro la tabla en modo exclusivo (la bloqueo)
Si ya está bloqueada recupero el error e inmediatamente vuelvo a intentarlo.
Leo el registro correspondiente al idCliente
Sustituyo ese valor por el valor + 1, en este caso 1235
Cierro la tabla, con lo que la desbloqueo
Devuelvo el nuevo valor.
Todo esto desde una función que tomará como parámetro el nombre del campo y
devolverá su nuevo valor.
El bloqueo de la tabla es minúsculo en tiempo, al realizarse muy rápidamente
dentro del procedimiento, con lo que la posibilidad de que se produzcan
problemas de concurrencia son mínimos. Si se produjeran se captura el error
y se vuelve a intentar.
Lógicamente habrá que poner algún mecanismo que detecte si la tabla en ese
instante está bloqueada e inmediatamente vuelva a intentar el proceso.

Esto era lo que se solía hacer en los tiempos gloriosos de Clipper y DBase,
que no tenían ningún método para generar autonuméricos.

Emilio

unread,
Oct 4, 2004, 2:28:27 PM10/4/04
to
--------------------------------------------------------------------------
¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te

sirvió o no la respuesta dada. Muchas gracias
--------------------------------------------------------------------------
Hola a tod@s

Yo acabo de recuperar la estructura de las tablas, pero nada más


Saludos a tod@s desde Huelva
Emilio
miliuco56 ALGARROBA hotmail.com

Reglas de conducta de los grupos de noticias:
http://support.microsoft.com/default.aspx?scid=fh;ES-ES;newsreglas

"E. Feijoo" <e.feijoo()retemail.es> escribió en el mensaje

news:exr84fjq...@TK2MSFTNGP14.phx.gbl...

Eduardo Olaz

unread,
Oct 4, 2004, 2:35:48 PM10/4/04
to
Una vez generado el módulo Bas que se genera, hay que modificar en el código
Bas algunas palabras, por ejemplo las que hacen mención a Verdadero y Falso,
sustituyéndolas por True y False.
Después de eso falla en los SQL de las consultas, pero como supongo que no
son importantes, tras el proceso se crea una BD con la estructura que tiene
la 1ª
Te genera los id con autonumérico, por lo que hay que crear un procedimiento
que vaya añadiendo línea a línea los datos en las nuevas tablas desde el xls
que tengas vinculado.
1º Añade una nueva línea con datos como * en campos texto y ceros 0 en
campos numérico.
A continuación se lee qué id ha generado el programa, si es igual al id de
la tabla vinculada se cambian los datos introducidos por los reales.
A continuación se crea un nuevo registro, como he indicado.
Se comprueban los campos clave; si el id de la tabla es menor que el que se
quiere grabar (correspondería a algún registro eliminado con anterioridad)
se crea un nuevo registro en la tabla hasta que coincida con el id de la
tabla vinculada.
Así sucesivamente registro por registro y tabla por tabla.
Luego se eliminan los registros sin datos válidos con una simple consulta en
cada tabla.

Paciencia y buenos alimentos.

Saludos desde la calle Estafeta de Pamplona:

Eduardo Olaz
Microsoft [MVP] Access

eduardoALGARROBAolaz.net
ALGARROBA = @

"José Mª Fueyo" <jmf...@NOSPAMya.com> escribió en el mensaje
news:%23RZbNLi...@TK2MSFTNGP10.phx.gbl...


> -----------------------------------------------------------
> ¡Importante!: Colabora con el grupo.Contesta a este
> mensaje y dinos si te sirvió o no la respuesta dada.
> Muchas gracias
> -----------------------------------------------------------

> Hola.
> A ver, por lo que tengo entendido, puedes acceder a esa mdb por programa
> ¿no? en ese caso, ¿no podría ser que dicho programa, modificara el mdb
> para
> que solo sea accesible por dicho programa?
> En caso negativo, adjunto un proyecto de vb que leee un mdb y crea un
> módulo
> BAS para reproducir la estructura de dicho mdb. Al menos, te puede servir
> para, primero crearte un nuevo mdb, y posteriormente conectarte y hacer
> sobre éste nuevo mdb, un vuelco de datos.
> Una cosa, habrá que modificar la forma de conexión, para que acepte
> password. Como siempre, el ejemplo de como es esa cadena está en
> http://www.able-consulting.com/MDAC/ADO/Connection/OLEDB_Providers.htm#OLEDBProviderForMicrosoftJet
> Espero que sirva de pista para empezar a hacer algo. Sintiendolo mucho, no
> tengo ahora mucho tiempo para experimentar por mi cuenta.
>
> ¡¡Suerte!!
> --
> José Mª Fueyo
> [MS MVP Access]
>
>
>


--------------------------------------------------------------------------------


>
>
>

elricho

unread,
Oct 4, 2004, 2:55:58 PM10/4/04
to
Si Eduardo excelente lo que dices.

Esa solucion esta muy bien me dara trabajo pero para la proxima es la
correcta.


"Eduardo Olaz" <eduardoA...@olaz.net> escribió en el mensaje
news:uDchEEkq...@TK2MSFTNGP09.phx.gbl...

José Mª Fueyo (Desde el curro)

unread,
Oct 4, 2004, 3:11:09 PM10/4/04
to
No se sí servirá pero...
La verdad del switch/Decompila (/Decomplie)
http://tinyurl.com/3rofn

Salu2


--
José Mª Fueyo
[MS MVP Access]

PD: No se, pero parece que este va a ser un hilo record :-) espero que con
final feliz


Eduardo Olaz

unread,
Oct 4, 2004, 3:37:21 PM10/4/04
to
Tengo una mdb con las tablas creadas con la estructura original, y los datos
en hojas de un documento Excel con el nombre de los campos por encabezado y
una ´hoja por cada tabla.

Saludos desde la calle Estafeta de Pamplona:

Eduardo Olaz
Microsoft [MVP] Access

eduardoALGARROBAolaz.net
ALGARROBA = @

"Emilio" <miliuco56 ARROBA Hotmail.com> escribió en el mensaje
news:%236Qvx$jqEHA...@TK2MSFTNGP15.phx.gbl...

Marciano

unread,
Oct 4, 2004, 4:57:34 PM10/4/04
to
Gracias, al consultarlo he recordado que ya lo había leido, seguramente ya
me enviasteis ahí antes.
De todas formas, parece que ya está encarrilada la solución del problema, de
lo cual me alegro

SALUDOS

"José Mª Fueyo (Desde el curro)" <jmf...@NOSPAMya.com> escribió en el
mensaje news:u0ffqXkq...@TK2MSFTNGP14.phx.gbl...

Sashka

unread,
Oct 4, 2004, 5:54:14 PM10/4/04
to
--------------------------------------------------------------------------
¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te
sirvió o no la respuesta dada. Muchas gracias
--------------------------------------------------------------------------
Cosas de estar aburrida y sin trabajo!!!!!

Cree una BD y le agregué una referencia a DAO 3.6
Un formulario con un botón....


Private Sub Comando0_Click()
Dim db As DAO.Database
Dim tdef As DAO.TableDef
Dim idxNew As DAO.Index


Set db = OpenDatabase("C:\agv-base.mdb", , False) 'poner la ruta del
MDB corrupto...

Set tdef = db.TableDefs!MSysAccessObjects

With tdef
Set idxNew = .CreateIndex("AOindex")
idxNew.Fields.Append idxNew.CreateField("ID")
idxNew.Primary = True
.Indexes.Append idxNew
Set idxNew = Nothing
End With

db.Close
Set db = Nothing

End Sub

:-DDDDDDDD Funcionó!!!!!

Sashka
MS MVP Access
MCP ASP.Net

"elricho" <nin...@nadie.com> escribió en el mensaje

news:enO4cLhq...@tk2msftngp13.phx.gbl...
> Bueno espero tener la colaboracion o al menos la lectura de ustedes ya que
> tengo que encarar y solucionar este problema pero para que sea solucionado
> por todos los que los pasan, porque jamas he visto solucion de esto.
>

> Apelo a la lectura de todos a cualquier colaboracion sobre este tema para

julian-Vlc-Sp

unread,
Oct 4, 2004, 6:07:39 PM10/4/04
to
==========================================================

¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te
sirvió o no la respuesta dada. Muchas gracias.
==========================================================

Eres una maquina, aunque estes escondida, eres una maquina.

Cuentame algo del otro julian

SALUDOS.
julian-Valencia-España

http://www.access-facil.tk
http://www.access-sin-codigo.tk
"Sashka" <sasshk...@NOVAESTOhotmail.com> escribió en el mensaje
news:%23IAR3yl...@TK2MSFTNGP09.phx.gbl...

elricho

unread,
Oct 4, 2004, 6:22:03 PM10/4/04
to
QUE GENIA !

TE FELICITO. Yo quise hacer lo mismo pero no pasa del

Set db = OpenDatabase("C:\agv-base.mdb", , False)


Sera porque uso DAO 3.5 ??? ahora voy a probar con el access XP y te cuento.

un salu2


"Sashka" <sasshk...@NOVAESTOhotmail.com> escribió en el mensaje
news:#IAR3ylq...@TK2MSFTNGP09.phx.gbl...

elricho

unread,
Oct 4, 2004, 6:35:15 PM10/4/04
to
FUNCIONA !!! SI USAS DAO 3.6

sasshka eres la luz de mi dia !

Hoy puedo dormir tranquilo

GRACIAS A TODOS POR REUNIR SUS CONOCIMIENTOS Y HABERME AYUDADO A SOLUCIONAR
ESTE PROBLEMON.

AHORA aoindex ya tiene solucion GRACIAS a todos los aportes de Ustedes

GRACIAS, GRACIAS y MIL GRACIAS a TODOS !!!


"elricho" <y...@yo.com> escribió en el mensaje
news:#R4f5Lmq...@TK2MSFTNGP11.phx.gbl...

Sashka

unread,
Oct 4, 2004, 7:00:44 PM10/4/04
to
--------------------------------------------------------------------------
¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te
sirvió o no la respuesta dada. Muchas gracias
--------------------------------------------------------------------------
Eso... tiene que ser DAO 3.6 (si no lo tienes listado.... búscalo con
examinar... suele estar en archivos comunes... microsoft shared... DAO....)
Luego de hacerlo he compactado y reparardo sin problemas... pero en tus
zapatos... igual importaría todo a una nueva BD (y empezaría a tener backups
siempre actualizados!!)

Sashka
MS MVP Access
MCP ASP.Net

"elricho" <y...@yo.com> escribió en el mensaje
news:%23R4f5Lm...@TK2MSFTNGP11.phx.gbl...

Búho

unread,
Oct 4, 2004, 7:27:43 PM10/4/04
to
Enhorabuena SAS !!!!!!....

MachineTotalMatrix!!!!!

Eduardo Olaz

unread,
Oct 5, 2004, 5:47:34 AM10/5/04
to
Sencillo, claro y concreto
Y además funciona

Enhorabuena...

elricho

unread,
Oct 5, 2004, 7:23:58 AM10/5/04
to
Sabes Sashka lo mas triste es que por codigo yo hago los backup comprimiendo
y reparando la base de datos, y jamas dice que tiene error la base es mas
si lo hago ahora con la que esta con el error no dice nada.

Como hace 5 meses que no hago cambio en la estructura todos los backups
estan iguales.

QUE OPINAS ??? aqui no hay backup que valga, como te aseguras que esta bien
tu base, hay que habrirla a mano de vez en cuando un horror !!!

DBEngine.CompactDatabase Directorio & NombreFicheroOriginal,
DirectorioDestino & "compactada.mdb", , , ";pwd=laclave"

ESTO JAMAS DA ERROR SIN EMBARGO EL ERROR EXISTE. Como me aseguro que no
tenga error no se ?


"Sashka" <sasshk...@NOVAESTOhotmail.com> escribió en el mensaje

news:%23S5s%23XmqE...@TK2MSFTNGP12.phx.gbl...

José Mª Fueyo

unread,
Oct 5, 2004, 8:12:10 AM10/5/04
to
Chapo Sas. Me descubro.
Estas cosas, deberías ponerlas en el grupo inglés, de las privadas. Lo
merece.

Besos.

Sashka

unread,
Oct 5, 2004, 11:17:44 AM10/5/04
to
:-DDDD
Fue una humorada...la verdad es que ni yo esperé que fuera así de
sencillo... por eso postee con ese entusiasmo taaan asombradado....
Ya había conseguido recuperar en una BD todas las tablas intactas, con
indices... además de las consultas ... excepto una que incluia una
subconsulta... que daba error porque el código me cambiaba los parentesis
por corchetes... pero igual tenía el código SQL y la había copiado a
mano.... cuando se me ocurrió que si tenía acceso a MSysyAccessObjects...
quizá podía crear el índice que me reclamaba....

A propósito.... que es Chapo?????


Sashka
MS MVP Access
MCP ASP.Net

"José Mª Fueyo" <jmf...@NOSPAMya.com> escribió en el mensaje
news:OxD9KStq...@TK2MSFTNGP09.phx.gbl...

Sashka

unread,
Oct 5, 2004, 11:29:41 AM10/5/04
to
--------------------------------------------------------------------------
¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te
sirvió o no la respuesta dada. Muchas gracias
--------------------------------------------------------------------------
Es que el backup no es sólo para a estructura y código sino para los
datos....

Aca hay un link interesante para prevenir errores
http://support.microsoft.com/default.aspx?kbid=283849

Sashka
MS MVP Access
MCP ASP.Net

"elricho" <nin...@nadie.com> escribió en el mensaje

news:ez%23Gc6sq...@TK2MSFTNGP14.phx.gbl...

julian-Vlc-Sp

unread,
Oct 5, 2004, 3:23:16 PM10/5/04
to
==========================================================

¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te
sirvió o no la respuesta dada. Muchas gracias.
==========================================================

Juraria qeu Chapó es una españolizacion del termino francés Chapeau, que se
pronuncia chapó.

Este termino frances, en su primera acepcion es sombreo, y si tomamos esa
acepcion lo que estamos diciendo es qeu nos descubrimos ante algo o alguien
(en este caso tu), es decir, qeu nos quitamos el chapeau.

Chapeau tiene otra acepcion de exclamacion que se puede traducir como ¡Olé!,
y gustos taurinos aparte, creo que esto de ¡Olé! si lo entiendes?, verdad?

SALUDOS.
julian-Valencia-España

http://www.access-facil.tk
http://www.access-sin-codigo.tk
"Sashka" <sasshk...@NOVAESTOhotmail.com> escribió en el mensaje
news:OLbb55uq...@TK2MSFTNGP10.phx.gbl...

Sashka

unread,
Oct 5, 2004, 3:51:09 PM10/5/04
to
:-DDDD
Entiendo el término... pero a los que gustan de @#@# taurinas NO!!!!

Sashka
MS MVP Access
MCP ASP.Net

"julian-Vlc-Sp" <ijulianE...@iespanaPUNTO.es> escribió en el mensaje
news:OoGADDxq...@TK2MSFTNGP14.phx.gbl...

julian-Vlc-Sp

unread,
Oct 5, 2004, 4:04:13 PM10/5/04
to
==========================================================
¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te
sirvió o no la respuesta dada. Muchas gracias.
==========================================================

¿A ti tambien te han renovado lo de MVP?

SALUDOS.
julian-Valencia-España

http://www.access-facil.tk
http://www.access-sin-codigo.tk
"Sashka" <sasshk...@NOVAESTOhotmail.com> escribió en el mensaje

news:%23t3%23rSxqE...@TK2MSFTNGP10.phx.gbl...

Sashka

unread,
Oct 5, 2004, 4:28:52 PM10/5/04
to
-------------------------------------------------------------------------

¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te
sirvió o no la respuesta dada. Muchas gracias
--------------------------------------------------------------------------
Yo soy de enero... hasta enero habrá que esperar....

Sashka
MS MVP Access
MCP ASP.Net

"julian-Vlc-Sp" <ijulianE...@iespanaPUNTO.es> escribió en el mensaje

news:%23pSJ8Zx...@TK2MSFTNGP15.phx.gbl...

julian-Vlc-Sp

unread,
Oct 5, 2004, 4:40:29 PM10/5/04
to
==========================================================
¡Importante!: Colabora con el grupo.Contesta a este mensaje y dinos si te
sirvió o no la respuesta dada. Muchas gracias.
==========================================================

Asi me gusta, que adaptes la firma, ya se qeu a ti te dan las gracias en
privado, pero creo qeu es buena idea.

En cuanto a lo de Enero, crei que era a todos a la vez, pero ten cuidado,
les escribiré hablando mal de ti, ¿que hay de una web que hay por ahi
rodando?, jejejejeje

SALUDOS.
julian-Valencia-España

http://www.access-facil.tk
http://www.access-sin-codigo.tk
"Sashka" <sasshk...@NOVAESTOhotmail.com> escribió en el mensaje

news:ORq1wnx...@tk2msftngp13.phx.gbl...

Sashka

unread,
Oct 5, 2004, 4:43:55 PM10/5/04
to
:-DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD

Sashka
MS MVP Access
MCP ASP.Net

"julian-Vlc-Sp" <ijulianE...@iespanaPUNTO.es> escribió en el mensaje

news:uIYzKuxq...@TK2MSFTNGP15.phx.gbl...

José Mª Fueyo

unread,
Oct 6, 2004, 5:38:29 AM10/6/04
to

> A propósito.... que es Chapo?????
Me quito el sombrero. Como siempre, impresionante...
0 new messages