Beiträge von baerchen

Im sinne Agiert mein Script aber so:

Func _Set()
$data = "Newwindow"
$set = guictrlsetdata
$set($termin,$data)
_File()
Endfunc
Func _File()
$read = guictrlread($termin)
if $read = "Newwindow" then
    #include <newwindow.au3>
elseif $read = "Other" then
    #include <other.au3>
endif
Endfunc

Damit verhindere ich das die variablen gleich bleiben die dann in der ausgelagerte datei steht.
Fertig, es Funktioniert wie es Funktionieren muss.

Relativ es Funktioniert da ich wie folgt das Script habe:

Func _Set()
$data = "Newwindow"
$set = guictrlsetdata


$set($termin,$data)


_File()
Endfunc


Func _File()
$read = guictrlread($termin)
if $read = "Newwindow" then
    #include <newwindow.au3>
endif
Endfunc

Reicht ja auch =)

Ich habe es jetzt anderes gemacht

Func 1Func()
  2Func()
Endfunc


Func 2Func()
#include <test.au3>
Endfunc


Die zwei Func's in einer geschrieben =)

Es erscheint der selbe fehler^^, wobei das sind die test scripte schon xD

Ja ich spreche English,

Im ganzen gesagt , ich
Verwende eine Func in der noch eine Func agieren soll.

Zeige einen Bsp.

_Func()


Func _Func()
#include <test.au3>
_2func()
Endfunc

Aus der zweiten datei.

Func 2func()


msg(0,"oke","oke")
Endfunc

So im Kurzen Kann ggf. einen Test Script anfügen. Was ich gleich machen werde.

Hey Ho!

Ich habe ein Problem mit meiner Funktion die ausgelagert ist.

Func _Newterminal()


$read3 = GUICtrlRead($Termin_funcnew)
$set = GUICtrlSetData
$pc3 = @ComputerName & " ~> "


$v = "1.0.0000"


Switch $read3


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; TEST ;;;;;;;;;;;;;;;;;;;;;;;;;;


   case "v"
	  $text = $pc3 & $v
	  $set($Terminnew,$text)
	  _del()


   case Else
	  $txt = $pc3 & " Command not Found please use the command 'help'"
	  $set($terminnew,$txt)
	  _del()


EndSwitch


EndFunc

Die Konsole sagt mir : ==> "Func" statement has no matching "EndFunc".:

Wo ist hier das Problem?

Lol...

Zitat von alpines

Das ist an Sicherheit ja nicht mehr zu überbieten. Wenn da einer nach den Passwörtern sucht wird er sie nie finden!

Ach komm schon lass mich mein Spaß haben

