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

Ruta dinamica de carpeta "Empresas" asignar valor desde el web config

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2020-05-12 00:29:19 -07:00
parent 701eec057e
commit 4dd49e29f5
133 changed files with 3971 additions and 3886 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
OC/CotizacionEnLinea.aspx.vb
View File

@@ -299,10 +299,10 @@ Partial Class OC_CotizacionEnLinea
If FUArchivo.HasFile Then
'verificar que exista el directorio
If Not System.IO.Directory.Exists(String.Format("{0}/Empresas/{1}/Cotizaciones/", AppDomain.CurrentDomain.BaseDirectory, CveEmpresa)) Then
System.IO.Directory.CreateDirectory(String.Format("{0}/Empresas/{1}/Cotizaciones/", AppDomain.CurrentDomain.BaseDirectory, CveEmpresa))
If Not System.IO.Directory.Exists(String.Format("{0}/Empresas/{1}/Cotizaciones/", ModExtensiones.DirectorioBaseEmpresas, CveEmpresa)) Then
System.IO.Directory.CreateDirectory(String.Format("{0}/Empresas/{1}/Cotizaciones/", ModExtensiones.DirectorioBaseEmpresas, CveEmpresa))
End If
FUArchivo.SaveAs(String.Format("{0}/Empresas/{1}/Cotizaciones/{2}{3}", AppDomain.CurrentDomain.BaseDirectory, CveEmpresa, CveCotizacion, IO.Path.GetExtension(FUArchivo.FileName)))
FUArchivo.SaveAs(String.Format("{0}/Empresas/{1}/Cotizaciones/{2}{3}", ModExtensiones.DirectorioBaseEmpresas, CveEmpresa, CveCotizacion, IO.Path.GetExtension(FUArchivo.FileName)))
End If
For Each dr As GridViewRow In GvD.Rows
@@ -351,7 +351,7 @@ Partial Class OC_CotizacionEnLinea
Dim Mail As New ClsSisMail()
Empresa = ClsPaginas.EmpresaNotificaciones
Empresa.Ruta = String.Format("{0}Empresas\{1}\", AppDomain.CurrentDomain.BaseDirectory, CveEmpresa)
'Empresa.Ruta = String.Format("{0}Empresas\{1}\", ModExtensiones.DirectorioBaseEmpresas, CveEmpresa)
Mail.SendMail(Empresa, ViewState("Para").ToString, ViewState("Asunto").ToString, ViewState("Body").ToString, ViewState("ArrayCC").ToString)