Visual Basic.NET - cargar, filtrar y escuchar audios

 
Vista:
sin imagen de perfil
Val: 5
Ha disminuido su posición en 7 puestos en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

cargar, filtrar y escuchar audios

Publicado por Mariano (4 intervenciones) el 05/02/2019 14:11:51
Hola
soy nuevo en vb.net 2010 y queria hacer un programa que cargue archivos .wav
Nombre del archivo
EricnetBackup_20190102183433-1577-908108888876

mi idea es cargar todos los audios en un listbox
y que se pueda hacer un filtro por ejemplo con combobox es decir
que se pudan filtrar por extencion 1577
o por hora 183433
y que lo mismo se puedan escuchar

me podrian ayudar

Saludos
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Phil Rob
Val: 2.757
Oro
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

cargar, filtrar y escuchar audios

Publicado por Phil Rob (730 intervenciones) el 06/02/2019 19:07:08
Hola,

Se adjunta el archivo MultiMed.zip, que es una pequeña aplicación de inicio.
Puede agregar sus archivos mp3 y mp4 en el ListBox y luego seleccionar el que desea reproducir.

Para poder usar el Windows Media Player, debe agregar la referencia al proyecto y al componente en el formulario. Las siguientes 2 ilustraciones muestran esto.

MultiMedia1

En las herramientas :
MultiMedia2

Espero que esto te ayudará ...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Phil Rob
Val: 2.757
Oro
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

cargar, filtrar y escuchar audios

Publicado por Phil Rob (730 intervenciones) el 06/02/2019 21:05:51
Hola,

El código Form1 que te envié es innecesariamente complicado.
Le sugiero que lo reemplace con lo siguiente:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Imports System.Windows
Public Class Form1
    Dim MiExplorador As OpenFileDialog
 
    Private Sub BAgregar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BAgregar.Click
        MiExplorador = New OpenFileDialog
        MiExplorador.Filter = "Audio|*.mp3|Video|*.mp4"
        MiExplorador.Multiselect = True
        If (MiExplorador.ShowDialog() = DialogResult.OK) Then
            For Each Archivo As String In MiExplorador.FileNames
                ListBox1.Items.Add(Archivo)
            Next
        End If
        MiExplorador.Dispose()
    End Sub
 
    Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
        AxWindowsMediaPlayer1.URL = ListBox1.SelectedItem
    End Sub
End Class

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

cargar, filtrar y escuchar audios

Publicado por Mariano (4 intervenciones) el 07/02/2019 12:24:35
Hola muchas gracias por el codigo
te podria molestar con una cosita mas ?

hasta ahora puedo cargar un listbox .wav y reproducir el audio

ahora mi idea es poner 2 textbox y hacer fitros dentro del listbox es decir

EricnetBackup_año-mes-dia-hora-min-seg interno-interno

EricnetBackup_año-mes-dia-hora-min-seg interno-telefono

EricnetBackup_año-mes-dia-hora-min-seg telefono-interno

EricnetBackup_20190201110332-2557-1009
EricnetBackup_20190102183433-1577-908108888876
EricnetBackup_20190201113932-2557-1370
EricnetBackup_20190201113932-2557-908188484348

LO QUE QUIERO ES usar los text de filtro
MUCHAS GRACIAS

sALUDOS
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Phil Rob
Val: 2.757
Oro
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

cargar, filtrar y escuchar audios

Publicado por Phil Rob (730 intervenciones) el 08/02/2019 18:18:35
Hola,

Se adjunta el archivo MultiMedPHR.zip que contiene el proyecto mejorado que responde (en parte) a su solicitud.
Es posible buscar textos y fechas-horas (también es texto) en los nombres de los archivos presentados en el ListBox.
Estos códigos servirán de base para desarrollar su propio algoritmo.

Buena diversion


MultiMedia4
MultiMedia5
MultiMedia6
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil
Val: 5
Ha disminuido su posición en 7 puestos en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

cargar, filtrar y escuchar audios

Publicado por Mariano (4 intervenciones) el 09/02/2019 11:28:28
Gracias
Pero por ejemplo cuando busco el interno 2577 aparece 5 veces y solo me muestra el primero y el último

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Phil Rob
Val: 2.757
Oro
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

cargar, filtrar y escuchar audios

Publicado por Phil Rob (730 intervenciones) el 09/02/2019 12:11:33
Hola,

"Pero por ejemplo cuando busco el interno 2577 aparece 5 veces y solo me muestra el primero y el último "

Claro !
Pero nada le impide cargar una tabla de String para administrarlas en su tiempo libre ...
Por ejemplo :

1
2
3
4
5
6
7
8
9
10
11
12
13
Dim MiBuscados() As Integer
 
    Private Sub BuscarTodos(ByVal ABuscar As String, ByRef IndexDeLosBuscados() As Integer)
        Dim Index As Integer = -1
        Dim i As Integer = 0
        ReDim MiBuscados(LBMedias.Items.Count)
        For Each S As String In LBMedias.Items
            If S.IndexOf(ABuscar) > -1 Then
                IndexDeLosBuscados(i) = LBMedias.Items.IndexOf(S)
                i += 1
            End If
        Next
    End Sub
No puedo programar para ti todos los detalles, te di una base de trabajo, la tuya para continuar.

Libera tu imaginación algorítmica ...

Que tenga un buen día
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil
Val: 5
Ha disminuido su posición en 7 puestos en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

cargar, filtrar y escuchar audios

Publicado por Mariano (4 intervenciones) el 09/02/2019 12:39:31
Gracias

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar