Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúCita de: EagleStrike en 17 Junio 2016, 03:53 AMLos caracteres como áéíóúñ¡¿ y todos ésos no se muestran bien en la consola de comandos porque la consola de comandos fue diseñada por gente que habla en inglés.
En el idioma inglés los acentos no existen, los ¡¿ tampoco, y la Ñ tampoco. Entonces la CMD no tiene manera de mostrarlos.
Cita de: hckcrck en 17 Junio 2016, 01:56 AMno sabrás por casualidad una solución a mis problemas con los caracteres?
@Echo OFF
(CHCP 1252)1>Nul
Echo:áéíóúÁÉÍÓÚàèìòùÀÈÌÒÙäëïöüÄËÏÖÜ´`ñÑçÇ¡¿
Pause&Exit
Cita de: hckcrck en 16 Junio 2016, 23:26 PM
Gracias electro!! tiene muy buena pinta, si no te importa puede que utilice algo para mejorar el script batchelp
Cita de: MaliaHdez en 8 Junio 2016, 18:32 PMde un tiempo para aca no funciona
El servidor SMTP requiere una conexión segura o el cliente no se autenticó.
La respuesta del servidor fue: 5.5.1 Authentication Required.
Cita de: Usuario 202 en 16 Junio 2016, 22:35 PMPD: Aunque este tema ya esta resuelto, la verdad me gustaría que me explicaras mejor lo del modulo ya que no entendí muy bien, pero a fin de cuentas gracias por ayudarme.[/b][/size]
Public Class MiClase
' ...
End Class
Public Module MiModulo
' ...
End Module
Cita de: hckcrck en 16 Junio 2016, 17:58 PM
Nota: Cualquier manual bien explicado sobre batch o bash será bien venido
Cita de: .:UND3R:. en 13 Junio 2016, 23:31 PM
Los textos se ven como violeta, manchados (label de % de carga y label sobre las barras), sigo intentando solucionar el problema, saludos y gracias
Cita de: Lekim en 16 Junio 2016, 02:34 AM¿Cuál es la queja? XD
Dim integerList As New List(Of Integer)
For Each item As Object In Me.ListBox1.Items
integerList.Add(CInt(item))
Next item
integerList.Sort(Comparer(Of Integer).Default)
For Each value As Integer In integerList
Me.ListBox1.Items.Add(value)
Next value
Cita de: Eleкtro en 15 Junio 2016, 01:11 AMBueno la verdad no supe en donde poner el código.
<HideModuleName>
Public Module ListBoxExtensions
<DebuggerStepThrough>
<Extension>
Public Sub Sort(Of T)(ByVal sender As ListBox)
ListBoxExtensions.Sort(Of T)(sender, Comparer(Of T).Default)
End Sub
<DebuggerStepThrough>
<Extension>
Public Sub Sort(Of T)(ByVal sender As ListBox, ByVal comparer As IComparer(Of T))
Dim itemList As New List(Of T)
For Each item As T In sender.Items
itemList.Add(item)
Next item
itemList.Sort(comparer)
sender.SuspendLayout()
sender.Items.Clear()
For Each item As T In itemList
sender.Items.Add(item)
Next item
sender.ResumeLayout()
End Sub
End Module
Me.ListBox1.Sort(Of Integer) ' Para enteros.
Me.ListBox1.Sort(Of String) ' Para texto.