AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

-- parametro de rutadb

Browse Source
This commit is contained in:
rrene
2024-04-26 06:13:37 -07:00
parent 8ffe137e16
commit 1486f3d370
2 changed files with 3 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
App_Code/ClsOIEventos.vb
View File

@@ -153,11 +153,11 @@ Public Class ClsOIEventos
#End Region #End Region
#End Region #End Region
Sub New(Optional TransaccionCompartida As SqlTransaction = Nothing) Sub New(Optional TransaccionCompartida As SqlTransaction = Nothing, Optional UsuarioActual As Usuario = Nothing)
If TransaccionCompartida Is Nothing Then If TransaccionCompartida Is Nothing Then
SqlConexion = New SqlConnection SqlConexion = New SqlConnection
SqlConexion.ConnectionString = ClsPaginas.UsuarioActualRutaDB SqlConexion.ConnectionString = If(UsuarioActual IsNot Nothing, UsuarioActual.RutaDB, ClsPaginas.UsuarioActualRutaDB)
Try Try
SqlConexion.Open() SqlConexion.Open()
Catch ex As Exception Catch ex As Exception

7
App_Code/ClsVentas.vb
View File

@@ -80,12 +80,7 @@ Public Class ClsVentas
If TransaccionCompartida Is Nothing Then If TransaccionCompartida Is Nothing Then
SqlConexion = New SqlConnection SqlConexion = New SqlConnection
SqlConexion.ConnectionString = If(UsuarioActual IsNot Nothing, UsuarioActual.RutaDB, ClsPaginas.UsuarioActualRutaDB)
If UsuarioActual IsNot Nothing Then
SqlConexion.ConnectionString = UsuarioActual.RutaDB
Else
SqlConexion.ConnectionString = ClsPaginas.UsuarioActualRutaDB
End If
Try Try
SqlConexion.Open() SqlConexion.Open()