[Release]NAS - Server Streaming / Reading programm

06/24/2013 20:21 dedicite#1
Hallo will hier nen Kleinen Source code von mir Veröffentlichen ^^


PHP Code:
Public Class Form1

    
Private Sub Form2_Load(sender As ObjectAs EventArgsHandles MyBase.Load
        Dim di 
As New System.IO.DirectoryInfo("\\fritz.box\BKA-Funkwagen2\Storage-00")
        For 
Each fi As System.IO.FileInfo In di.GetFiles("*.*"System.IO.SearchOption.AllDirectories)
            
ComboBox1.Items.Add(fi.FullName)
        
Next
    End Sub

    
Private Sub Button1_Click(sender As ObjectAs EventArgsHandles Button1.Click
        Process
.Start(ComboBox1.Text)

    
End Sub

    
Private Sub Button2_Click(sender As ObjectAs EventArgsHandles Button2.Click
        ComboBox1
.Refresh()
    
End Sub

    
Private Sub ComboBox1_SelectedIndexChanged(sender As ObjectAs EventArgsHandles ComboBox1.SelectedIndexChanged

    End Sub
End 
Class 
Ich nutze es als Musik Streamer ^^
Have fun ;)


Screenshot:

[Only registered and activated users can see links. Click Here To Register...]
06/24/2013 21:21 'Aleo#2
Erstens du hast die falsche Sektion erwischt. 2. Das ist ein echter Mini Release also ab in den [Only registered and activated users can see links. Click Here To Register...].

Beste Grüße,
'Aleo
06/24/2013 22:36 dedicite#3
achso sorry :/ bitte darum das nen Mod evtl Moved
06/25/2013 16:14 Kraizy​#4
Wenn du schon ne Source reinstellst, dann verzichte auf Namen wie Button1, Button2, ... und unnötigen Coden wie zb diesen:

Quote:
Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged

End Sub