Hi zusammen ich mal wieder könnte mal bischen hilfe gebrauchen.
Würde gerne aus ne ini file, jede zeile laden und sie dann in die CheckedListBox packen das funtzt auch schon soweit.
Jetzt würde ich gerne noch wenn ich was aus der CheckedListBox auswähle z.b Ubuntu.php Server1.php und Server2.php etc.
Das er mir dann jedes checked item mit meiner url öffnet.
ini schaut ca so aus.
restart.php= Restart
netboot.php= Netboot
myStart.php= MSSQL-START
wenn ich dann z.b 3 von 10 auswähle und laden drücke soll er mir dann z.b 3 lings öffnen die sektion die man halt ausgewählt hat.
z.b
localhost:80/delete_server?serv=+Ubuntu~Server1.php
localhost:80/delete_server?serv=+Sql~restart.php
localhost:80/delete_server?serv=+mysql~myStart.php
Kann evllt wer aushelfen ? Es geht eigentlich nur noch um denn schluss teil.
" + TextBox3.Text + "~Server1.php")
Server1.php soll halt mit denn checken aus der box getauscht werden und jede checked box geladen werden und als url geöffnet werden.
Würde gerne aus ne ini file, jede zeile laden und sie dann in die CheckedListBox packen das funtzt auch schon soweit.
Jetzt würde ich gerne noch wenn ich was aus der CheckedListBox auswähle z.b Ubuntu.php Server1.php und Server2.php etc.
Das er mir dann jedes checked item mit meiner url öffnet.
ini schaut ca so aus.
restart.php= Restart
netboot.php= Netboot
myStart.php= MSSQL-START
wenn ich dann z.b 3 von 10 auswähle und laden drücke soll er mir dann z.b 3 lings öffnen die sektion die man halt ausgewählt hat.
z.b
localhost:80/delete_server?serv=+Ubuntu~Server1.php
localhost:80/delete_server?serv=+Sql~restart.php
localhost:80/delete_server?serv=+mysql~myStart.php
Kann evllt wer aushelfen ? Es geht eigentlich nur noch um denn schluss teil.
" + TextBox3.Text + "~Server1.php")
Server1.php soll halt mit denn checken aus der box getauscht werden und jede checked box geladen werden und als url geöffnet werden.
VB.NET-Quellcode
- Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
- Try
- Dim link_liste As New List(Of String) ' Liste beinhaltet die Links
- Dim inhalt_textdatei() As String = IO.File.ReadAllLines("server.ini", System.Text.Encoding.Default) ' Textdatei einlesen
- For Each zeile As String In inhalt_textdatei ' Textdatei zeilenweise durchgehen....
- Dim inhalt_zeile() As String = zeile.Split(CChar("=")) ' ...Zeile am Trennzeichen aufsplitten
- CheckedListBox1.Items.Add(inhalt_zeile(1)) ' ....Name in Checkedlistbox eintragen (1 = zweiter Teil)
- link_liste.Add(inhalt_zeile(0)) ' ...dazugehörigen Link in Liste eintragen (0 = erster Teil)
- Next
- Catch ex As Exception
- ' Fehler ausgeben
- MessageBox.Show(ex.Message)
- End Try
- End Sub
- Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
- System.Diagnostics.Process.Start("http://localhost:80/delete_server?serv=++" + TextBox3.Text + "~Server1.php")
- End Sub
- End Class