Ver Mensaje Individual
  #1 (permalink)  
Antiguo 24/07/2011, 16:16
guillebomtrasmiti
 
Fecha de Ingreso: noviembre-2010
Ubicación: madrid
Mensajes: 478
Antigüedad: 14 años
Puntos: 5
Pregunta envío datos a otra MDB

Hola amigos ... trabajo con un proyecto que tiene un botón que envía datos de una base de datos a otra, el problema que tengo es que ahora el usuario guarda en un textbox la ruta de la base de datos MDB y además la base de datos orignal está donde esté el ejecutable...quiere decir que no se dónde está la base de datos original pues el cliente puede instalar el programa en C: o en E: o en el escritorio...vamos dónde le de la gana hasta ahora usaba esto;

comados.CommandText = "insert into [MS Access;DATABASE=C:\Carp1\esion.mdb].[Introducciónentas] select * from [MS Access;DATABASE=C:\Gess\esion.mdb].[IntroduccionentasAa] WHERE Fecha BETWEEN @FI AND @FF order by Fecha"

pero claro ahora la Carp1 ya no existe...quiere decir elige la ruta en un textbox el cliente y c:\Gess, tampoco existe tal cual ya que para la ruta uso esto;

Dim myPath As String = Application.StartupPath
conexion.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + myPath + "\esion.mdb"

así es que puede estar en cualquier lugar...hice esto pero no funciona;

comados.CommandText = "insert into [MS Access;DATABASE= " & frmConfig.TextBox1.Text & ".[Introducciónentas] select * from [MS Access;DATABASE=myPath\esion.mdb].[IntroduccionentasAa] WHERE Fecha BETWEEN @FI AND @FF order by Fecha"

pero no va....alguna ayuda?=?