Hallo Ihr,
Bin grad an einem Ts3 Admintool dran, wodurch man extern, ohne auf dem TS3 Server zu sein, per SSA Einstellungen machen kann, User sehen und kicken kann ect.
Nun bin ich gerade dabei, die Connect mit Hilfe von der TS3 UDF zu bauen.
Nun mein 1. Problem: Er kann nicht auf den Server connecten. Ich hab die richtig IP eingetragen, auch den richtigen Port. Jedoch sagt er mir jedesmal, dass die Ip oder der Port falsch sein.
Mein 2. Problem: Ich möchte gerne, dass solange die connection nicht besteht, dass man bei einem klick auf einen Tab (innerhalb meines Programmes) direkt wieder zum connectab zurückgeschoben wird.
Damit ihr euch das vorstellen könnt, hier mal mein bisheriger Code:
[autoit]#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#include <ts3.au3>
#Region ### START Koda GUI section ### Form=
$tooltitle= GUICreate("TS3 Admintool", 518, 455, 192, 125)
GUISetFont(9, 400, 0, "MS Sans Serif")
GUISetBkColor(0x000000)
$tab = GUICtrlCreateTab(10, 10, 488, 420)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$tab0 = GUICtrlCreateTabItem("Connect")
GUICtrlSetState(-1,$GUI_SHOW)
$serverip_label = GUICtrlCreateLabel("Serverip:", 64, 88, 48, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$serverport_label = GUICtrlCreateLabel("Serverport:", 56, 112, 59, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$serverip_input = GUICtrlCreateInput("", 120, 88, 145, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$serverport_input = GUICtrlCreateInput("9987", 120, 112, 57, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$admin_label = GUICtrlCreateLabel("Admin:", 72, 152, 45, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$password_label = GUICtrlCreateLabel("Password:", 64, 176, 54, 18)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$admin_input = GUICtrlCreateInput("", 120, 152, 145, 22)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$password_input = GUICtrlCreateInput("", 120, 176, 145, 22, $ES_PASSWORD)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$connect_button = GUICtrlCreateButton("Connect", 48, 240, 137, 33, $WS_GROUP)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$disconnect_button = GUICtrlCreateButton("Disconnect", 200, 240, 145, 33, $WS_GROUP)
GUICtrlSetFont(-1, 8, 400, 0, "Arial")
$tab1 = GUICtrlCreateTabItem("Users")
$tab2 = GUICtrlCreateTabItem("Files")
$tab3 = GUICtrlCreateTabItem("Server")
$tab4 = GUICtrlCreateTabItem("Infos")
GUICtrlCreateTabItem("")
;GUICtrlCreateLabel("Copyright by Schrubber @2010", 354, 434, 186, 16)
;GUICtrlSetColor(-1, 0xFF0000)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
;Startvariablen
$connected = 0
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $connect_button
if(GUICtrlRead($serverip_input) = "") Then
MSGBOX(262144,"Fehler!", "Sie haben keine Serverip angegeben.")
elseif(GUICtrlRead($serverport_input) = "") Then
MSGBOX(262144,"Fehler!", "Sie haben keinen Serverport angegeben.")
elseif(GUICtrlRead($admin_input) = "") Then
MSGBOX(262144,"Fehler!", "Sie haben keinen Admin angegeben.")
elseif(GUICtrlRead($password_input) = "") Then
MSGBOX(262144,"Fehler!", "Sie haben kein Password angegeben.")
Else
_TS3connect($serverip_input, $serverport_input)
if(@error) Then
MSGBOX(262144, "Fehler!", "Die IP oder der Port ist falsch." & @error)
Else
_TS3login($admin_input, $password_input)
if(@error = 1) Then
MSGBOX(262144, "Fehler!", "Login fehlgeschlagen.")
elseif(@error = 2) Then
MSGBox(262144, "Fehler!", "Ihr Account wurde gesperrt.")
Else
$connected = 1
EndIf
EndIf
EndIf
Case $disconnect_button
$connected = 0
_TS3logout()
_TS3quit()
Case $tab1
if($connected = 0) Then
MSGBOX(000262144, "Fehler!", "Sie sind mit keinem Server verbunden!")
GUICtrlSetState($tab0,$GUI_SHOW)
Else
MSGBOX(1, "Test", "^^")
EndIf
EndSwitch
WEnd
Bin wie immer über jede Hilfe froh
Rubberducky