javascripte werden durch aus auch in Browsen sowie , Client`s o.a eingesetzt
Gutes Beispiel : Knuddel *> Appbots.
Sie werden mit javascripte programmiert.

Javascript kann man sowohl im Browser anwenden sowie in Spiele wie "Minecraft" oder Anwendungen für Smartphones / Handy´s < die kein Android oder IOs sind.

@YareoxXO? Nein *.js ist Javascript Java ansicht ist eine software wenn ich mich nicht täusche ?

@Alina , Aber nur wer dich kennt ;).
Ja um Java (*.js) zu lernen , benötigt man wirklich sehr viel zeit da Javascripte was ganz
anderes wieder sind.
Aber wenn man schon dabei sind, das Java ach so scheiße ist, @Andy,
Wieso benutzt du dann ein Smartphone? Müsstest sicherlich wissen, das Anwendungen ohne Java nicht laufen würde oder generell :D.

Wieso einfach nicht Java lernen
Da sich die APK Teils auf Java basieren :D.

Und Android ist Linux sprich Basiert auf einem Linux kern. Generell würde aber kein Betriebsystem darauf laufen.

Durch aus, kann man mit hilfe von HTML Scripte und ein Paar server rechte
ein Temspeak 3.au3 entwickeln, was einen ermöglicht, Channels erstellen, löschen, Server gruppen e.t.c
aber ich wette, es gibt schon so ein Script

xD

Wozu gibt es eine Hilfe datei :D?

Geht auch Einfacher :

$server = "5.175.172.50"
$port = ""

if ping($server,250) Then
if not $port = "" Then
ShellExecute("ts3server://" & $server & ":"& $port)
Else
ShellExecute("ts3server://" & $server)

EndIf
Else
ConsoleWrite("OFFLINE" & @CRLF)
EndIf

Für Fragen was Ts3 betrifft bzgl, Codes > In channel joinen wo passwort drine ist
Connect in denn channel
oder wo man mit einem User namen joint meinet wegen
$user = " Bla Bla"

Oke hat funktioniert. weiteres Problem wie bei while

der Button ( Exit ) lässt sich nicht mehr betätigen Func blocked

ich habe es mir einer F8 (hotkeyset) gelöst, gibt es dennoch eine andere lösung?

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>


Opt("TrayIconHide", 1)


$1 = 1
$2 = 2


HotKeySet("{F8}", "close")


#Region ### START Koda GUI section ### Form=
$Check = GUICreate("Testing", 321, 132, -1, -1, $WS_EX_TOOLWINDOW)
GUICtrlCreateLabel("C:", 8, 8, 294, 17)
$1 = GUICtrlCreateLabel("Status: ", 8, 40, 293, 17)
$2 = GUICtrlCreateLabel("Size: ", 8, 72, 310, 17)
GUISetState(@SW_SHOW)


AdlibRegister("check")
#EndRegion ### END Koda GUI section ###


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			close()


	EndSwitch
WEnd


Func check()
	Local $i = 0
	While $i <= 1
		$state = DriveStatus("E:")
		$a = DriveSpaceFree("E:")
		$b = DriveSpaceTotal("E:")
		$size = $a & "/" & $b & " mb "
		GUICtrlSetData($2, "Size: " & $size)
		GUICtrlSetData($1, "Status: " & $state)
		Sleep(1000)
	WEnd
EndFunc   ;==>check


Func close()
	Exit
EndFunc   ;==>close

Edit:
Hab schon, Danke

bernd670 : schon wieder ein Doppelpost!

Hallo,

ich habe mal eine frage, gibt es eine möglichkeit,
eine Funktionen zu wiederhohlen / ohne While + sleep ?

$state = DriveStatus("C:")
$a = DriveSpaceFree("C:")
$b = DriveSpaceTotal("C:")
$size = $a & "/" & $b & " mb "


#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>


#Region ### START Koda GUI section ### Form=
$Check = GUICreate("Testing", 321, 108, -1, -1)
GUICtrlCreateLabel("C:", 8, 8, 294, 17)
GUICtrlCreateLabel("Status: " & $state, 8, 40, 293, 17)
GUICtrlCreateLabel("Size: " & $size, 8, 72, 310, 17)
GUISetState(@SW_SHOW)


#EndRegion ### END Koda GUI section ###


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit


	EndSwitch
WEnd

möchte nähmlich das er diese abfragen wiederhohlt .. habe zwar noch ein script mit while und sleeps aber das ist zu beschissen.

MfG

Mit While :

#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>


$1 = 1
$2 = 2


#Region ### START Koda GUI section ### Form=
$Check = GUICreate("Testing", 321, 108, -1, -1)
GUICtrlCreateLabel("C:", 8, 8, 294, 17)
$1 = GUICtrlCreateLabel("Status: ", 8, 40, 293, 17)
$2 = GUICtrlCreateLabel("Size: ", 8, 72, 310, 17)
GUISetState(@SW_SHOW)


check()
#EndRegion ### END Koda GUI section ###


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit


	EndSwitch
WEnd


Func check()
	Local $i = 0
	While $i <= 1
		$state = DriveStatus("C:")
		$a = DriveSpaceFree("C:")
		$b = DriveSpaceTotal("C:")
		$size = $a & "/" & $b & " mb "
		GUICtrlSetData($2, "Size: " & $size)
		GUICtrlSetData($1, "Status: " & $state)
		Sleep(1000)
	WEnd
EndFunc   ;==>check

bernd670 : Bitte Doppelposts vermeiden!

Richtig.

Danke dir