Menú

Mostrar Mensajes

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ú

Mensajes - Eleкtro

#9541
Cita de: Seazoux en 23 Enero 2013, 20:09 PMdime como saco la variable de la ruta del archivo seleccionado

Explícate mejor.

PD: Ah, y eso son 5 € o un "PORFAVOR gran Elektro H. muéstrame el camino" xD




EDITO:


Cita de: Seazoux en 23 Enero 2013, 20:09 PM
Error   1   'Windows' no es un miembro de 'System.Environment.SpecialFolder'.   C:\Users\Alvaro\Documents\VisualBasic NET\Projectos\WebKitEmulator\WindowsApplication1\WindowsApplication1\Form2.vb   4   74   WindowsApplication1

Que Framework estás usando?

La respuesta que te dí es para FW 4.X, si estás usando FW 3.X pues símplemente modifica "Windows" por "System", porqué Windows no está xD, recuerda que sólo es un ejemplo, ahí debes poner la ruta que tu quieres usar, no la que yo he usado...

Saludos.
#9542
ups, no me paré a ver la sintaxis de tu ejemplo jaja, me pareció C# a simple vista por los brackets y demás y te busqué eso para .NET, no me fijé en los imports de tu ejemplo, estaba claro, sorry.
#9543
¿Nadie sabe nada acerca de este tema?
#9544
Scripting / Re: ftp en bath
23 Enero 2013, 18:35 PM
No es de extrañar que algunos antivirus puedan considerar WGET como una utilidad maliciosa ("hacktool") o un worm, pues es un programa con el que te puedes descargar cualquier archivo de la web en modo oculto en un PC ajeno, y ejecutar el archivo descargado...

Pero obviamente es un falso positivo de ese antivirus que uses :xD, no hay de que preocuparse.

Saludos
#9545
Cita de: Seazoux en 23 Enero 2013, 18:01 PMyo que no he manejado nunca vb, esto me suena a chino lol

Pero se trata de aprender, yo lo que véo dificil para tu nivel te lo doy hecho, pero es que las cosas así de fáciles como lo de la longitúd....

anda toma:
Código (vbnet) [Seleccionar]
   Dim TotalRoms as int32 = Files.Length
   Label1.text = "Roms encontrados (" & TotalRoms & ")"
#9546
Cita de: Seazoux en 23 Enero 2013, 17:22 PM
Configurado, y como puedo poner en un label, Roms encontrados (x) ??

Muy sencillo, contando la longitud de este array:
Cita de: Elektor H.
Código (vbnet) [Seleccionar]
Dim Files As Array = IO.Directory.GetFiles(Environment.GetFolderPath(Environment.SpecialFolder.Windows), "*", IO.SearchOption.TopDirectoryOnly)

Código (VBNET) [Seleccionar]
Dim TotalRoms as int32 = "longitud del array" ' Eso no te lo voy a dar hecho, en Google sale, si no sabes búscalo, es sencillísimo xD
Label1.text = "Roms encontrados (" & TotalRoms & ")"
#9547
Cita de: Seazoux en 23 Enero 2013, 17:18 PMTrolololol, pero se muestran los archivos en el Form no en el listbox

¿Que te has fumado Seazoux?  :P

Fíjate mejor en el código...

Código (vbnet) [Seleccionar]
Listita.Dock = DockStyle.Fill ' Esto hace que el form se rellene con el listbox...

Saludos
#9548
Tener tengo las 3 cosas, pero yo también tengo que hacer mis cosas y no soy tu chacha xD

Aunque, todos tenemos un precio, ¿no quieres mi cuenta de Paypal? :silbar:

No te desesperes, por aquí te ayudarán lo que haga falta como me han ayudado a mí... si de verdad te interesa la programación, te tragarás las horas que séa necesario para terminar una APP xD.

Saludos
#9549
Fuf... Vale,

Creo que te has confundido bastante, y creo que el título del post no tiene nada que ver, el filesystemwatcher es para monitorizar los cambios de archivos en un directorio, si tu quieres visualizar los archivos de un directorio, usa por ejemplo un listbox para listarlos adentro...

EDITO: Pero vamos, que si quieres además monitorizar el directorio en tiempo real para ir actualizando la lista cada cierto tiempo si se elimina o se añade un archivo con el FileSystemWatcher... eso ya es otra historia xD

Código (vbnet) [Seleccionar]
Public Class Form1

    Dim Listita As New ListBox

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Me.Size = New Point(240, 240)

        Listita.Dock = DockStyle.Fill
        Listita.BackColor = Color.White
        Listita.ForeColor = Color.Black
        Listita.Font = New Font(Listita.Font.FontFamily, 12, Listita.Font.Style)
        Me.Controls.Add(Listita)

        Dim Files As Array = IO.Directory.GetFiles(Environment.GetFolderPath(Environment.SpecialFolder.Windows), "*", IO.SearchOption.TopDirectoryOnly)

        For Each File In Files
            Dim File_Info As New IO.FileInfo(File)
            Listita.Items.Add(File_Info.Name)
        Next
    End Sub

End Class



#9550
a ver, aunque yo no soy moderador de esta sección creo que es lógico que si son dudas relativas al webbrowser podrás hacerlas aquí, pero si son dudas de... por ejemplo, un datagridview, pues lo correcto sería en un nuevo post XD

PD: De todas formas novlucker y seba123neo no son tán estrictos como yo...  >:D