Archivos Innecesarios

This commit is contained in:
2019-08-16 11:54:42 -07:00
parent a5a840f799
commit 4656da6bc6
18 changed files with 0 additions and 2462 deletions

View File

@@ -1,350 +0,0 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="Clientes2.aspx.vb" Inherits="PRESENTACIONES_Clientes2" %>
<%@ Register Assembly="AjaxControlToolkit" Namespace="AjaxControlToolkit" TagPrefix="asp" %>
<asp:Content ID="Content1" ContentPlaceHolderID="H" Runat="Server">
<img id="ImgAddVenta" runat="server" alt="Registrar Nueva Venta" style="cursor: pointer;" src="/Imagenes/Nota.gif" width="20" height="25" />
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="E" Runat="Server">
<asp:Literal ID="LtlTitulo" runat="server" Text="Registro de Clientes"></asp:Literal>&nbsp;<asp:Literal ID="LtlCliente" runat="server"></asp:Literal>
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="C" Runat="Server">
<%--<script language="javascript" type="text/javascript">
function SetText(ObjFrom, ObjTo) {
ObjTo.innerText = ObjFrom.value;
}
function SetText2(ObjTo, Value) {
ObjTo.innerText = Value;
}
function getSelectedText(Obj, IfIsNull) {
if (Obj.selectedIndex == -1)
return IfIsNull;
else
return Obj.options[Obj.selectedIndex].text;
}
//this pageLoad will only works if you are using ASP.Net AJAX
//if you're not, you can use the other way.
function pageLoad() {
var grid = document.getElementById('<%=GvCxC.ClientID %>');
var grid2 = document.getElementById('<%=GvCxCHistorial.ClientID %>');
var firstRowHeaderClone = null;
if (grid && grid2 && grid.cells && grid2.cells) {
if (grid && grid.cells.length > 1) {
firstRowHeaderClone = grid.tBodies[0].rows[0].cloneNode(true);
grid.tBodies[0].insertBefore(firstRowHeaderClone, grid.tBodies[0].rows[0]);
var Row1 = grid.tBodies[0].rows[0];
var Row2 = grid.tBodies[0].rows[1];
if (Row1.cells.length > 1 && Row2.cells.length > 1) {
Row2.deleteCell(0);
Row2.deleteCell(0);
Row2.deleteCell(0);
Row2.deleteCell(0);
Row2.deleteCell(0);
Row1.cells[0].rowSpan = 2;
Row1.cells[1].rowSpan = 2;
Row1.cells[2].rowSpan = 2;
Row1.cells[3].rowSpan = 2;
Row1.cells[4].rowSpan = 2;
Row1.deleteCell(6);
Row1.deleteCell(7);
Row1.cells[5].colSpan = 2;
Row1.cells[6].colSpan = 2;
Row2.deleteCell(4);
Row2.deleteCell(4);
Row1.cells[7].rowSpan = 2;
Row1.cells[8].rowSpan = 2;
}
}
var firstRowHeaderClone2 = null;
if (grid2 && grid2.cells.length > 1) {
firstRowHeaderClone2 = grid2.tBodies[0].rows[0].cloneNode(true);
grid2.tBodies[0].insertBefore(firstRowHeaderClone2, grid2.tBodies[0].rows[0]);
var Row12 = grid2.tBodies[0].rows[0];
var Row22 = grid2.tBodies[0].rows[1];
if (Row12.cells.length > 1 && Row22.cells.length > 1) {
Row22.deleteCell(0);
Row22.deleteCell(0);
Row22.deleteCell(0);
Row22.deleteCell(0);
Row22.deleteCell(0);
Row12.cells[0].rowSpan = 2;
Row12.cells[1].rowSpan = 2;
Row12.cells[2].rowSpan = 2;
Row12.cells[3].rowSpan = 2;
Row12.cells[4].rowSpan = 2;
Row12.deleteCell(6);
Row12.deleteCell(7);
Row12.cells[5].colSpan = 2;
Row12.cells[6].colSpan = 2;
Row22.deleteCell(4);
Row22.deleteCell(4);
Row12.cells[7].rowSpan = 2;
Row12.cells[8].rowSpan = 2;
}
}
}
}
</script>--%>
<table border="0" cellpadding="0" cellspacing="0" width="100%" style="padding-top:20px;">
<tr>
<td align="left">
<asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<ajax:TabContainer ID="Tab" runat="server" ActiveTabIndex="0" Width="100%">
<ajax:TabPanel ID="TabAlta" runat="server" HeaderText="Información del Cliente">
<ContentTemplate>
<table border="0" class="contenido">
<tr>
<td>
<div>
<fieldset>
<legend><b>Datos del Cliente</b></legend>
<table border="0">
<tr>
<td>Nombre:</td>
<td>
<asp:TextBox ID="TxtNombre" runat="server" MaxLength="96" Width="400px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVNombre" runat="server" ControlToValidate="TxtNombre" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Nombre del Cliente''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCENombre" runat="server" HighlightCssClass="vco" TargetControlID="RFVNombre" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Dirección:</td>
<td>
<asp:TextBox ID="TxtDireccion" runat="server" MaxLength="90" Width="400px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVDireccion" runat="server" ControlToValidate="TxtDireccion" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Direccion''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCEDireccion" runat="server" HighlightCssClass="vco" TargetControlID="RFVDireccion" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>No. Ext.</td>
<td>
<table border="0" cellpadding="0" cellspacing="0">
<tr>
<td>
<asp:TextBox ID="TxtNoExt" runat="server" MaxLength="10" Width="40px"></asp:TextBox>
</td>
<td>&nbsp;No. Int.</td>
<td>
<asp:TextBox ID="TxtNoInt" runat="server" MaxLength="10" Width="40px"></asp:TextBox>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td>Colonia:</td>
<td>
<asp:TextBox ID="TxtColonia" runat="server" MaxLength="50" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVColonia" runat="server" ControlToValidate="TxtColonia" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Colonia''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCOColonia" runat="server" HighlightCssClass="vco" TargetControlID="RFVColonia" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Localidad:</td>
<td>
<asp:TextBox ID="TxtLocalidad" runat="server" MaxLength="50" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVLocalidad" runat="server" ControlToValidate="TxtLocalidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Localidad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCOLocalidad" runat="server" HighlightCssClass="vco" TargetControlID="RFVLocalidad" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Ciudad:</td>
<td>
<asp:TextBox ID="TxtCiudad" runat="server" MaxLength="40" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVCiudad" runat="server" ControlToValidate="TxtCiudad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Ciudad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCECiudad" runat="server" HighlightCssClass="vco" TargetControlID="RFVCiudad" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Estado:</td>
<td>
<asp:TextBox ID="TxtEstado" runat="server" MaxLength="25" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVEstado" runat="server" ControlToValidate="TxtEstado" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Estado''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCEEstado" runat="server" HighlightCssClass="vco" TargetControlID="RFVEstado" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>RFC:</td>
<td>
<asp:TextBox ID="TxtRFC" runat="server" MaxLength="13" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVRFC" runat="server" ControlToValidate="TxtRFC" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''RFC''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCERFC" runat="server" HighlightCssClass="vco" TargetControlID="RFVRFC" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Código Postal:</td>
<td>
<asp:TextBox ID="TxtCP" runat="server" MaxLength="5" Width="40px"></asp:TextBox>
<asp:CompareValidator ID="CVCP" runat="server" ControlToValidate="TxtCP" Display="None" ErrorMessage="El campo <b>''Codigo Postal''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Integer" ValidationGroup="GrpGuardar"></asp:CompareValidator>
<ajax:ValidatorCallOutExtender ID="VCOCP" runat="server" HighlightCssClass="vco" TargetControlID="CVCP" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Teléfono:</td>
<td><asp:TextBox ID="TxtTelefono" runat="server" MaxLength="15" Width="100px" ValidationGroup="GrpGuardar"></asp:TextBox></td>
</tr>
<tr>
<td>Contacto:</td>
<td><asp:TextBox ID="TxtContacto" runat="server" MaxLength="50" Width="200px"></asp:TextBox></td>
</tr>
<tr>
<td>Email:</td>
<td>
<asp:TextBox ID="TxtEmail" runat="server" MaxLength="50" Width="200px"></asp:TextBox>
<asp:RegularExpressionValidator ID="REVEmail" runat="server" ValidationExpression="\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*" ControlToValidate="TxtEmail" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Email''</b> no es válido, por favor ingrése uno correcto." ValidationGroup="GrpGuardar"></asp:RegularExpressionValidator>
<ajax:ValidatorCallOutExtender ID="VCOMail" runat="server" HighlightCssClass="vco" TargetControlID="REVEmail" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>ConfirmarnContraseña de Acceso:</td>
<td><asp:TextBox ID="TxtConfirmarContraseñaAcceso" runat="server" MaxLength="50" Width="200px"></asp:TextBox></td>
</tr>
</table>
</fieldset>
</div>
</td>
</tr>
</table>
</ContentTemplate>
</ajax:TabPanel>
</ajax:TabContainer>
</ContentTemplate>
</asp:UpdatePanel>
</td>
</tr>
<tr>
<td align="center">
<asp:UpdatePanel ID="UpGuardar" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:Button ID="BtnGuardar" runat="server" Text="Guardar" ValidationGroup="GrpGuardar" />
<asp:Button ID="BtnEliminar" runat="server" Text="Eliminar" />
<asp:ValidationSummary ID="VS" runat="server" DisplayMode="BulletList" ShowSummary="true" ValidationGroup="GrpGuardar" />
<asp:Button ID="BtnCancelar" runat="server" Text="Cancelar" OnClientClick="javascript:window.location.href='/Ventas/CatClientes.aspx'; return false;" />
</ContentTemplate>
</asp:UpdatePanel>
</td>
</tr>
</table>
<div id ="DivMail" style="width:350px; background-color:White; border:solid 1px black; color:Black; display:none; position:fixed; z-index: 1500">
<asp:UpdatePanel ID="UpSendMail" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:HiddenField ID="HdnCveVenta" runat="server" ClientIDMode="Static" Value="-1" />
<asp:HiddenField ID="HdnFolioVenta" runat="server" ClientIDMode="Static" Value="-1" />
<asp:HiddenField ID="HdnTipoDocto" runat="server" ClientIDMode="Static" Value="-1" />
<table border="1" rules="all" style="border-collapse: collapse; width: 350px">
<tr align="left">
<td width="150">Para:</td>
<td width="200">
<asp:TextBox ID="TxtParaMail" runat="server" ClientIDMode="Static" Width="194px" ReadOnly="true"></asp:TextBox>
<asp:RegularExpressionValidator ID="REVParaMail" runat="server" Display="None" ValidationExpression="\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*" ControlToValidate="TxtParaMail" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Para (Mail)''</b> no es válido, por favor ingrése uno correcto." ValidationGroup="GrpGuardar"></asp:RegularExpressionValidator>
<ajax:ValidatorCallOutExtender ID="VCOParaMail" runat="server" HighlightCssClass="vco" TargetControlID="REVParaMail" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr align="left">
<td>
Con copia para:<br />
(Separar con: ;)
</td>
<td><asp:TextBox ID="TxtCC" runat="server" TextMode="MultiLine" Columns="3" Rows="3" Width="194px"></asp:TextBox></td>
</tr>
<tr align="left">
<td>Texto Adicional:</td>
<td><asp:TextBox ID="TxtBody" runat="server" TextMode="MultiLine" Columns="3" Rows="3" Width="194px"></asp:TextBox></td>
</tr>
<tr>
<td align="center" colspan="2"><asp:Button ID="BtnSendMail" runat="server" OnClientClick="javascript:$get('DivMail').style.display='none';" Text="Enviar" />&nbsp;<input type="button" value="Cancelar" onclick="javascript:$get('DivMail').style.display='none';" /></td>
</tr>
</table>
</ContentTemplate>
</asp:UpdatePanel>
</div>
<div id ="DivAddPago" style="width:350px; background-color:White; border:solid 1px black; color:Black; display:none; position:fixed; z-index: 1500">
<asp:UpdatePanel ID="UpdatePanel1" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:HiddenField ID="HdnCveVentaAbono" runat="server" ClientIDMode="Static" Value="-1" />
<table border="1" rules="all" style="border-collapse: collapse; width: 350px">
<tr align="left">
<td width="150">Cantidad:</td>
<td width="200">
<asp:TextBox ID="TxtCantidad" runat="server" ClientIDMode="Static" ValidationGroup="GpoGuardarAbonar" Width="80px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVCantidad" runat="server" ControlToValidate="TxtCantidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> es necesario, por favor ingréselo." ValidationGroup="GpoGuardarAbonar"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="CVCantidadAbonar" runat="server" ControlToValidate="TxtCantidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> no tiene el formato correcto, por favor corrija." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GpoGuardarAbonar"></asp:CompareValidator>
<ajax:ValidatorCallOutExtender ID="VCOCantidad" runat="server" HighlightCssClass="vco" TargetControlID="RFVCantidad" Width="300px"></ajax:ValidatorCallOutExtender>
<ajax:ValidatorCallOutExtender ID="VCOCantidad2" runat="server" HighlightCssClass="vco" TargetControlID="CVCantidadAbonar" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<td><b>Fecha:</b>&nbsp;</td>
<td>
<asp:TextBox ID="TxtFechaPago" runat="server" BorderStyle="None" CausesValidation="true" MaxLength="10" ValidationGroup="GpoGuardarAbonar"></asp:TextBox>
&nbsp;<asp:ImageButton runat="server" ID="ImgFechaPago" Visible="false" ImageUrl="/Imagenes/calendar.png" ImageAlign="AbsMiddle" Width="16px" Height="16px" AlternateText="Click para ver el Calendario" />
<ajax:MaskedEditExtender ID="MEEFechaPago" runat="server" TargetControlID="TxtFechaPago" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender runat="server" ID="CEFechaPago" TargetControlID="TxtFechaPago" PopupButtonID="ImgFechaPago" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="RFVFechaPago" runat="server" ControlToValidate="TxtFechaPago" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> es necesario, por favor ingréselo." ValidationGroup="GpoGuardarAbonar"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="CVFechaPago" runat="server" ControlToValidate="TxtFechaPago" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> no tiene el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GpoGuardarAbonar"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="VCOFechaPago1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFechaPago" Width="350px"></ajax:ValidatorCalloutExtender>&nbsp;
<ajax:ValidatorCalloutExtender ID="VCOFechaPago2" runat="server" HighlightCssClass="vco" TargetControlID="CVFechaPago" Width="350px"></ajax:ValidatorCalloutExtender>&nbsp;
</td>
<tr>
<td>Referencia:</td>
<td>
<asp:TextBox ID="TxtReferencia" runat="server" ClientIDMode="Static" ValidationGroup="GpoGuardarAbonar" Width="80px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVReferencia" runat="server" ControlToValidate="TxtReferencia" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Referencia''</b> es necesario, por favor ingréselo." ValidationGroup="GpoGuardarAbonar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCOReferencia" runat="server" HighlightCssClass="vco" TargetControlID="RFVReferencia" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td align="center" colspan="2"><asp:Button ID="BtnAbonar" runat="server" Text="Abonar" ValidationGroup="GpoGuardarAbonar" />&nbsp;<input type="button" value="Cancelar" onclick="javascript:$get('DivAddPago').style.display='none';" /></td>
</tr>
</table>
</ContentTemplate>
</asp:UpdatePanel>
</div>
<br />
<asp:UpdateProgress ID="upProgress" runat="server" DisplayAfter="0">
<ProgressTemplate>
<div id="overlay">
<div id="modalprogress">
<div id="theprogress">
<center>
<table border="0" cellpadding="0" cellspacing="0">
<tr>
<td>La información se está procesando...</td>
</tr>
<tr>
<td><img src="/Imagenes/Cargando.gif" style="border-width: 0px;" alt="" /></td>
</tr>
</table>
</center>
</div>
</div>
</div>
</ProgressTemplate>
</asp:UpdateProgress>
</asp:Content>

