error al conectar con Base de Datos
Publicado por Michael Elvis (18 intervenciones) el 17/07/2024 04:10:31
Buenas noches, por favor necesito ayuda, tengo un aplicativo desarrollado en vb.net y al crear el ejecutable no hay problema; el problema esta cuando instalo en otra pc se ejecuta normal pero no se conecta a la BD (access), pero en mi pc si no hay ningún problema, le hago llegar la programación hacia la base de datos:
Module Conexiones
Public conexion As OleDb.OleDbConnection
Public Sub AbrirConexion()
Try
conexion = New OleDb.OleDbConnection
conexion.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & Application.StartupPath & "\Fichas.accdb" 'UBICAR CARPETA DE INSTALACION Y BD FORMA1
conexion.Open()
'MsgBox("Conexión exitosa", vbInformation, "mikharozhu")
Catch ex As Exception
MsgBox("Error al conectar a la base de datos", vbCritical, "mikharozhu")
End Try
End Sub
End Module
App.Config
<?xml versión="1.0" encoding="utf-8" ?>
<configuration>
<configSections>
</configSections>
<connectionStrings>
<add name="Fichas.My.MySettings.FichasConnectionString" connectionString="Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\Fichas.accdb"
providerName="System.Data.OleDb" />
</connectionStrings>
<startup>
<supportedRuntime versión="v4.0" sku=".NETFramework,Version=v4.7.2" />
</startup>
</configuration>
Module Conexiones
Public conexion As OleDb.OleDbConnection
Public Sub AbrirConexion()
Try
conexion = New OleDb.OleDbConnection
conexion.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & Application.StartupPath & "\Fichas.accdb" 'UBICAR CARPETA DE INSTALACION Y BD FORMA1
conexion.Open()
'MsgBox("Conexión exitosa", vbInformation, "mikharozhu")
Catch ex As Exception
MsgBox("Error al conectar a la base de datos", vbCritical, "mikharozhu")
End Try
End Sub
End Module
App.Config
<?xml versión="1.0" encoding="utf-8" ?>
<configuration>
<configSections>
</configSections>
<connectionStrings>
<add name="Fichas.My.MySettings.FichasConnectionString" connectionString="Provider=Microsoft.ACE.OLEDB.12.0;Data Source=|DataDirectory|\Fichas.accdb"
providerName="System.Data.OleDb" />
</connectionStrings>
<startup>
<supportedRuntime versión="v4.0" sku=".NETFramework,Version=v4.7.2" />
</startup>
</configuration>
Valora esta pregunta


0