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

-- mejora en carga imagen AF

Browse Source
This commit is contained in:
rrene
2024-09-26 17:45:53 -07:00
parent cacd261747
commit a64e3cefe2
3 changed files with 8 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
AF/AF.aspx.vb
View File

@@ -2394,10 +2394,10 @@ Partial Class AF_AF
End If
NewName = String.Format("{0}{1}", NewName, IO.Path.GetExtension(DirectorioOld.ToString()))
DirectorioNew.Append(NewName)
If ObjActivosFijos.AddActivosFijosImagenes(CveActivoFijo, String.Format("AF/{0}", NewName), UsuarioActual.CveUsuario) Then
If ObjActivosFijos.AddActivosFijosImagenes(CveActivoFijo, String.Format("AF/{0}", NewName), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) > 0 Then
CargarArchivo()
My.Computer.FileSystem.MoveFile(DirectorioOld.ToString, DirectorioNew.ToString)
Else
My.Computer.FileSystem.MoveFile(DirectorioOld.ToString, DirectorioNew.ToString)
End If
Retorno = True
Catch ex As Exception
@@ -2409,8 +2409,6 @@ Partial Class AF_AF
UpUpFotos.Update()
Next
End Sub
Protected Sub BtnEliminarFoto_Click(sender As Object, e As System.EventArgs)