View File

@@ -1,118 +0,0 @@
Option Explicit On
Option Strict On
Imports Extensiones
Imports System.Runtime.InteropServices
Imports System.IO
Imports System.Data
Partial Class PRESENTACIONES_Clientes2
Inherits ClsPaginas
'Configuración
Private ReadOnly Property CveCliente As Integer
Get
Return ViewState("CveCliente").ToString.ToEntero
End Get
End Property
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then
SetValues()
SetPermisos()
If Request("CveCliente") IsNot Nothing AndAlso IsNumeric(Request("CveCliente")) AndAlso Request("CveCliente").ToEntero > 0 Then
ViewState("CveCliente") = Request("CveCliente")
CargaDatos()
'Configuración de Modalidad Update
BtnGuardar.Text = "Guardar Cambios"
LtlTitulo.Text = "Consulta del Cliente:"
'ImgAddVenta
ImgAddVenta.Attributes.Add("OnClick", "window.location = '/Ventas/Ventas.aspx?CveCliente=" & CveCliente & "'")
If Request("Opt") IsNot Nothing AndAlso IsNumeric(Request("Opt")) Then TAB.ActiveTabIndex = Request("Opt").ToEntero
Else
'Configuración de Modalidad Insert
ViewState("CveCliente") = -1
BtnEliminar.Visible = False
End If
End If
End Sub
Private Sub SetValues()
ViewState("Orden") = ""
ViewState("OSucursalCliente") = "SucursalCliente DESC"
ViewState("OEstado") = "Estado DESC"
ViewState("OFecha") = "Fecha DESC"
ViewState("OUsuario") = "Usuario DESC"
TxtFechaPago.Text = Now.ToShortDateString
End Sub
Private Sub SetPermisos()
End Sub
Private Sub CargaDatos()
Dim ObjClientes As New ClsClientes()
If ObjClientes.GetClientes(CveCliente, "-1", "-1", "-1", "-1", "-1", "-1", -1, UsuarioActual.CveEmpresa) Then
If ObjClientes.DtResultados.Rows.Count > 0 Then
'Campos para Modificación
LtlCliente.Text = ObjClientes.Nombre
TxtNombre.Text = ObjClientes.Nombre
TxtDireccion.Text = ObjClientes.Direccion
TxtNoExt.Text = ObjClientes.NoExt
TxtNoInt.Text = ObjClientes.NoInt
TxtColonia.Text = ObjClientes.Colonia
TxtLocalidad.Text = ObjClientes.Localidad
TxtCiudad.Text = ObjClientes.Ciudad
TxtEstado.Text = ObjClientes.Estado
TxtRFC.Text = ObjClientes.RFC
TxtCP.Text = ObjClientes.CP.ToString
TxtTelefono.Text = ObjClientes.Telefono
TxtContacto.Text = ObjClientes.Contacto
TxtEmail.Text = ObjClientes.Mail
TxtParaMail.Text = ObjClientes.Mail
Else
Alert("El Cliente Solicitado no existe, por favor revise su búsqueda.", TipoMensaje.MsgAdvertencia)
BtnGuardar.Enabled = False
End If
End If
ObjClientes.Dispose()
End Sub
Protected Sub BtnGuardar_Click(sender As Object, e As System.EventArgs) Handles BtnGuardar.Click
Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion)
SendMail()
End Sub
'Protected Sub BtnEliminar_Click(sender As Object, e As System.EventArgs) Handles BtnEliminar.Click
' Dim ObjClientes As New ClsClientes()
' If ObjClientes.RemoveCliente(CveCliente) Then
' Alert("El Cliente se Eliminó correctamente.", TipoMensaje.MsgInformacion, "document.location.href=""/Ventas/CatClientes.aspx""")
' End If
' ObjClientes.Dispose()
'End Sub
Protected Sub SendMail()
Dim ObjMail As New ClsSisMail()
If ObjMail.Mandacorreo(UsuarioActual.Empresa.SendMail, UsuarioActual.Empresa.SendMailPassword, "JULIAN@adsistemas.mx", "Acceso AIMMG", "Acceso a AIMMG <table><tr><td>ADSISTEMAS.NO-IP/PRESENTACIONES/LOGIN2.ASPX</td></tr><tr><td>" & TxtEmail.Text.Trim & ", " & TxtConfirmarContraseñaAcceso.Text.Trim & " </td></tr></table>") Then
End If
End Sub
'Protected Sub BtnAbonar_Click(sender As Object, e As System.EventArgs) Handles BtnAbonar.Click
' Dim ObjMovtos As New ClsMovimientos()
' If ObjMovtos.AddMovimiento(2, "Cli", CveCliente.ToString, HdnCveVentaAbono.Value, 0, TxtCantidad.Text.Trim.ToDouble, TxtFechaPago.Text.ToDate, TxtReferencia.Text.Trim, DdlCtaContableClientes.SelectedValue.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
' Alert("El abono se guardó correctamente", TipoMensaje.MsgInformacion, "$get(""DivAddPago"").style.display=""none"";")
' TxtCantidad.Text = ""
' TxtReferencia.Text = ""
' UpDatos.Update()
' End If
' ObjMovtos.Dispose()
'End Sub
End Class

View File

