Cómo funciona JustAnswer:
  • Preguntar a un Experto
    Los expertos tienen muchos conocimientos valiosos y están dispuestos a ayudar en cualquier pregunta. Credenciales confirmadas por una empresa de verificación perteneciente a Fortune 500.
  • Obtener una respuesta profesional
    Por correo electrónico, mensaje de texto o notificación mientras espera en su sitio. Haga preguntas de seguimiento si lo necesita.
  • Garantía de satisfacción plena
    Garantizamos tu satisfacción.
Formule su propia pregunta a elbrujomdq
elbrujomdq
elbrujomdq, Técnico informático
Categoría: Informática
Clientes satisfechos: 495
Experiencia:  Analista de sistemas, Desarrollo de Software
67837258
Escriba su pregunta sobre Informática aquí...
elbrujomdq está en línea ahora

Tengo un sistema de presupuestos para la construcción hasta

Pregunta del cliente

Tengo un sistema de presupuestos para la construcción hasta Access 2007 funciono una rutina que permite cambiar las tablas vinculadas de un proyecto para usuarios comunes, al cambiar a Access 2013 no funciona la rutina, que debo hacer.

La rutina es:

 

'- vinculacion de tablas ------------------------------------

Public Function VINCULAR(gPresupuesto) As String

On Error GoTo ErrorVinculos

Dim xArchivo As String

Set Db = CurrentDb

VarReturn = SysCmd(acSysCmdSetStatus, " Vinculando " & gPresupuesto)

Liga = "C:\SPP\" & gPresupuesto & "\" & gPresupuesto & ".mdb"

xArchivo = Dir(Liga)

If xArchivo = "" Then

VINCULAR = "No"

Exit Function

End If

Set rst = Db.OpenRecordset("VINCULOS")

Do Until rst.EOF

Set tdf = Db.TableDefs(rst!Tabla)

tdf.Connect = ";DATABASE=" & Liga

tdf.RefreshLink

rst.MoveNext

Loop

SalidaVinculos:

VINCULAR = "Ok"

VarReturn = SysCmd(acSysCmdClearStatus)

Exit Function

ErrorVinculos:

VINCULAR = "No existe presupuesto " & gPresupuesto & " o tabla " & rst!Tabla

End Function

Enviada: hace 4 año.
Categoría: Informática
Experto:  elbrujomdq escribió hace 4 año.
Buen dia,

Cuando dice que no funciona, que es lo que no hace? que error le da?


Quedo a la espera de la informacion requerida.

Cordialmente,
Roberto
Experto:  elbrujomdq escribió hace 4 año.

El sistema me indica que vio mi respuesta y no quedo conforme con ella, sin embargo no me dice que es lo que necesita en su calificacion, si recien empezamos con la gestion. Ud debe calificar cuando terminemos.

De mi parte, no puedo dar una respuesta hasta que no responda lo consultado anteriormente.

Sigo en linea a la espera

Cliente: escribió hace 4 año.

Ya resolvi el problema

Experto:  elbrujomdq escribió hace 4 año.
El codigo no le veo nada mal, podria venir por el lado de la base de datos ya que cambiaron el formato, pero sin saber que error le indica no puedo responder correctamente
elbrujomdq y otros otros especialistas en Informática están preparados para ayudarle