Hey! Ich habe folgendes Problem: Ich möchte für meinen Laptop, der als Musikbot dient, ein Script machen, das den Channel wechselt.
Also ich bin z.B zurzeit in meinem Channel, und möchte dass mein Laptop dort automatisch reinswitcht.
Denn irgendwie ist es nervig, immer entweder unter meinen Tisch zu "krabbeln" oder Team Viewer zu verwenden.
Ich hoffe mir kann jemand helfen 
was sollen die ganzen sleep befehle?
Das ist nur zur Sicherheit, damit nicht doch die GUI aufgenommen wird.
EDIT:
Falls du die direkt bei den Tooltips meinst... Das sollte nen kleinen Countdown darstellen.
Mir ist klar dass man das auch anders machen kann, aber wegen sowas kleinem ist das auch egal.
Hast du an den Include gedacht?
Klar 
Funktioniert aber eh schon, danke an alle Antworten.
D.h. du musst noch einbauen, das er die Koordinaten gegenrechnet und somit ein vernünftiger Screenshot ensteht.
Hmm.. ich hatte bis jetzt bei den Tests keine Probleme 
Naja, ich werds mal im Hinterkopf behalten, falls doch mal Fehler auftreten würden.
Hey 
Ich traue mich mal über mein erstes richtiges non TCP Projekt.
"SaphireScreen"
Zurzeit ist es relativ primitiv gemacht, doch man kann bis jetzt:
- Den gesamten Bildschirm aufnehmen
- Eine bestimmte Region aufnehmen
- Auswählen ob es als PNG oder als JPEG gespeichert werden soll
Source:
;*****************************************
;CreepyScreen by CreepSore
;*****************************************
#include <ScreenCapture.au3>
#include <WindowsConstants.au3>
#Include <GuiButton.au3>
#include <Array.au3>
#include <GUIConstantsEx.au3>
#include <MsgBoxConstants.au3>
#Region -- GUI --
Global $Menu = GUICreate("CreepyScreen - Menu",447,172,-1,-1,-1)
GUISetBkColor(0x6793E2,$Menu)
Global $Full = GUICtrlCreateButton("Capture Screen",7,3,100,30,-1,-1)
Global $Region = GUICtrlCreateButton("Capture Region",340,3,100,30,-1,-1)
Global $About = GUICtrlCreateButton("?",420,150,20,20,-1,-1)
Global $Exit = GUICtrlCreateButton("Exit",4,152,56,18,-1,-1)
GUICtrlCreateLabel("Ausgabeformat:",10,50,76,15,-1,-1)
GUICtrlSetBkColor(-1,"-2")
GUIStartGroup()
$R1 = GUICtrlCreateRadio("JPEG",10,70,76,20,-1,-1)
$R2 = GUICtrlCreateRadio("PNG",10,90,76,20,-1,-1)
GUISetState( $R1, $GUI_CHECKED )
GUISetState(@SW_SHOW,$Menu)
#EndRegion -- GUI --
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $Full
GUISetState( @SW_HIDE, $Menu )
ToolTip( "5.." )
Sleep( 1000 )
ToolTip( "4.." )
Sleep( 1000 )
ToolTip( "3.." )
Sleep( 1000 )
ToolTip( "2.." )
Sleep( 1000 )
ToolTip( "Get Ready.." )
Sleep( 1000 )
ToolTip( "" )
$Test2 = GUICtrlRead( $R1 )
If $Test2 = "1" Then
_ScreenCapture_Capture( "Screenshot.jpeg" )
Sleep( 5000 )
GUISetState( @SW_SHOW, $Menu )
Else
_ScreenCapture_Capture( "Screenshot.png" )
Sleep( 5000 )
GUISetState( @SW_SHOW, $Menu )
EndIf
Case $Region
ToolTip( "Wähle Punkt 1 mit F1 aus!", 0, 0, "SaphireScreen" )
HotKeySet( "{F1}", _x )
Case $About
$result = MsgBox(64,"SaphireScreen - Hilfe","SaphireScreen ist ein kostenloses Screenshot-Programm in der Alpha Phase." & @CRLF & "" & @CRLF & "Hilfestellung:" & @CRLF & "1) Wähle das gewünschte Format aus (Keine Auswahl führt zu PNG!)" & @CRLF & "2) Wähle deine gewünschte Art." & @CRLF & "2)a) 'Capture Screen'" & @CRLF & "Bei Capture Screen wird der GESAMTE Bildschirm in 5 Sekunden aufgenommen." & @CRLF & "2)b) 'Capture Region'" & @CRLF & "Bei Capture Region wird ein gewählter Bereich aufgenommen." & @CRLF & "" & @CRLF & "" & @CRLF & "Viel Spaß mit diesem Programm wünscht CreepSore" & @CRLF & @CRLF & "(Exit Button nur genutzt, bis Bug endlich gefixt.)",0)
Case $Exit
Exit
EndSwitch
WEnd
Func _x()
Global $aPos = MouseGetPos()
HotKeySet( "{F2}", _y )
ToolTip( "Wähle Punkt 2 mit F2 aus!", 0, 0, "SaphireScreen" )
EndFunc
Func _y()
Global $bPos = MouseGetPos()
ToolTip( "Drücke F3 um einen Screenshot zu machen!", 0, 0, "SaphireScreen" )
HotKeySet( "{F3}", _screen )
EndFunc
Func _screen()
GUISetState( @SW_HIDE, $Menu )
Sleep( 1500 )
ToolTip( "" )
$Test1 = GUICtrlRead( $R1 )
If $Test1 = 1 Then
_ScreenCapture_Capture( "Screenshot.jpeg", $aPos[0], $aPos[1], $bPos[0], $bPos[1])
MsgBox( 0, "SaphireScreen - Captured", "Screenshot wurde aufgenommen!" )
Sleep( 2000 )
GUISetState( @SW_SHOW, $Menu )
Else
_ScreenCapture_Capture( "Screenshot.png", $aPos[0], $aPos[1], $bPos[0], $bPos[1])
MsgBox( 0, "SaphireScreen - Captured", "Screenshot wurde aufgenommen!" )
Sleep( 2000 )
GUISetState( @SW_SHOW, $Menu )
EndIf
EndFunc
Changelog:
SaphireScreen - Changelog
------------------------------------------------------------------
/////////////////////////////////////////
///Datum: 01.02.2015
///Betreff: Blue Alpha 2.0
///Bearbeiter: CreepSore
/////////////////////////////////////////
------------------------------------------------------------------
v 1.0
--> GUI wurde erstellt
--> Fullscreen-Capture Funktion hinzugefügt
--> Bugfixes
v1.5
--> Bugfix der Region Function. (Danke an timee000)
--> "About" Button wurde hinzugefügt
v2.0
--> Neue GUI
--> "About" Button zu "Hilfe" Button geändert!
--> Neue Funktion! Auswahl der Bildart zwischen "JPEG" und "PNG"
------------------------------------------------------------------
Neueste Version:
"Blue Alpha v2.0"
Mit dem nächsten Update, werde ich mehrere einstellungsmöglichkeiten hinzufügen.
Und JA ich weiß, dass es bereits um einiges bessere ScreenshotProgramme gibt.
Aber wie irgendjemand bereits gesagt hat:
"Mit kleinen Schritten zum Erfolg!"
Teilt doch eure Meinung!
Vorerst:
Mir fiel bei dem Titel nichts anderes ein. Ich weiss sehr wohl, wie man bestimmte Bereiche Screenshotted, aber irgendwie kommt bei mir ein Error. Folgender Code:
$x=MouseGetPos()
Sleep(5000)
$y=MouseGetPos()
_ScreenCapture_Capture("Screenshot.png, $x[0], $y[0], $x[1], $y[1])
[/autoit]Es ist nur ein Test für ein kleines Programm, also nicht das Hauptprogramm, aber zum Testen reicht es. Bei dem ersten $x[0] kommt der Fehler. Wahrscheinlich liegt es auch daran. Aber wie ich es Beheben soll ist mir ein Rätsel. :?
Ist mir auch bereits aufgefallen.
Bin ja eigentlich schon n Jahr hier, nur war ich ein ziemlich leiser Beobachter
Verdammt xD Wollte es in die Fragen-Kategorie posten. Vielleicht war es der falsche Tab.
Danke Habs mal ausprobiert, und es funktioniert.
Hey Leute! Und zwar habe ich in meinem Lokalen Netzwerk einen Laptop, auf dem alle meine Server laufen.
Ich habe mir ein kleines Script zurechtgeschrieben, das mir alle 5 Mins eine Nachricht sendet, um zu sehen, welche Prozesse zurzeit laufen (zum Nachsehen, ob der Server noch läuft oder nicht).
Und jetzt zu der Frage:
WELCHE Ip muss ich bei dem Server und bei dem Client eintragen, um eine Verbindung herzustellen?
Hauptcomputer den ich benutze:
192.168.0.4 (statisch)
Laptop:
192.168.0.15 (statisch)
Danke schon mal
Dieses kleine Programm ist so etwas wie ein Antivirus - Nur hald für die Untersuchung der Script Dateien.
Das kleine Programm hab ich gebastelt um die Scripts meines Freundes zu überprüfen die er mir sendet.
So ganz vertraue ich ihm nämlich nicht^^
Aber das tut nichts zur Sache. Ich hänge ne Test.au3 Datei an und das Script selbst damit ihr es selbst austesten könnt.
Code:
NEIN DA ICH ZU DUMM BIN DAS BLÖDE autoit /autoit zu benutzen -.-
Script Download trotzem^^
Ah ja per Ping könnte ichs auch machen. Nur wette ich dass es dann Leute gibt die es als DDos Programm benutzen, dass mein Programm wenigstens Teilweise verhindert. ( Progress Bar )
Voraus gesagt:
Ich bin im Bereich AutoIT neu und dies ist eines meiner bis jetzt erstellten Programme.
Es handelt sich um ein Programm dass einen Website-Status anzeigt.
Bis jetzt funktioniert es nur mit http:// am Anfang. Dies werde ich aber bald Fixen. ( Hab auch schon einen Plan wie )
Die jetzige Version ist die Beta 3.0
Ja eigentlich kann man sowas kleines nicht Beta nennen aber trotztem^^
Hier der Code ( Als Spoiler da bei mir der AutoIT Code irgendwie nicht funktioniert zurzeit 
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=icon.ico
#AutoIt3Wrapper_Res_Description=by CreepSore x3
#AutoIt3Wrapper_Res_Fileversion=2.0.0.0
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Inet.au3>
#include <IE.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Internet Check", 357, 101, 192, 124)
GUISetBkColor(0x00FF00)
$Input1 = GUICtrlCreateInput("https://google.at", 0, 0, 353, 21)
$Button1 = GUICtrlCreateButton("Check", 0, 24, 353, 25)
$Progress1 = GUICtrlCreateProgress(0, 48, 353, 25)
$Label1 = GUICtrlCreateLabel("by CreepSoreLP", 0, 80, 81, 17)
$Radio1 = GUICtrlCreateCheckbox("Website öffnen, falls gefunden", 88, 80, 169, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$Radio = GUICtrlRead ( $Radio1 )
If $Radio = 1 Then
$URL = GUICtrlRead ( $Input1 )
For $i = 0 To 100 Step 5
Sleep ( 100 )
GUICtrlSetData ( $Progress1, $i )
Next
If NOT (_INetGetSource ($URL) = "") Then
MsgBox ( 1, "Bericht", "Die Website ist" & @CRLF & "O" & @CRLF & "N" & @CRLF & "L" & @CRLF & "I" & @CRLF & "N" & @CRLF & "E" & @CRLF & "Website wird aufgerufen..." )
_IECreate ( $URL )
Else
MsgBox ( 1, "Bericht", "Die Website ist offline" )
EndIf
Else
$URL = GUICtrlRead ( $Input1 )
For $i = 0 To 100 Step 5
Sleep ( 100 )
GUICtrlSetData ( $Progress1, $i )
Next
If NOT (_INetGetSource ($URL) = "") Then
MsgBox ( 1, "Bericht", "Die Website ist" & @CRLF & "O" & @CRLF & "N" & @CRLF & "L" & @CRLF & "I" & @CRLF & "N" & @CRLF & "E" )
Else
MsgBox ( 1, "Bericht", "Die Website ist offline" )
EndIf
EndIf
EndSwitch
WEnd
Download ist auch unten angehängt.