@@ -1,618 +0,0 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="Clientes3.aspx.vb" Inherits="PRESENTACIONES_Clientes3" %>
<asp:Content ID="Content1" ContentPlaceHolderID="H" Runat="Server">
<img id="ImgAddVenta" runat="server" alt="Registrar Nueva Venta" style="cursor: pointer;" src="/Imagenes/Nota.gif" width="20" height="25" />
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="E" Runat="Server">
<asp:Literal ID="LtlTitulo" runat="server" Text="Registro de Clientes"></asp:Literal>&nbsp;<asp:Literal ID="LtlCliente" runat="server"></asp:Literal>
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="C" Runat="Server">
<script language="javascript" type="text/javascript">
function SetText(ObjFrom, ObjTo) {
ObjTo.innerText = ObjFrom.value;
}
function SetText2(ObjTo, Value) {
ObjTo.innerText = Value;
}
function getSelectedText(Obj, IfIsNull) {
if (Obj.selectedIndex == -1)
return IfIsNull;
else
return Obj.options[Obj.selectedIndex].text;
}
//this pageLoad will only works if you are using ASP.Net AJAX
//if you're not, you can use the other way.
function pageLoad() {
var grid = document.getElementById('<%=GvCxC.ClientID %>');
var grid2 = document.getElementById('<%=GvCxCHistorial.ClientID %>');
var firstRowHeaderClone = null;
if (grid && grid2 && grid.cells && grid2.cells) {
if (grid && grid.cells.length > 1) {
firstRowHeaderClone = grid.tBodies[0].rows[0].cloneNode(true);
grid.tBodies[0].insertBefore(firstRowHeaderClone, grid.tBodies[0].rows[0]);
var Row1 = grid.tBodies[0].rows[0];
var Row2 = grid.tBodies[0].rows[1];
if (Row1.cells.length > 1 && Row2.cells.length > 1) {
Row2.deleteCell(0);
Row2.deleteCell(0);
Row2.deleteCell(0);
Row2.deleteCell(0);
Row2.deleteCell(0);
Row1.cells[0].rowSpan = 2;
Row1.cells[1].rowSpan = 2;
Row1.cells[2].rowSpan = 2;
Row1.cells[3].rowSpan = 2;
Row1.cells[4].rowSpan = 2;
Row1.deleteCell(6);
Row1.deleteCell(7);
Row1.cells[5].colSpan = 2;
Row1.cells[6].colSpan = 2;
Row2.deleteCell(4);
Row2.deleteCell(4);
Row1.cells[7].rowSpan = 2;
Row1.cells[8].rowSpan = 2;
}
}
var firstRowHeaderClone2 = null;
if (grid2 && grid2.cells.length > 1) {
firstRowHeaderClone2 = grid2.tBodies[0].rows[0].cloneNode(true);
grid2.tBodies[0].insertBefore(firstRowHeaderClone2, grid2.tBodies[0].rows[0]);
var Row12 = grid2.tBodies[0].rows[0];
var Row22 = grid2.tBodies[0].rows[1];
if (Row12.cells.length > 1 && Row22.cells.length > 1) {
Row22.deleteCell(0);
Row22.deleteCell(0);
Row22.deleteCell(0);
Row22.deleteCell(0);
Row22.deleteCell(0);
Row12.cells[0].rowSpan = 2;
Row12.cells[1].rowSpan = 2;
Row12.cells[2].rowSpan = 2;
Row12.cells[3].rowSpan = 2;
Row12.cells[4].rowSpan = 2;
Row12.deleteCell(6);
Row12.deleteCell(7);
Row12.cells[5].colSpan = 2;
Row12.cells[6].colSpan = 2;
Row22.deleteCell(4);
Row22.deleteCell(4);
Row12.cells[7].rowSpan = 2;
Row12.cells[8].rowSpan = 2;
}
}
}
}
</script>
<table border="0" cellpadding="0" cellspacing="0" width="100%" style="padding-top:20px;">
<tr>
<td align="left">
<asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<ajax:TabContainer ID="Tab" runat="server" ActiveTabIndex="0" Width="100%">
<ajax:TabPanel ID="TabAlta" runat="server" HeaderText="Información del Cliente">
<ContentTemplate>
<table border="0" class="contenido">
<tr>
<td>
<div>
<fieldset>
<legend><b>Datos del Cliente</b></legend>
<table border="0">
<tr>
<td>Nombre:</td>
<td>
<asp:TextBox ID="TxtNombre" runat="server" MaxLength="96" Width="400px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVNombre" runat="server" ControlToValidate="TxtNombre" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Nombre del Cliente''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCENombre" runat="server" HighlightCssClass="vco" TargetControlID="RFVNombre" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Dirección:</td>
<td>
<asp:TextBox ID="TxtDireccion" runat="server" MaxLength="90" Width="400px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVDireccion" runat="server" ControlToValidate="TxtDireccion" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Direccion''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCEDireccion" runat="server" HighlightCssClass="vco" TargetControlID="RFVDireccion" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>No. Ext.</td>
<td>
<table border="0" cellpadding="0" cellspacing="0">
<tr>
<td>
<asp:TextBox ID="TxtNoExt" runat="server" MaxLength="10" Width="40px"></asp:TextBox>
</td>
<td>&nbsp;No. Int.</td>
<td>
<asp:TextBox ID="TxtNoInt" runat="server" MaxLength="10" Width="40px"></asp:TextBox>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td>Colonia:</td>
<td>
<asp:TextBox ID="TxtColonia" runat="server" MaxLength="50" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVColonia" runat="server" ControlToValidate="TxtColonia" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Colonia''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCOColonia" runat="server" HighlightCssClass="vco" TargetControlID="RFVColonia" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Localidad:</td>
<td>
<asp:TextBox ID="TxtLocalidad" runat="server" MaxLength="50" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVLocalidad" runat="server" ControlToValidate="TxtLocalidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Localidad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCOLocalidad" runat="server" HighlightCssClass="vco" TargetControlID="RFVLocalidad" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Ciudad:</td>
<td>
<asp:TextBox ID="TxtCiudad" runat="server" MaxLength="40" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVCiudad" runat="server" ControlToValidate="TxtCiudad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Ciudad''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCECiudad" runat="server" HighlightCssClass="vco" TargetControlID="RFVCiudad" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Estado:</td>
<td>
<asp:TextBox ID="TxtEstado" runat="server" MaxLength="25" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVEstado" runat="server" ControlToValidate="TxtEstado" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Estado''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCEEstado" runat="server" HighlightCssClass="vco" TargetControlID="RFVEstado" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>RFC:</td>
<td>
<asp:TextBox ID="TxtRFC" runat="server" MaxLength="13" Width="200px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVRFC" runat="server" ControlToValidate="TxtRFC" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''RFC''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCERFC" runat="server" HighlightCssClass="vco" TargetControlID="RFVRFC" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Código Postal:</td>
<td>
<asp:TextBox ID="TxtCP" runat="server" MaxLength="5" Width="40px"></asp:TextBox>
<asp:CompareValidator ID="CVCP" runat="server" ControlToValidate="TxtCP" Display="None" ErrorMessage="El campo <b>''Codigo Postal''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Integer" ValidationGroup="GrpGuardar"></asp:CompareValidator>
<ajax:ValidatorCallOutExtender ID="VCOCP" runat="server" HighlightCssClass="vco" TargetControlID="CVCP" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>Teléfono:</td>
<td><asp:TextBox ID="TxtTelefono" runat="server" MaxLength="15" Width="100px" ValidationGroup="GrpGuardar"></asp:TextBox></td>
</tr>
<tr>
<td>Contacto:</td>
<td><asp:TextBox ID="TxtContacto" runat="server" MaxLength="50" Width="200px"></asp:TextBox></td>
</tr>
<tr>
<td>Email:</td>
<td>
<asp:TextBox ID="TxtEmail" runat="server" MaxLength="50" Width="200px"></asp:TextBox>
<asp:RegularExpressionValidator ID="REVEmail" runat="server" ValidationExpression="\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*" ControlToValidate="TxtEmail" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Email''</b> no es válido, por favor ingrése uno correcto." ValidationGroup="GrpGuardar"></asp:RegularExpressionValidator>
<ajax:ValidatorCallOutExtender ID="VCOMail" runat="server" HighlightCssClass="vco" TargetControlID="REVEmail" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td>ConfirmarnContraseña de Acceso:</td>
<td><asp:TextBox ID="TxtConfirmarContraseñaAcceso" runat="server" MaxLength="50" Width="200px"></asp:TextBox></td>
</tr>
</table>
</fieldset>
</div>
</td>
</tr>
</table>
</ContentTemplate>
</ajax:TabPanel>
<ajax:TabPanel ID="TabHistorial" runat="server" HeaderText="Historial de Ventas">
<ContentTemplate>
<table border="0" class="contenido">
<tr>
<td>
<div>
<fieldset>
<legend><b>Historial de Ventas</b></legend>
<table border="0">
<tr>
<td>
<asp:UpdatePanel ID="UpnHistorial" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:GridView ID="GVHistorial" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron Ventas en el Cliente" ToolTip="Listado de Historial de Ventas">
<Columns>
<asp:TemplateField>
<HeaderTemplate>Factura</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlFactura" runat="server"></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Fecha</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlFecha" runat="server" Text='<%# Eval("Fecha", "{0:d}") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Sub Total</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlSubTotal" runat="server" Text='<%# If (CDbl(Eval("SubTotal")) = 0, "", Eval("SubTotal", "{0:N2}")) %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Descuento</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlDescuento" runat="server" Text='<%# If (CDbl(Eval("Descuento")) = 0, "", Eval("Descuento", "{0:N2}")) %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Amortización</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlAmort" runat="server" Text='<%# If (CDbl(Eval("Amortizacion")) = 0, "", Eval("Amortizacion", "{0:N2}")) %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Total</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlTotal" runat="server" Text='<%# If (CDbl(Eval("Total")) = 0, "", Eval("Total", "{0:N2}")) %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Estatus</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlEstatus" runat="server" Text='<%# Eval("EstatusFactura") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Se Timbró</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlTimbro" runat="server" Text='<%# Eval("SeTimbro") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Envío Mail</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlEnvioMail" runat="server" Text='<%# Eval("EnvioMail") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Reenviar</HeaderTemplate>
<ItemTemplate>
<a id="HLSendMail" runat="server" class="Texto"><img alt="Reenviar Mail" style="border: 0px none white" src="/Imagenes/SendMail.jpg" height="25px" width="30px" /></a>
</ItemTemplate>
</asp:TemplateField>
</Columns>
<RowStyle CssClass="Texto" />
<AlternatingRowStyle CssClass="TextoAlterno" />
<HeaderStyle CssClass="Titulos" />
</asp:GridView>
</ContentTemplate>
</asp:UpdatePanel>
</td>
</tr>
</table>
</fieldset>
</div>
</td>
</tr>
</table>
</ContentTemplate>
</ajax:TabPanel>
<ajax:TabPanel ID="TabCxC" runat="server" HeaderText="Cuentas x Cobrar">
<ContentTemplate>
<table border="0" class="contenido">
<tr>
<td>&nbsp;</td>
</tr>
<tr>
<td>
<div>
<fieldset>
<legend><b>CxC Activas</b></legend>
<table border="0">
<tr>
<td>
<asp:GridView ID="GvCxC" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron Cuentas X Cobrar Pendientes" ToolTip="Listado de CxC">
<Columns>
<asp:TemplateField>
<HeaderTemplate>Factura</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlFactura" runat="server"></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Fecha Venta</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlFecha" runat="server" Text='<%# Eval("Fecha", "{0:d}") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Fecha Vencimiento</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlFechaVenci" runat="server" Text='<%# Eval("FechaVencimiento", "{0:d}") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Días Vencidos</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlDiasVencido" runat="server" Text='<%# Eval("DiasVencidos", "{0}") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Monto Venta (Saldo Orig)</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlSaldoOriginal" runat="server" Text='<%# Eval("Original", "{0:N2}") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Abonado</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlAbonado" runat="server" Text='<%# Eval("Abonado", "{0:N2}") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>% Recuperado</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlPorRecuperado" runat="server" Text='<%# Eval("PorRecuperado", "{0:N2}%") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Saldo</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlSaldo" runat="server" Text='<%# Eval("Saldo", "{0:N2}") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>% A Recuperar</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlPorXRecuperar" runat="server" Text='<%# Eval("PorXRecuperar", "{0:N2}%") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Auxiliar</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlAux" runat="server"></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Abonar</HeaderTemplate>
<ItemTemplate>
<asp:Image ID="ImgAbonar" runat="server" ImageUrl="~/Imagenes/Money_add.png" AlternateText="Registrar Pago/Abono" Style="cursor:pointer;" />
</ItemTemplate>
</asp:TemplateField>
</Columns>
<RowStyle CssClass="Texto" />
<AlternatingRowStyle CssClass="TextoAlterno" />
<HeaderStyle CssClass="Titulos" />
</asp:GridView>
</td>
</tr>
</table>
</fieldset>
</div>
</td>
</tr>
<tr>
<td>&nbsp;</td>
</tr>
<tr>
<td>
<div>
<fieldset>
<legend><b>Historial de CxC</b></legend>
<table border="0">
<tr>
<td>
<asp:GridView ID="GvCxCHistorial" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontró Historial de Cuentas X Cobrar" ToolTip="Listado de Historia CxC">
<Columns>
<asp:TemplateField>
<HeaderTemplate>Factura</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlFactura" runat="server"></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Fecha Venta</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlFecha" runat="server" Text='<%# Eval("Fecha", "{0:d}") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Fecha Vencimiento</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlFechaVenci" runat="server" Text='<%# Eval("FechaVencimiento", "{0:d}") %>'></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Días Vencidos</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlDiasVencido" runat="server" Text='<%# Eval("DiasVencidos", "{0}") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Monto Venta (Saldo Orig)</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlSaldoOriginal" runat="server" Text='<%# Eval("Original", "{0:N2}") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Abonado</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlAbonado" runat="server" Text='<%# Eval("Abonado", "{0:N2}") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>% Recuperado</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlPorRecuperado" runat="server" Text='<%# Eval("PorRecuperado", "{0:N2}%") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Saldo</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlSaldo" runat="server" Text='<%# Eval("Saldo", "{0:N2};") %>'></asp:Literal>&nbsp
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>% A Recuperar</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlPorXRecuperar" runat="server" Text='<%# Eval("PorXRecuperar", "{0:N2}%") %>'></asp:Literal>&nbsp;
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Auxiliar</HeaderTemplate>
<ItemTemplate>
<asp:Literal ID="LtlAux" runat="server"></asp:Literal>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField>
<HeaderTemplate>Abonar</HeaderTemplate>
<ItemTemplate>
<asp:Image ID="ImgAbonar" runat="server" ImageUrl="~/Imagenes/Money_add.png" AlternateText="Registrar Pago/Abono" Style="cursor:pointer;" />
</ItemTemplate>
</asp:TemplateField>
</Columns>
<RowStyle CssClass="Texto" />
<AlternatingRowStyle CssClass="TextoAlterno" />
<HeaderStyle CssClass="Titulos" />
</asp:GridView>
</td>
</tr>
</table>
</fieldset>
</div>
</td>
</tr>
</table>
</ContentTemplate>
</ajax:TabPanel>
</ajax:TabContainer>
</ContentTemplate>
</asp:UpdatePanel>
</td>
</tr>
</table>
<div id ="DivMail" style="width:350px; background-color:White; border:solid 1px black; color:Black; display:none; position:fixed; z-index: 1500">
<asp:UpdatePanel ID="UpSendMail" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:HiddenField ID="HdnCveVenta" runat="server" ClientIDMode="Static" Value="-1" />
<asp:HiddenField ID="HdnFolioVenta" runat="server" ClientIDMode="Static" Value="-1" />
<asp:HiddenField ID="HdnTipoDocto" runat="server" ClientIDMode="Static" Value="-1" />
<table border="1" rules="all" style="border-collapse: collapse; width: 350px">
<tr align="left">
<td width="150">Para:</td>
<td width="200">
<asp:TextBox ID="TxtParaMail" runat="server" ClientIDMode="Static" Width="194px" ReadOnly="true"></asp:TextBox>
<asp:RegularExpressionValidator ID="REVParaMail" runat="server" Display="None" ValidationExpression="\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*" ControlToValidate="TxtParaMail" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Para (Mail)''</b> no es válido, por favor ingrése uno correcto." ValidationGroup="GrpGuardar"></asp:RegularExpressionValidator>
<ajax:ValidatorCallOutExtender ID="VCOParaMail" runat="server" HighlightCssClass="vco" TargetControlID="REVParaMail" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr align="left">
<td>
Con copia para:<br />
(Separar con: ;)
</td>
<td><asp:TextBox ID="TxtCC" runat="server" TextMode="MultiLine" Columns="3" Rows="3" Width="194px"></asp:TextBox></td>
</tr>
<tr align="left">
<td>Texto Adicional:</td>
<td><asp:TextBox ID="TxtBody" runat="server" TextMode="MultiLine" Columns="3" Rows="3" Width="194px"></asp:TextBox></td>
</tr>
<tr>
<td align="center" colspan="2"><asp:Button ID="BtnSendMail" runat="server" OnClientClick="javascript:$get('DivMail').style.display='none';" Text="Enviar" />&nbsp;<input type="button" value="Cancelar" onclick="javascript:$get('DivMail').style.display='none';" /></td>
</tr>
</table>
</ContentTemplate>
</asp:UpdatePanel>
</div>
<div id ="DivAddPago" style="width:350px; background-color:White; border:solid 1px black; color:Black; display:none; position:fixed; z-index: 1500">
<asp:UpdatePanel ID="UpdatePanel1" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<asp:HiddenField ID="HdnCveVentaAbono" runat="server" ClientIDMode="Static" Value="-1" />
<table border="1" rules="all" style="border-collapse: collapse; width: 350px">
<tr align="left">
<td width="150">Cantidad:</td>
<td width="200">
<asp:TextBox ID="TxtCantidad" runat="server" ClientIDMode="Static" ValidationGroup="GpoGuardarAbonar" Width="80px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVCantidad" runat="server" ControlToValidate="TxtCantidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> es necesario, por favor ingréselo." ValidationGroup="GpoGuardarAbonar"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="CVCantidadAbonar" runat="server" ControlToValidate="TxtCantidad" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cantidad''</b> no tiene el formato correcto, por favor corrija." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GpoGuardarAbonar"></asp:CompareValidator>
<ajax:ValidatorCallOutExtender ID="VCOCantidad" runat="server" HighlightCssClass="vco" TargetControlID="RFVCantidad" Width="300px"></ajax:ValidatorCallOutExtender>
<ajax:ValidatorCallOutExtender ID="VCOCantidad2" runat="server" HighlightCssClass="vco" TargetControlID="CVCantidadAbonar" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<td><b>Fecha:</b>&nbsp;</td>
<td>
<asp:TextBox ID="TxtFechaPago" runat="server" BorderStyle="None" CausesValidation="true" MaxLength="10" ValidationGroup="GpoGuardarAbonar"></asp:TextBox>
&nbsp;<asp:ImageButton runat="server" ID="ImgFechaPago" Visible="false" ImageUrl="/Imagenes/calendar.png" ImageAlign="AbsMiddle" Width="16px" Height="16px" AlternateText="Click para ver el Calendario" />
<ajax:MaskedEditExtender ID="MEEFechaPago" runat="server" TargetControlID="TxtFechaPago" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender runat="server" ID="CEFechaPago" TargetControlID="TxtFechaPago" PopupButtonID="ImgFechaPago" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="RFVFechaPago" runat="server" ControlToValidate="TxtFechaPago" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> es necesario, por favor ingréselo." ValidationGroup="GpoGuardarAbonar"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="CVFechaPago" runat="server" ControlToValidate="TxtFechaPago" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> no tiene el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GpoGuardarAbonar"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="VCOFechaPago1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFechaPago" Width="350px"></ajax:ValidatorCalloutExtender>&nbsp;
<ajax:ValidatorCalloutExtender ID="VCOFechaPago2" runat="server" HighlightCssClass="vco" TargetControlID="CVFechaPago" Width="350px"></ajax:ValidatorCalloutExtender>&nbsp;
</td>
<tr>
<td>Referencia:</td>
<td>
<asp:TextBox ID="TxtReferencia" runat="server" ClientIDMode="Static" ValidationGroup="GpoGuardarAbonar" Width="80px"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVReferencia" runat="server" ControlToValidate="TxtReferencia" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Referencia''</b> es necesario, por favor ingréselo." ValidationGroup="GpoGuardarAbonar"></asp:RequiredFieldValidator>
<ajax:ValidatorCallOutExtender ID="VCOReferencia" runat="server" HighlightCssClass="vco" TargetControlID="RFVReferencia" Width="300px"></ajax:ValidatorCallOutExtender>
</td>
</tr>
<tr>
<td align="center" colspan="2"><asp:Button ID="BtnAbonar" runat="server" Text="Abonar" ValidationGroup="GpoGuardarAbonar" />&nbsp;<input type="button" value="Cancelar" onclick="javascript:$get('DivAddPago').style.display='none';" /></td>
</tr>
</table>
</ContentTemplate>
</asp:UpdatePanel>
</div>
<br />
<asp:UpdateProgress ID="upProgress" runat="server" DisplayAfter="0">
<ProgressTemplate>
<div id="overlay">
<div id="modalprogress">
<div id="theprogress">
<center>
<table border="0" cellpadding="0" cellspacing="0">
<tr>
<td>La información se está procesando...</td>
</tr>
<tr>
<td><img src="/Imagenes/Cargando.gif" style="border-width: 0px;" alt="" /></td>
</tr>
</table>
</center>
</div>
</div>
</div>
</ProgressTemplate>
</asp:UpdateProgress>
</asp:Content>

