|
2
|
Programación / .NET (C#, VB.NET, ASP) / Re: Problemas con objeto y listbox en vs 2015
|
en: 26 Marzo 2019, 17:28 pm
|
Luego de un montón de intentos lo logré!! . En el método del constructor del objeto archivo lo agregué cómo parámetro: Public Sub New(ByVal str_ruta_e As String, ByVal str_ruta_archivo_val As String, ByVal str_rutas_array As ArrayList, ByVal str_archivo_salidas As String, ByVal int_cont As Integer) str_ruta_archivo_entradas = str_ruta_e str_ruta_archivo_salidas = str_archivo_salidas str_ruta_archivo_valorizado = str_ruta_archivo_val str_entradas_salidas_excluir = str_rutas_array int_contador = int_cont End Sub
Posteriormente en el form, declaré la variable como pública: Public int_contador
Modifiqué el método para que tuviera como parámetro la variable: Private Sub cargar_archivos(ByVal int_cont As Integer) .. end sub
LLamé al método en el botón: Private Sub btn_Cargar_Archivos_Click(sender As Object, e As EventArgs) Handles btn_Cargar_Archivos.Click int_contador = int_contador + 1 cargar_archivos(int_contador)
Agregándolo finalmente así al listbox: lt_Archivos.Items.Add(New Archivos(str_ruta_archivo_E, str_ruta_archivo_Inv, obj_array, str_ruta_archivo_S, int_cont))
Gracias por leerme.
|
|
|
3
|
Programación / .NET (C#, VB.NET, ASP) / Re: Problemas con objeto y listbox en vs 2015
|
en: 24 Marzo 2019, 19:51 pm
|
Muchas gracias elektro por responder, siempre con mucho conocimiento por dar y aprendo mucho de tu persona.
Mira, lo único que quiero que cuando agregue ese objeto al listbox no aparezca como texto en cada item el valor del objeto, es decir NO quiero que aparezca como "nombredel proyecto.objeto" sino que en ese texto aparezca como archivo1, archivo2,archivo3 sin alterar lógicamente sus atributos.
La variable local la declaré tanto en la clase del form dónde estaba ese listbox como erroneamente tambien en ese objeto.
Lo intenté con el método toString() para en lugar de "nombredelproyecto.objeto" se mostrara Archivo pero queria concatenarle un contador que se fuera incrementando, pero no lo logré.
|
|
|
4
|
Programación / .NET (C#, VB.NET, ASP) / Re: Problemas con objeto y listbox en vs 2015
|
en: 23 Marzo 2019, 21:38 pm
|
Ya pude, lo dejo para que otros si tienen la duda puedan resolverlo... Dim obj As Archivos obj = CType(lt_Archivos.SelectedItem, Archivos)
Y ya con la variable "obj" pueden jugar. Ahora bien, lo que no he podido hacer aún es lo siguiente: Quiero que cuando se inserte ese objeto en lugar de decir el nombre del objeto diga "Archivo1,Archivo2", lo que hice fue cambiar el método toString para que diga archivo pero quiero tener un contador para así el usuario pueda diferenciar entre los objetos del listbox. Lo que hice fue esto: Public Overrides Function ToString() As String Return str_mostrar_texto & int_cont End Function End Class
Lógicamente agregué el atributo "str_mostrar_texto" en la clase así como sus gets y sets. Entonces no se si alguno tendrá alguna sugerencia? ya lo intenté con un integer global pero no suma el contador y en todas da 0. Muchas gracias desde ya.
|
|
|
5
|
Programación / .NET (C#, VB.NET, ASP) / Problemas con objeto y listbox en vs 2015
|
en: 22 Marzo 2019, 22:25 pm
|
Saludos amigos, soy yo nuevamente molestando, tengo un problema con un listbox. Verán, estoy haciendo una aplicación dónde esta cargue 3 rutas de un archivo sobre un objeto, posteriormente cuando ese objeto esté "relleno" lo inserto en un listbox, el problema se inicia cuando quiero obtener el valor de ese listbox el cuál según el vs el valor es nothing pero curiosamente a la hora de depurarlo los valores me dice que se ha rellenado correctamente. Este es el código del objeto Public Class Archivos 'Atributos de la clase Private str_ruta_archivo_entradas As String = String.Empty Private str_ruta_archivo_valorizado As String = String.Empty Private str_ruta_archivo_salidas As String = String.Empty Private str_entradas_salidas_excluir As ArrayList 'Métodos de acceso Public Property Str_Ruta_Archivo_E() As String Get Return Me.str_ruta_archivo_entradas End Get Set(ByVal Value As String) Me.str_ruta_archivo_entradas = Value End Set End Property Public Property Str_Ruta_Archivo_Val As String Get Return Me.str_ruta_archivo_valorizado End Get Set(ByVal Value As String) Me.str_ruta_archivo_valorizado = Value End Set End Property Public Property Str_Salidas As String Get Return Me.str_ruta_archivo_salidas End Get Set(ByVal Value As String) Me.str_ruta_archivo_salidas = Value End Set End Property Public Property Str_ES_Excluir As ArrayList Get Return Me.str_entradas_salidas_excluir End Get Set(ByVal Value As ArrayList) Me.str_entradas_salidas_excluir = Value End Set End Property 'Constructor Public Sub New(ByVal str_ruta_e As String, ByVal str_ruta_archivo_val As String, ByVal str_rutas_array As ArrayList, ByVal str_archivo_salidas As String) str_ruta_archivo_entradas = str_ruta_e str_ruta_archivo_salidas = str_archivo_salidas str_ruta_archivo_valorizado = str_ruta_archivo_val str_entradas_salidas_excluir = str_rutas_array End Sub Public Sub New() str_ruta_archivo_entradas = String.Empty str_ruta_archivo_valorizado = String.Empty str_ruta_archivo_salidas = String.Empty str_entradas_salidas_excluir = Nothing End Sub End Class
Aquí es dónde lo inserto mediante unos diálogos y un botón. Try Dim operaciones As Archivos Dim str_ruta_archivo_E As String = String.Empty Dim str_ruta_archivo_S As String = String.Empty Dim str_ruta_archivo_Inv As String = String.Empty Dim obj_array As New ArrayList Dim int_cont As Integer = 0 'Cargando archivo de entradas/salidas dlg_Abrir.Title = "Seleccione el archivo de excel (archivo de entradas) a procesar" dlg_Abrir.DefaultExt = ".xlsx" lbl_estado.Text = "Cargando datos del archivo de entradas..." If dlg_Abrir.ShowDialog() = System.Windows.Forms.DialogResult.OK Then str_ruta_archivo_E = dlg_Abrir.FileName() End If 'Cargando archivo de salidas dlg_Abrir.Title = "Seleccione el archivo de excel (archivo de salidas) a procesar" dlg_Abrir.DefaultExt = ".xlsx" lbl_estado.Text = "Cargando datos del archivo de salidas..." If dlg_Abrir.ShowDialog() = System.Windows.Forms.DialogResult.OK Then str_ruta_archivo_S = dlg_Abrir.FileName() End If 'Cargando archivo valorizado dlg_Abrir.Title = "Seleccione el archivo de excel (archivo valorizado correspondiente a esas entradas/salidas) a procesar" dlg_Abrir.DefaultExt = ".xlsx" lbl_estado.Text = "Cargando datos del archivo valorizado correspondiente a esas entradas/salidas..." If dlg_Abrir.ShowDialog() = System.Windows.Forms.DialogResult.OK Then str_ruta_archivo_Inv = dlg_Abrir.FileName() End If For Each valor In lt_salidas_entradas_excluir.Items obj_array.Add(valor) Next operaciones = New Archivos(str_ruta_archivo_E, str_ruta_archivo_Inv, obj_array, str_ruta_archivo_S) lt_Archivos.Items.Add(operaciones) Catch ex As Exception MsgBox("Hubo un error cargando el archivo del contenedor.") End Try
Mediante un menústrip de un contextmenú o menú contextual genero un pequeño dialogo y lo que hago es que quiero mostrar la información de ese objeto (que por cierto sería genial si alguno de uds sabe como ponerle texto más "bonito" a ese objeto en ese listbox sin alterar su valor como un combobox con sus propiedades de display member). Private Sub MostrarInformaciónToolStripMenuItem_Click(sender As Object, e As EventArgs) Handles MostrarInformaciónToolStripMenuItem.Click Dim obj As Archivos obj = lt_Archivos.SelectedValue MsgBox(obj.Str_Ruta_Archivo_E) End Sub
Curiosamente cuando lo depuro cómo les menciono arriba me dice que el objeto está correctamente insertado y tiene un valor pero a la hora de "jalarlo" no me sale nada, me preocupa porque necesito manipular ese objeto para el resto del proyecto, si uds saben algo se los agradecería demasiado.
|
|
|
7
|
Programación / .NET (C#, VB.NET, ASP) / Problemas al instalar VS2015 windows 7 ultimate o windows 10 pro for workstartio
|
en: 20 Marzo 2019, 21:40 pm
|
Saludos amigos!!, espero se encuentren bien.
Estoy intentando instalar Visual Studio 2015 Enterprise en dos ordenadores, ambos de 64 bits pero a la hora de instalarlo me sale este error.
"Paquete de idioma de Microsoft Visual Studio 2015 Team Explorer- ESN ", el cuál intenté descargarlo pero me dice que ya está instalado previamente.
Y no he podido instalarlo, curiosamente ese mismo ejecutable sirve para otras computadoras, descartando así que esté corrupto.
¿ Alguna sugerencia?.
|
|
|
9
|
Programación / Desarrollo Web / Re: Consulta javascript y expresiones regulares
|
en: 19 Marzo 2019, 15:09 pm
|
Perdona amigo, pero esperaba una respuesta que me ayudara mejor, quizás me haya expresado mal y no me hayan entendido, el texto de ahí según el test que hecho en otras páginas si cumple con el patrón de la expresión regular pero... en el javascript por alguna razón me tira un false.
Saben ¿ porque será?
Gracias.
|
|
|
10
|
Programación / Desarrollo Web / Consulta javascript y expresiones regulares
|
en: 19 Marzo 2019, 05:50 am
|
Hola amigos del foro!!, tengo una expresión regular que me sirve en las páginas y todo y con muchos otros textos pero con un texto en especìfico no me sirve!! Esta es la expresión regular: /^(?!.*WHERE.*|.*FROM.*|.*SELECT.*|.*UPDATE.*|.*DROP.*|.*INSERT.*|.*DELETE.*|.*ALTER.*|.*TABLE.*|.*TRUNCATE.*|.*DATABASE.*)[A-Za-zÑñÁÉÍÓÚáéíóú,'-.1234567890\s]+$/
La tengo implementada así function validar_textolibre(texto){ //Creamos un objeto object=document.getElementById(texto); valueForm=object.value; object2 = valueForm.replace("\n"," "); object3 = object2.toUpperCase(); var objRegExp = /^(?!.*WHERE.*|.*FROM.*|.*SELECT.*|.*UPDATE.*|.*DROP.*|.*INSERT.*|.*DELETE.*|.*ALTER.*|.*TABLE.*|.*TRUNCATE.*|.*DATABASE.*)[A-Za-zÑñÁÉÍÓÚáéíóú,'-.1234567890\s]+$/; //Valida que contenga espacios y letras únicamente. if(objRegExp.test(object3)){ return true; } else{ return false; } }
Lo extraño es que la uso con este texto: Atención al cliente, realización de asientos contables, codificación de gastos, registro de cuentas por cobrar y pagar, manejo de la central, presentación de las declaraciones tributarias. Y me dice que es correcta, de hecho para muchos otros textos si me sirve, no comprendo que estará pasando. Uds saben que estoy haciendo mal? les explico un poco que el texto lo convierto en mayusculas y le quito los saltos de linea para mejor la evaluaciòn. Lo que quiero hacer en el texto es que la persona escriba de todo, excepto las expresiones de una statement de un sql, pero que pueda escribir mayusculas, letras, numeros, minusculas sin signos ni nada, me funciona con todo pero con este texto de arriba no, la verdad no se que estaré haciendo mal.
|
|
|
|
|
|
|