View File

@@ -1,314 +0,0 @@
Option Explicit On
Option Strict On
Imports Extensiones
Imports System.Runtime.InteropServices
Imports System.IO
Imports System.Data
Partial Class PRESENTACIONES_Clientes3
Inherits ClsPaginas
'Configuración
Private ReadOnly Property CveCliente As Integer
Get
Return ViewState("CveCliente").ToString.ToEntero
End Get
End Property
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then
SetValues()
SetPermisos()
If Request("CveCliente") IsNot Nothing AndAlso IsNumeric(Request("CveCliente")) AndAlso Request("CveCliente").ToEntero > 0 Then
ViewState("CveCliente") = Request("CveCliente")
CargaDatos()
CargaHistorial()
CargaCxC()
'Configuración de Modalidad Update
LtlTitulo.Text = "Consulta del Cliente:"
'ImgAddVenta
ImgAddVenta.Attributes.Add("OnClick", "window.location = '/Ventas/Ventas.aspx?CveCliente=" & CveCliente & "'")
If Request("Opt") IsNot Nothing AndAlso IsNumeric(Request("Opt")) Then Tab.ActiveTabIndex = Request("Opt").ToEntero
Else
'Configuración de Modalidad Insert
ViewState("CveCliente") = -1
End If
End If
End Sub
Private Sub SetValues()
ViewState("Orden") = ""
ViewState("OSucursalCliente") = "SucursalCliente DESC"
ViewState("OEstado") = "Estado DESC"
ViewState("OFecha") = "Fecha DESC"
ViewState("OUsuario") = "Usuario DESC"
TxtFechaPago.Text = Now.ToShortDateString
End Sub
Private Sub SetPermisos()
End Sub
Private Sub CargaDatos()
Dim ObjClientes As New ClsClientes()
If ObjClientes.GetClientes(CveCliente, "-1", "-1", "-1", "-1", "-1", "-1", -1, UsuarioActual.CveEmpresa) Then
If ObjClientes.DtResultados.Rows.Count > 0 Then
'Campos para Modificación
LtlCliente.Text = ObjClientes.Nombre
TxtNombre.Text = ObjClientes.Nombre
TxtDireccion.Text = ObjClientes.Direccion
TxtNoExt.Text = ObjClientes.NoExt
TxtNoInt.Text = ObjClientes.NoInt
TxtColonia.Text = ObjClientes.Colonia
TxtLocalidad.Text = ObjClientes.Localidad
TxtCiudad.Text = ObjClientes.Ciudad
TxtEstado.Text = ObjClientes.Estado
TxtRFC.Text = ObjClientes.RFC
TxtCP.Text = ObjClientes.CP.ToString
TxtTelefono.Text = ObjClientes.Telefono
TxtContacto.Text = ObjClientes.Contacto
TxtEmail.Text = ObjClientes.Mail
Else
Alert("El Cliente Solicitado no existe, por favor revise su búsqueda.", TipoMensaje.MsgAdvertencia)
End If
End If
ObjClientes.Dispose()
End Sub
Private Sub CargaHistorial()
Dim ObjClientes As New ClsClientes()
If ObjClientes.GetHistorialVentas(CveCliente) Then
If ObjClientes.DtResultados.Rows.Count > 0 Then
'Carga Generales
'Carga Grid
GVHistorial.DataSource = ObjClientes.DtResultados
Else
GVHistorial.DataSource = Nothing
End If
Else
GVHistorial.DataSource = Nothing
End If
ObjClientes.Dispose()
GVHistorial.DataBind()
End Sub
Private Sub CargaCxC()
Dim ObjMovtos As New ClsMovimientos()
'CxC Activas
If ObjMovtos.GetCxCCliente(CveCliente) Then
GvCxC.DataSource = ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Act'")
GvCxCHistorial.DataSource = ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Hist'")
Else
GvCxC.DataSource = Nothing
GvCxCHistorial.DataSource = Nothing
End If
ObjMovtos.Dispose()
GvCxC.DataBind()
GvCxCHistorial.DataBind()
End Sub
Protected Sub GVHistorial_RowDataBound(sender As Object, e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GVHistorial.RowDataBound
If e.Row.RowType = DataControlRowType.DataRow Then
If e.Row.RowIndex = 0 Then
e.Row.BackColor = Drawing.Color.LightGray
DirectCast(e.Row.FindControl("HLSendMail"), HtmlAnchor).Visible = False
End If
Dim Liga As String = String.Format("<a class=""Texto"" href=""/Ventas/Ventas.aspx?CveVenta={0}"">", e.Row.DBCampo("CveVenta"))
e.Row.FCLiteral("LtlFactura").Text = Liga & e.Row.DBCampo("Folio") & "</a>"
e.Row.Cells(2).HorizontalAlign = HorizontalAlign.Right
e.Row.Cells(3).HorizontalAlign = HorizontalAlign.Right
e.Row.Cells(4).HorizontalAlign = HorizontalAlign.Right
e.Row.Cells(5).HorizontalAlign = HorizontalAlign.Right
DirectCast(e.Row.FindControl("HLSendMail"), HtmlAnchor).HRef = "javascript:$get('HdnTipoDocto').value='Fact';$get('HdnCveVenta').value='" & e.Row.DBCampo("CveVenta") & "';$get('HdnFolioVenta').value='" & e.Row.DBCampo("folio") & "';$('#DivMail').show(1000);PosicionaObjeto('" & DirectCast(e.Row.FindControl("HLSendMail"), HtmlAnchor).ClientID & "', 'DivMail');"
End If
End Sub
Protected Sub GvCxC_RowDataBound(sender As Object, e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GvCxC.RowDataBound, GvCxCHistorial.RowDataBound
If e.Row.RowType = DataControlRowType.DataRow Then
If e.Row.RowIndex = 0 Then
e.Row.Cells(0).ColumnSpan = 4
e.Row.Cells(0).HorizontalAlign = HorizontalAlign.Right
e.Row.FCLiteral("LtlFactura").Text = "Total" & "&nbsp;"
e.Row.Cells(1).Visible = False
e.Row.Cells(2).Visible = False
e.Row.Cells(3).Visible = False
e.Row.Cells(9).ColumnSpan = 2
e.Row.Cells(10).Visible = False
e.Row.BackColor = Drawing.Color.LightGray
e.Row.FCImage("ImgAbonar").Visible = False
End If
If e.Row.RowIndex = 1 Then
e.Row.Cells(0).Width = Unit.Pixel(60)
e.Row.Cells(1).Width = Unit.Pixel(70)
e.Row.Cells(2).Width = Unit.Pixel(80)
e.Row.Cells(3).Width = Unit.Pixel(80)
e.Row.Cells(4).Width = Unit.Pixel(90)
e.Row.Cells(5).Width = Unit.Pixel(90)
e.Row.Cells(6).Width = Unit.Pixel(105)
e.Row.Cells(7).Width = Unit.Pixel(90)
e.Row.Cells(8).Width = Unit.Pixel(105)
e.Row.Cells(9).Width = Unit.Pixel(70)
e.Row.Cells(10).Width = Unit.Pixel(70)
End If
e.Row.Cells(4).HorizontalAlign = HorizontalAlign.Right
e.Row.Cells(5).HorizontalAlign = HorizontalAlign.Right
e.Row.Cells(6).HorizontalAlign = HorizontalAlign.Right
e.Row.Cells(7).HorizontalAlign = HorizontalAlign.Right
e.Row.Cells(8).HorizontalAlign = HorizontalAlign.Right
If e.Row.DBCampo("Saldo").ToDouble < 0 Then e.Row.Cells(5).ForeColor = Drawing.Color.Red
If e.Row.DBCampo("DiasVencidos").ToDouble > 0 AndAlso CType(sender, GridView).ID = "GvCxC" Then e.Row.Cells(3).ForeColor = Drawing.Color.Red
If e.Row.DBCampo("Original").ToDouble = 0 Then DirectCast(e.Row.FindControl("LtlSaldoOriginal"), Literal).Text = ""
If e.Row.DBCampo("Abonado").ToDouble = 0 Then DirectCast(e.Row.FindControl("LtlAbonado"), Literal).Text = ""
If e.Row.DBCampo("PorRecuperado").ToDouble = 0 Then DirectCast(e.Row.FindControl("LtlPorRecuperado"), Literal).Text = ""
If e.Row.DBCampo("Saldo").ToDouble = 0 Then DirectCast(e.Row.FindControl("LtlSaldo"), Literal).Text = ""
If e.Row.DBCampo("PorXRecuperar").ToDouble = 0 Then DirectCast(e.Row.FindControl("LtlPorXRecuperar"), Literal).Text = ""
If e.Row.DBCampo("Folio") = "N/D" Then
e.Row.FCLiteral("LtlFactura").Text = e.Row.DBCampo("Folio")
Else
Dim Liga As String = String.Format("<a class=""Texto"" href=""/Ventas/Ventas.aspx?CveVenta={0}"">", e.Row.DBCampo("CveVenta"))
e.Row.FCLiteral("LtlFactura").Text = Liga & e.Row.DBCampo("Folio") & "</a>"
End If
If e.Row.RowIndex > 0 Then e.Row.FCLiteral("LtlAux").Text = "<a class=""Texto thickbox"" href=""/Contabilidad/PopUpAuxiliar.aspx?Tipo=CxCClientes&CveCliente=" & CveCliente & "&CveVenta=" & e.Row.DBCampo("CveVenta") & "&TB_iframe=true&height=370&width=900"" />Ir</a>"
DirectCast(e.Row.FindControl("ImgAbonar"), Image).Attributes.Add("onclick", "$get('HdnCveVenta').value='" & e.Row.DBCampo("CveVenta") & "';$get('HdnCveVentaAbono').value='" & e.Row.DBCampo("CveVenta") & "';$('#DivAddPago').show(1000);PosicionaObjeto('" & DirectCast(e.Row.FindControl("ImgAbonar"), Image).ClientID & "', 'DivAddPago');")
If CType(sender, GridView).ID = "GvCxCHistorial" Then
DirectCast(e.Row.FindControl("ImgAbonar"), Image).Visible = False
DirectCast(e.Row.FindControl("LtlDiasVencido"), Literal).Text = ""
Else
e.Row.Cells(7).Font.Bold = True
e.Row.Cells(8).Font.Bold = True
End If
End If
End Sub
Protected Sub BtnSendMail_Click(sender As Object, e As System.EventArgs) Handles BtnSendMail.Click
Try
If HdnCveVenta.Value <> "-1" AndAlso HdnFolioVenta.Value <> "-1" Then
'Dim ObjEmprea As New ClsEmpresas()
'If ObjEmprea.GetEmpresas(UsuarioActual.CveEmpresa, "-1", "-1", "-1", "-1") Then
Dim ObjMail As New ClsSisMail()
Dim Ruta As String = AppDomain.CurrentDomain.BaseDirectory & "Empresas\" & UsuarioActual.CveEmpresa & "\"
If UsuarioActual.Empresa.TipoFacturacion = "CFDi" AndAlso HdnTipoDocto.Value = "Fact" Then
If File.Exists(Ruta & "PDF\" & HdnFolioVenta.Value & ".pdf") AndAlso File.Exists(Ruta & "XML\" & HdnFolioVenta.Value & ".xml") Then
Dim PDF As String = Ruta & "PDF\" & HdnFolioVenta.Value & ".pdf"
Dim XML As String = Ruta & "XML\" & HdnFolioVenta.Value & ".xml"
Dim ArrayCC() As String = TxtCC.Text.Trim.Split(Convert.ToChar(";"))
Dim ResultadoMail As Integer = 0
If ObjMail.Mandacorreo(UsuarioActual.Empresa.SendMail, UsuarioActual.Empresa.SendMailPassword, TxtParaMail.Text.Trim, "Entrega de Factura", PDF, XML, ArrayCC, TxtBody.Text.Trim) Then
ResultadoMail = 1
TxtCC.Text = ""
TxtBody.Text = ""
Alert("El correo se envió correctamente", TipoMensaje.MsgInformacion)
CargaHistorial()
UpnHistorial.Update()
Else
ResultadoMail = 3
End If
Dim ObjVentas As New ClsVentas
ObjVentas.UpdateVentaMail(ResultadoMail, HdnCveVenta.Value.ToEntero)
ObjVentas.Dispose()
Else
Alert("No se pudo adjuntar el correo electrónica.", TipoMensaje.MsgAdvertencia)
End If
ElseIf UsuarioActual.Empresa.TipoFacturacion = "CBB" AndAlso HdnTipoDocto.Value = "Fact" Then
If File.Exists(Ruta & "PDF\" & HdnFolioVenta.Value & ".pdf") Then
Dim PDF As String = Ruta & "PDF\" & HdnFolioVenta.Value & ".pdf"
Dim ArrayCC() As String = TxtCC.Text.Trim.Split(Convert.ToChar(";"))
Dim ResultadoMail As Integer = 0
If ObjMail.Mandacorreo(UsuarioActual.Empresa.SendMail, UsuarioActual.Empresa.SendMailPassword, TxtParaMail.Text.Trim, "Entrega de Factura", PDF, "", ArrayCC, TxtBody.Text.Trim) Then
ResultadoMail = 1
TxtCC.Text = ""
TxtBody.Text = ""
Alert("El correo se envió correctamente", TipoMensaje.MsgInformacion)
CargaHistorial()
UpnHistorial.Update()
Else
ResultadoMail = 3
End If
Dim ObjVentas As New ClsVentas
ObjVentas.UpdateVentaMail(ResultadoMail, HdnCveVenta.Value.ToEntero)
ObjVentas.Dispose()
Else
Alert("No se pudo adjuntar el correo electrónica.", TipoMensaje.MsgAdvertencia)
End If
ElseIf HdnTipoDocto.Value = "Cot" Then
If File.Exists(Ruta & "PDF\Cotizacion_" & HdnFolioVenta.Value & ".pdf") Then
Dim PDF As String = Ruta & "PDF\Cotizacion_" & HdnFolioVenta.Value & ".pdf"
Dim ArrayCC() As String = TxtCC.Text.Trim.Split(Convert.ToChar(";"))
Dim ResultadoMail As Integer = 0
If ObjMail.Mandacorreo(UsuarioActual.Empresa.SendMail, UsuarioActual.Empresa.SendMailPassword, TxtParaMail.Text.Trim, "Entrega de Cotización", PDF, "", ArrayCC, TxtBody.Text.Trim) Then
ResultadoMail = 1
TxtCC.Text = ""
TxtBody.Text = ""
Alert("El correo se envió correctamente", TipoMensaje.MsgInformacion)
CargaHistorial()
UpnHistorial.Update()
Else
ResultadoMail = 3
End If
Dim ObjVentas As New ClsVentas
ObjVentas.UpdateVentaMail(ResultadoMail, HdnCveVenta.Value.ToEntero)
ObjVentas.Dispose()
Else
Alert("No se pudo adjuntar el correo electrónica.", TipoMensaje.MsgAdvertencia)
End If
End If
'End If
'ObjEmprea.Dispose()
Else
Alert("No se seleccionó ninguna factura para envíar.", TipoMensaje.MsgAdvertencia)
End If
Catch ex As Exception
OnError("Ocurrió error al mandar MAIL", ex)
Dim ObjVentas As New ClsVentas
ObjVentas.UpdateVentaMail(3, HdnCveVenta.Value.ToEntero)
ObjVentas.Dispose()
End Try
End Sub
'Protected Sub BtnAbonar_Click(sender As Object, e As System.EventArgs) Handles BtnAbonar.Click
' Dim ObjMovtos As New ClsMovimientos()
' If ObjMovtos.AddMovimiento(2, "Cli", CveCliente.ToString, HdnCveVentaAbono.Value, 0, TxtCantidad.Text.Trim.ToDouble, TxtFechaPago.Text.ToDate, TxtReferencia.Text.Trim, DdlCtaContableClientes.SelectedValue.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
' Alert("El abono se guardó correctamente", TipoMensaje.MsgInformacion, "$get(""DivAddPago"").style.display=""none"";")
' CargaCxC()
' TxtCantidad.Text = ""
' TxtReferencia.Text = ""
' UpDatos.Update()
' End If
' ObjMovtos.Dispose()
'End Sub
End Class

Binary file not shown.

Before

Width:  |  Height:  |  Size: 60 KiB

Binary file not shown.

Before

Width:  |  Height:  |  Size: 931 B

Binary file not shown.

Before

Width:  |  Height:  |  Size: 175 KiB

View File

@@ -1,225 +0,0 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="CapturaIncidencias.aspx.vb" Inherits="PRESENTACIONES_SeguridadPublica_CapturaIncidencias" %>
<asp:Content ID="Content1" ContentPlaceHolderID="H" Runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="E" Runat="Server">
Captura de Incidencias
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="C" Runat="Server">
<table width="100%" align="center" style="text-align: center">
<tr>
<td>Portal: Captura de incidencias</td>
</tr>
<tr>
<td>Seguridad Pública</td>
</tr>
<tr>
<td>Soporte Técnico TECNOLOGÍAS DE LA INFORMACIÓN</td>
</tr>
</table>
<br />
<table width="100%">
<tr>
<td>
<asp:Label ID="Label1" runat="server" Text="0007727/13N" Font-Bold="True"></asp:Label>
</td>
<td>
<asp:Label ID="Label2" runat="server" Text="Zona" Font-Bold="True"></asp:Label><br />
<asp:DropDownList ID="DropDownList1" runat="server"><asp:ListItem>Norte</asp:ListItem></asp:DropDownList>
</td>
<td>
<asp:Label ID="Label3" runat="server" Text="Fecha" Font-Bold="True"></asp:Label>
<asp:Label ID="Label6" runat="server" Text="dd/mm/aaaa" Font-Size="Smaller"></asp:Label><br />
<asp:TextBox ID="TextBox1" runat="server" Width="100px">05/11/2013</asp:TextBox>
</td>
<td>
<asp:Label ID="Label4" runat="server" Text="Hora" Font-Bold="True" Width="52px"></asp:Label>&nbsp;<asp:Label ID="Label7" runat="server" Text="Min" Font-Bold="True"></asp:Label><br />
<asp:DropDownList ID="DropDownList2" runat="server"><asp:ListItem>02</asp:ListItem></asp:DropDownList>
<asp:Label ID="Label5" runat="server" Text=":" ></asp:Label>
<asp:TextBox ID="TextBox2" runat="server" Width="17px">10</asp:TextBox>
</td>
</tr>
</table>
<br />
<table width="90%" >
<tr>
<td style="width: 169px">
<asp:Label ID="Label8" runat="server" Text="Autoridad"></asp:Label>
</td>
<td>
<asp:DropDownList ID="DropDownList3" runat="server" Width="100%">
<asp:ListItem></asp:ListItem>
</asp:DropDownList>
</td>
</tr>
<tr>
<td style="width: 169px">
<asp:Label ID="Label9" runat="server" Text="Puesto:"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox3" runat="server" Width="100%"></asp:TextBox>
</td>
</tr>
<tr>
<td style="width: 169px">
<asp:Label ID="Label10" runat="server" Text="Dirección:"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox4" runat="server" Width="100%"></asp:TextBox>
</td>
</tr>
<tr>
<td style="width: 169px">
<asp:Label ID="Label11" runat="server" Text="Descripción Breve del Suceso"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox5" runat="server" TextMode="MultiLine" Width="100%"></asp:TextBox>
</td>
</tr>
<tr>
<td style="width: 169px">
<asp:Label ID="Label12" runat="server" Text="Nombre del Detenido:"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox6" runat="server" Width="100%"></asp:TextBox>
</td>
</tr>
<tr>
<td style="width: 169px">
<asp:Label ID="Label13" runat="server" Text="Alias:"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox7" runat="server" Width="100%"></asp:TextBox>
</td>
</tr>
<tr>
<td style="width: 169px">
</td>
<td>
<table>
<tr>
<td>&nbsp;
<asp:Label ID="Label14" runat="server" Text="Edad:"></asp:Label>
<asp:TextBox ID="TextBox8" runat="server"></asp:TextBox>
</td>
<td>&nbsp;
<asp:Label ID="Label18" runat="server" Text="Sexo:"></asp:Label>
<asp:DropDownList ID="DropDownList4" runat="server"><asp:ListItem>Femenino</asp:ListItem></asp:DropDownList>
</td>
<td>&nbsp;
<asp:Label ID="Label19" runat="server" Text="Boleta de Entrada:"></asp:Label>
<asp:TextBox ID="TextBox10" runat="server"></asp:TextBox>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td style="width: 169px">
<asp:Label ID="Label15" runat="server" Text="Motivo"></asp:Label>
:</td>
<td>
<asp:TextBox ID="TextBox11" runat="server" TextMode="MultiLine" Width="100%"></asp:TextBox>
</td>
</tr>
<tr>
<td align="center" colspan="4">
<asp:Button ID="Button1" runat="server" Text="Agregar Detenido" />
</td>
</tr>
<tr>
<td colspan="4">
<table width="100%" border="1">
<tr bgcolor="#999999" style="text-align: center; font-weight: bold;">
<td>
<asp:Label ID="Label16" runat="server" Text="Nombre del Detenido"></asp:Label>
</td>
<td>
<asp:Label ID="Label17" runat="server" Text="Edad"></asp:Label>
</td>
<td>
<asp:Label ID="Label20" runat="server" Text="Borrar"></asp:Label>
</td>
</tr>
<tr align="center">
<td>
<asp:Label ID="Label21" runat="server" Text="-"></asp:Label>
</td>
<td>
<asp:Label ID="Label22" runat="server" Text="-"></asp:Label>
</td>
<td align="center">
<asp:Image ID="Image1" runat="server" ImageUrl="~/Imagenes/Basura1.png" />
</td>
</tr>
</table>
</td>
</tr>
<br />
<tr><td style="width: 169px">
<asp:Label ID="Label23" runat="server" Text="Nombre del Perjudicado:"></asp:Label></td><td>
<asp:TextBox ID="TextBox12" runat="server" Width="100%"></asp:TextBox>
</td></tr>
<tr><td style="width: 169px"></td>
<td>
<table>
<tr>
<td>&nbsp;
<asp:Label ID="Label24" runat="server" Text="Edad:"></asp:Label>
<asp:TextBox ID="TextBox9" runat="server"></asp:TextBox>
</td>
<td>&nbsp;
<asp:Label ID="Label25" runat="server" Text="Sexo:"></asp:Label>
<asp:DropDownList ID="DropDownList5" runat="server"><asp:ListItem>Femenino</asp:ListItem></asp:DropDownList>
</td>
</tr>
</table>
</td></tr>
<tr>
<td style="width: 169px">
<asp:Label ID="Label26" runat="server" Text="Observaciones:"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox13" runat="server" TextMode="MultiLine" Width="100%"></asp:TextBox>
</td>
</tr>
<tr>
<td align="center" colspan="4">
<asp:Button ID="Button2" runat="server" Text="Agregar Perjudicado" />
</td>
</tr>
<tr>
<td colspan="4">
<table width="100%" border="1">
<tr bgcolor="#999999" style="text-align: center; font-weight: bold;">
<td>
<asp:Label ID="Label27" runat="server" Text="Nombre del Detenido"></asp:Label>
</td>
<td>
<asp:Label ID="Label28" runat="server" Text="Edad"></asp:Label>
</td>
<td>
<asp:Label ID="Label29" runat="server" Text="Borrar"></asp:Label>
</td>
</tr>
<tr align="center">
<td>
<asp:Label ID="Label30" runat="server" Text="-"></asp:Label>
</td>
<td>
<asp:Label ID="Label31" runat="server" Text="-"></asp:Label>
</td>
<td align="center">
<asp:Image ID="Image2" runat="server" ImageUrl="~/Imagenes/Basura1.png" />
</td>
</tr>
</table>
</td>
</tr>
</table>
</asp:Content>

View File

@@ -1,5 +0,0 @@

Partial Class PRESENTACIONES_SeguridadPublica_CapturaIncidencias
Inherits System.Web.UI.Page
End Class

View File

@@ -1,457 +0,0 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="CapturaIncidenciasTransito.aspx.vb" Inherits="PRESENTACIONES_SeguridadPublica_CapturaIncidenciasTransito" %>
<asp:Content ID="Content1" ContentPlaceHolderID="H" runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="E" runat="Server">
Captura de Incidencias de Tránsito
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="C" runat="Server">
<table width="100%" class="Titulos">
<tr>
<td>
<asp:Label ID="Label1" runat="server" Text="JEFATURA DE POLICIA PREVENTIVA Y TRÁNSITO MUNICIPAL"></asp:Label>
</td>
</tr>
<tr>
<td>
<asp:DropDownList ID="DropDownList1" runat="server">
<asp:ListItem>Reporte de Choque</asp:ListItem>
</asp:DropDownList>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label2" runat="server" Text="H. AYUNTAMIENTO DE HERMOSILLO - Folio = 000270/12N_1"></asp:Label>
</td>
</tr>
</table>
<table width="100%" border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label3" runat="server" Text="1"></asp:Label>
</td>
<td>
<table width="100%" border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td>
<asp:Label ID="Label13" runat="server" Text="Fecha(dd/mm/aaaa)"></asp:Label><br />
<asp:TextBox ID="TextBox1" runat="server" Width="115px"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label14" runat="server" Text="Hora : Minutos "></asp:Label><br />
<asp:DropDownList ID="DropDownList2" runat="server">
<asp:ListItem>13</asp:ListItem>
</asp:DropDownList>
:
<asp:TextBox ID="TextBox2" runat="server" Width="16px">00</asp:TextBox>
</td>
<td>
<asp:Label ID="Label15" runat="server" Text="ZONA"></asp:Label><br />
<asp:DropDownList ID="DropDownList3" runat="server">
<asp:ListItem>Norte</asp:ListItem>
</asp:DropDownList>
</td>
<td>
<asp:Label ID="Label16" runat="server" Text="Horario"></asp:Label><br />
<asp:DropDownList ID="DropDownList4" runat="server">
<asp:ListItem>A</asp:ListItem>
</asp:DropDownList>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label4" runat="server" Text="2"></asp:Label>
</td>
<td>
<table width="100%" border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td>
<asp:Label ID="Label17" runat="server" Text="Unidades "></asp:Label>
<asp:TextBox ID="TextBox3" runat="server"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label18" runat="server" Text="Lesionados "></asp:Label>
<asp:TextBox ID="TextBox4" runat="server"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label19" runat="server" Text="Muertos "></asp:Label>
<asp:TextBox ID="TextBox5" runat="server"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label20" runat="server" Text="Daños en $ "></asp:Label>
<asp:TextBox ID="TextBox6" runat="server"></asp:TextBox>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label5" runat="server" Text="3"></asp:Label>
</td>
<td>
<table width="100%" border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td width="10%">
<asp:Label ID="Label21" runat="server" Text="Localización"></asp:Label>
</td>
<td width="20%" align="right">
<table>
<tr>
<td>
<asp:Label ID="Label22" runat="server" Text="Vía"></asp:Label>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label23" runat="server" Text="Con"></asp:Label>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label24" runat="server" Text="Entre"></asp:Label>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label25" runat="server" Text="Colonia"></asp:Label>
</td>
</tr>
</table>
</td>
<td width="70%" align="left">
<table>
<tr>
<td>
<asp:TextBox ID="TextBox7" runat="server" Width="220px"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:TextBox ID="TextBox8" runat="server" Width="220px"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:TextBox ID="TextBox9" runat="server" Width="220px"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:DropDownList ID="DropDownList5" runat="server" Width="220px">
<asp:ListItem>Carmen Serdán</asp:ListItem>
</asp:DropDownList>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label6" runat="server" Text="4"></asp:Label>
</td>
<td>
<table border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td>
<asp:DropDownList ID="DropDownList6" runat="server">
<asp:ListItem>A</asp:ListItem>
</asp:DropDownList><br />
<asp:Label ID="Label26" runat="server" Text="Unidad Móvil"></asp:Label>
</td>
<td>
<table border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td>
<asp:Label ID="Label27" runat="server" Text="Licencia"></asp:Label><br />
<asp:TextBox ID="TextBox11" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label28" runat="server" Text="Razón Social"></asp:Label><br />
<asp:TextBox ID="TextBox10" runat="server"></asp:TextBox><br /><br />
<asp:Label ID="Label29" runat="server" Text="Cinturón"></asp:Label><br />
<asp:CheckBox ID="CheckBox1" runat="server" />
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label30" runat="server" Text="Mismo Cond."></asp:Label><br />
<asp:CheckBox ID="CheckBox2" runat="server" />
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label31" runat="server" Text="Marca"></asp:Label><br />
<asp:DropDownList ID="DropDownList7" runat="server" Width="115px">
<asp:ListItem>Marca</asp:ListItem>
</asp:DropDownList>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label32" runat="server" Text="Capacidad"></asp:Label><br />
<asp:DropDownList ID="DropDownList8" runat="server" Width="115px">
<asp:ListItem>Capacidad</asp:ListItem>
</asp:DropDownList>
</td>
</tr>
</table>
</td>
<td><table border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td>
<table>
<tr>
<td>
<asp:Label ID="Label33" runat="server" Text="Tipo"></asp:Label><br />
<asp:TextBox ID="TextBox12" runat="server"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label34" runat="server" Text="Daños"></asp:Label><br />
<asp:TextBox ID="TextBox13" runat="server"></asp:TextBox>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<asp:RadioButtonList ID="RadioButtonList1" runat="server">
<asp:ListItem>Conductor</asp:ListItem>
<asp:ListItem>Peaton</asp:ListItem>
<asp:ListItem>Ciclista</asp:ListItem>
</asp:RadioButtonList>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label35" runat="server" Text="Nombre del Propietario"></asp:Label><br />
<asp:TextBox ID="TextBox14" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label36" runat="server" Text="Modelo"></asp:Label><br />
<asp:DropDownList ID="DropDownList9" runat="server" Width="115">
<asp:ListItem>Modelo</asp:ListItem>
</asp:DropDownList>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label37" runat="server" Text="Número ECO"></asp:Label><br />
<asp:TextBox ID="TextBox15" runat="server"></asp:TextBox>
</td>
</tr>
</table>
</td>
<td><table border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td>
<table><tr>
<td>
<asp:Label ID="Label38" runat="server" Text="Estado"></asp:Label><br />
<asp:TextBox ID="TextBox16" runat="server"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label39" runat="server" Text="Vigencia"></asp:Label><br />
<asp:TextBox ID="TextBox17" runat="server"></asp:TextBox>
</td>
</tr></table>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label40" runat="server" Text="Nombre"></asp:Label><br /></br>
<asp:TextBox ID="TextBox18" runat="server"></asp:TextBox></br>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label41" runat="server" Text="Dirección"></asp:Label><br /></br>
<asp:TextBox ID="TextBox19" runat="server"></asp:TextBox></br>
</td>
</tr>
<tr>
<td>
<table border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td>
<asp:Label ID="Label42" runat="server" Text="Placas"></asp:Label><br /></br>
<asp:TextBox ID="TextBox20" runat="server"></asp:TextBox>
</td>
<td>
<table border="1" style="border-right: 1; border: thin solid #C0C0C0;">
<tr>
<td>
<asp:Label ID="Label43" runat="server" Text="Estado"></asp:Label><br /></br>
<asp:TextBox ID="TextBox21" runat="server"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label44" runat="server" Text="Año"></asp:Label><br /></br>
<asp:TextBox ID="TextBox22" runat="server"></asp:TextBox>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td>
<table width="100%" border="1" style="border-right: 1; border: thin solid #C0C0C0;"><tr><td><asp:Label ID="Label45" runat="server" Text="Color"></asp:Label><br />
<asp:DropDownList ID="DropDownList10" runat="server">
<asp:ListItem>Color</asp:ListItem>
</asp:DropDownList>
</td>
<td>
<asp:Label ID="Label46" runat="server" Text="Infracción y Artículos"></asp:Label><br />
<asp:TextBox ID="TextBox23" runat="server"></asp:TextBox><br />
<asp:DropDownList ID="DropDownList11" runat="server">
<asp:ListItem>Infracción No.</asp:ListItem>
</asp:DropDownList></td></tr></table>
</td>
</tr>
</table>
</td>
<td><table>
<tr>
<td>
</td>
</tr>
<tr>
<td>
</td>
</tr>
<tr>
<td>
</td>
</tr>
<tr>
<td>
</td>
</tr>
<tr>
<td>
</td>
</tr>
</table>
</td>
<td><table>
<tr>
<td>
</td>
</tr>
<tr>
<td>
</td>
</tr>
<tr>
<td>
</td>
</tr>
<tr>
<td>
</td>
</tr>
<tr>
<td>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label7" runat="server" Text="5"></asp:Label>
</td>
<td>
<table>
<tr>
<td>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label8" runat="server" Text="6"></asp:Label>
</td>
<td>
<table>
<tr>
<td>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label9" runat="server" Text="7"></asp:Label>
</td>
<td>
<table>
<tr>
<td>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label10" runat="server" Text="8"></asp:Label>
</td>
<td>
<table>
<tr>
<td>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label11" runat="server" Text="9"></asp:Label>
</td>
<td>
<table>
<tr>
<td>
</td>
</tr>
</table>
</td>
</tr>
<tr>
<td class="Titulos" width="5%">
<asp:Label ID="Label12" runat="server" Text="10"></asp:Label>
</td>
<td>
<table>
<tr>
<td>
</td>
</tr>
</table>
</td>
</tr>
</table>
</asp:Content>

View File

@@ -1,5 +0,0 @@

Partial Class PRESENTACIONES_SeguridadPublica_CapturaIncidenciasTransito
Inherits System.Web.UI.Page
End Class

View File

@@ -1,172 +0,0 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RegistroEmergencias.aspx.vb" Inherits="PRESENTACIONES_SeguridadPublica_RegistroEmergencias" %>
<asp:Content ID="Content1" ContentPlaceHolderID="H" runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="E" runat="Server">
Registro de Emergencias
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="C" runat="Server">
<table>
<tr><td>
<asp:Label ID="Label15" runat="server" Text="Módulo:"></asp:Label><asp:TextBox ID="TextBox21" runat="server" Enabled="False"></asp:TextBox></td>
<td>
<asp:Label ID="Label16" runat="server" Text="Usuario:"></asp:Label><asp:TextBox ID="TextBox22" runat="server" Enabled="False"></asp:TextBox></td>
<td>
<asp:Label ID="Label17" runat="server" Text="Fecha/Hora:"></asp:Label><asp:TextBox ID="TextBox23" runat="server" Enabled="False"></asp:TextBox></td></tr>
<tr>
<td>
<fieldset>
<table>
<tr>
<td>
<asp:Label ID="Label1" runat="server" Text="Descripción del Evento:"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox7" runat="server" TextMode="MultiLine"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label2" runat="server" Text="Lugar de la Detención:"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox8" runat="server" TextMode="MultiLine"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label3" runat="server" Text="Colonia:"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox9" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label4" runat="server" Text="Ciudad:"></asp:Label>
</td>
<td>
<asp:TextBox ID="TextBox10" runat="server"></asp:TextBox>
</td>
</tr>
</table>
</fieldset>
</td>
<td>
<table>
<tr>
<td>
<fieldset>
<table>
<tr>
<td align="right">
<asp:Label ID="Label11" runat="server" Text="Corporación:"></asp:Label>
</td>
<td colspan="3">
<asp:TextBox ID="TextBox11" runat="server" Width="400px"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label12" runat="server" Text="Unidades Involucradas"></asp:Label><br />
<asp:TextBox ID="TextBox12" runat="server"></asp:TextBox><br />
<asp:TextBox ID="TextBox13" runat="server"></asp:TextBox><br />
<asp:TextBox ID="TextBox14" runat="server"></asp:TextBox><br />
</td>
<td>
<asp:Label ID="Label13" runat="server" Text="Clave"></asp:Label><br />
<asp:TextBox ID="TextBox15" runat="server" Width="50px"></asp:TextBox><br />
<asp:TextBox ID="TextBox16" runat="server" Width="50px"></asp:TextBox><br />
<asp:TextBox ID="TextBox17" runat="server" Width="50px"></asp:TextBox><br />
</td>
<td>
<asp:Label ID="Label14" runat="server" Text="Nombre del Responsable"></asp:Label><br />
<asp:TextBox ID="TextBox18" runat="server" Width="345px"></asp:TextBox><br />
<asp:TextBox ID="TextBox19" runat="server" Width="345px"></asp:TextBox><br />
<asp:TextBox ID="TextBox20" runat="server" Width="345px"></asp:TextBox><br />
</td>
</tr>
<tr>
<td colspan="3">
<asp:CheckBox ID="CheckBox1" runat="server" />Catálogo de Responsables de Unidad
<asp:Button ID="Button4" runat="server" Text="Guardar Evento" />
<asp:Button ID="Button7" runat="server" Text="Cancelar Evento" /></td></tr>
</table>
</fieldset>
</td>
</tr>
</table>
</td>
</tr>
</table>
<table border="0" width="100%" >
<tr>
<td width="80%">
<fieldset>
<legend><b>Datos del Detenido</b></legend>
<table>
<tr>
<td>
<table>
<tr>
<td>
<asp:Label ID="Label5" runat="server" Text="Nombre:"></asp:Label><br />
<asp:TextBox ID="TextBox1" runat="server"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label8" runat="server" Text="Alias:"></asp:Label><br />
<asp:TextBox ID="TextBox4" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label6" runat="server" Text="Apellido Paterno:"></asp:Label><br />
<asp:TextBox ID="TextBox2" runat="server"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label9" runat="server" Text="Fecha de Nacimiento:"></asp:Label><br />
<asp:TextBox ID="TextBox5" runat="server"></asp:TextBox>
</td>
</tr>
<tr>
<td>
<asp:Label ID="Label7" runat="server" Text="Apellido Materno:"></asp:Label><br />
<asp:TextBox ID="TextBox3" runat="server"></asp:TextBox>
</td>
<td>
<asp:Label ID="Label10" runat="server" Text="Edad:"></asp:Label><br />
<asp:TextBox ID="TextBox6" runat="server"></asp:TextBox>
</td>
</tr>
</table>
</td>
<td>
<table>
<tr>
<td align="center">
<asp:Button ID="Button3" runat="server" Text="Generales" /><br />
<asp:ImageButton ID="ImageButton1" runat="server" ImageUrl="~/Imagenes/buscar.gif" />
</td>
<td>
<asp:Button ID="Button5" runat="server" Text="Filiación" /><br />
<asp:Button ID="Button6" runat="server" Text="Motivos" />
</td>
</tr>
</table>
</td>
</tr>
</table>
</fieldset>
</td>
<td width="20%">
<fieldset>
<legend><b>¿Registrar?</b></legend><br /><br /><br />
<asp:Button ID="Button1" runat="server" Text="Otro Detenido" /><br />
<asp:Button ID="Button2" runat="server" Text="OtroEvento" /><br /><br /><br />
</fieldset>
</td>
</tr>
</table>
</asp:Content>

View File

@@ -1,5 +0,0 @@

Partial Class PRESENTACIONES_SeguridadPublica_RegistroEmergencias
Inherits System.Web.UI.Page
End Class

View File

@@ -1,32 +0,0 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="Sonidito.aspx.vb" Inherits="PruebasOrlando_Sonidito" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" Runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" Runat="Server">
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" Runat="Server">
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="HB" Runat="Server">
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" Runat="Server">
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="HA" Runat="Server">
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="C" Runat="Server">
<asp:UpdatePanel runat="server" ID="up" UpdateMode="conditional">
<ContentTemplate>
<asp:linkbutton runat="server" OnClick="LBPlaySonidito_Click" ID="LBPlaySonidito" text="<i class='fa fa-print' aria-hidden='true'></i>" CssClass="btn btn-sm btn-circle grey "></asp:linkbutton>
<asp:linkbutton runat="server" ID="lnkFacturas" text="<i class='fa fa-download' aria-hidden='true'></i>" CssClass="btn btn-sm btn-circle grey "></asp:linkbutton>
</ContentTemplate>
</asp:UpdatePanel>
</asp:Content>
<asp:Content ID="Content8" ContentPlaceHolderID="JS" Runat="Server">
<script type="text/javascript">
function playsonidito() {
var snd = new Audio("/Sonidos/142608__autistic-lucario__error.wav");
snd.play();
snd.currentTime = 0;
}
</script>
</asp:Content>

View File

@@ -1,75 +0,0 @@
Imports Extensiones
Imports System.Data
Imports System.Diagnostics
Imports System.IO
Imports Microsoft.Reporting.WebForms
Imports System.Security
Partial Class PruebasOrlando_Sonidito
Inherits System.Web.UI.Page
Protected Sub LBPlaySonidito_Click(sender As Object, e As EventArgs)
Dim ruta = "C:\inetpub\wwwroot\ADSistemas\Sonidos\142608__autistic-lucario__error.wav"
RegistraScript("playsonidito();")
End Sub
Private Function VerificaCorreo() As Boolean Handles lnkFacturas.Click
Dim Retorno As Boolean = False
AbreComoSistema()
Return Retorno
End Function
Public Sub AbreComoSistema()
Dim Retorno As Boolean = False
Dim ObjProcess As Process = Nothing
Dim Mensajes As String = ""
Dim Ejecutable = Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "Utilerias\UtileriasAD.exe")
Dim Folder = Path.Combine(AppDomain.CurrentDomain.BaseDirectory, "Empresas\")
Dim error1 As Boolean = False
Try
ObjProcess = New Process()
ObjProcess.StartInfo.RedirectStandardOutput = True
ObjProcess.StartInfo.FileName = Ejecutable
' ObjProcess.StartInfo.UserName = "Orlando"
' ObjProcess.StartInfo.Password = ToSecureString("memy")
' ObjProcess.StartInfo.Verb = "runas"
ObjProcess.StartInfo.Arguments = $"2 {Folder}"
ObjProcess.StartInfo.UseShellExecute = False
ObjProcess.StartInfo.WindowStyle = ProcessWindowStyle.Normal
ObjProcess.Start()
ObjProcess.WaitForExit()
ObjProcess.Close()
Catch ex As Exception
error1 = True
OnError("Ocurrió un error al ejecutar el actualizador.", ex)
End Try
End Sub
Public Function ToSecureString(Source As String) As SecureString
If (String.IsNullOrWhiteSpace(Source)) Then
Return Nothing
Else
Dim Result As SecureString = New SecureString()
For Each c As Char In Source.ToCharArray()
Result.AppendChar(c)
Next
Return Result
End If
End Function
End Class

View File

@@ -1,22 +0,0 @@
<%@ Page Title="" Language="C#" MasterPageFile="~/Site.master" AutoEventWireup="true" CodeFile="Soniditos.aspx.cs" Inherits="PruebasOrlando_Soniditos" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" Runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" Runat="Server">
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" Runat="Server">
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="HB" Runat="Server">
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" Runat="Server">
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="HA" Runat="Server">
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="C" Runat="Server">
<asp:linkbutton runat="server" OnClick="Unnamed_Click" ID="LBPlaySonidito" text="+" CssClass="btn btn-sm btn-circle green"></asp:linkbutton>
</asp:Content>
<asp:Content ID="Content8" ContentPlaceHolderID="JS" Runat="Server">
</asp:Content>

View File

@@ -1,19 +0,0 @@
using System;
using System.Collections.Generic;
using System.Linq;
using System.Web;
using System.Web.UI;
using System.Web.UI.WebControls;
public partial class PruebasOrlando_Soniditos : System.Web.UI.Page
{
protected void Page_Load(object sender, EventArgs e)
{
}
protected void Unnamed_Click(object sender, EventArgs e)
{
}
}

View File

@@ -1,45 +0,0 @@

Microsoft Visual Studio Solution File, Format Version 12.00
# Visual Studio 15
VisualStudioVersion = 15.0.27703.2035
MinimumVisualStudioVersion = 10.0.40219.1
Project("{E24C65DC-7377-472B-9ABA-BC803B73C61A}") = "http://localhost", "http://localhost", "{82D0C8D1-3CF5-471D-92AF-71A9AE4B4335}"
ProjectSection(WebsiteProperties) = preProject
SccProjectName = ""$/localhost", CAAAAAAA"
SccAuxPath = ""
SccLocalPath = "."
SccProvider = "MSSCCI:Microsoft Visual SourceSafe"
UseIISExpress = "false"
TargetFrameworkMoniker = ".NETFramework,Version%3Dv4.6"
Debug.AspNetCompiler.VirtualPath = "/localhost"
Debug.AspNetCompiler.PhysicalPath = "..\..\..\..\..\inetpub\SIGIT\"
Debug.AspNetCompiler.TargetPath = "PrecompiledWeb\localhost\"
Debug.AspNetCompiler.Updateable = "true"
Debug.AspNetCompiler.ForceOverwrite = "true"
Debug.AspNetCompiler.FixedNames = "false"
Debug.AspNetCompiler.Debug = "True"
Release.AspNetCompiler.VirtualPath = "/localhost"
Release.AspNetCompiler.PhysicalPath = "..\..\..\..\..\inetpub\SIGIT\"
Release.AspNetCompiler.TargetPath = "PrecompiledWeb\localhost\"
Release.AspNetCompiler.Updateable = "true"
Release.AspNetCompiler.ForceOverwrite = "true"
Release.AspNetCompiler.FixedNames = "false"
Release.AspNetCompiler.Debug = "False"
SlnRelativePath = "..\..\..\..\..\inetpub\SIGIT\"
EndProjectSection
EndProject
Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution
Debug|Any CPU = Debug|Any CPU
EndGlobalSection
GlobalSection(ProjectConfigurationPlatforms) = postSolution
{82D0C8D1-3CF5-471D-92AF-71A9AE4B4335}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{82D0C8D1-3CF5-471D-92AF-71A9AE4B4335}.Debug|Any CPU.Build.0 = Debug|Any CPU
EndGlobalSection
GlobalSection(SolutionProperties) = preSolution
HideSolutionNode = FALSE
EndGlobalSection
GlobalSection(ExtensibilityGlobals) = postSolution
SolutionGuid = {B4590109-7BF9-411C-A1AE-792C02707CE6}
EndGlobalSection
EndGlobal