Bei der AntiVir Meldung dürfte das hier Abhilfe schaffen:
http://analysis.avira.com/samples/index.php
Einfach Verdacht auf Fehlalarm auswählen, Formular ausfüllen und die .exe hochladen
Dauert meist nur ein paar Tage Hatte das auch schon 1-2 mal
Bei der AntiVir Meldung dürfte das hier Abhilfe schaffen:
http://analysis.avira.com/samples/index.php
Einfach Verdacht auf Fehlalarm auswählen, Formular ausfüllen und die .exe hochladen
Dauert meist nur ein paar Tage Hatte das auch schon 1-2 mal
Da reicht doch dann eine einfache If Abfrage...
[autoit]GUICreate("", 180, 235, 192, 124)
$List = GUICtrlCreateList("", 16, 16, 153, 201)
GUICtrlSetData(-1, "Item1|Item2|Item3|Item4|Item5|Item6")
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case -3
Exit
Case $List
If GUICtrlRead($List) = "Item1" Then GUISetState(@SW_HIDE, $Form1)
If GUICtrlRead($List) = "Item2" Then GUISetState(@SW_SHOW, $Form2)
EndSwitch
WEnd
GUICreate("", 180, 235, 192, 124)
$List = GUICtrlCreateList("", 16, 16, 153, 201)
GUICtrlSetData(-1, "Item1|Item2|Item3|Item4|Item5|Item6")
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case -3
Exit
Case $List
MsgBox(0,"Eintrag",GUICtrlRead($List))
EndSwitch
WEnd
Also das hättest du doch hinbekommen können oder ?
Im Prinzip ja (habs nicht getestet) bis auf das Case Item1, aber schau dir nochmal mein Script an, das funzt
Dafür gibt es GUICtrlSetLimit($Input, 5)
Ich glaub du solltest dir mal ein Tutorial zu AutoIt anschauen
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 117, 84, 192, 124)
$Button1 = GUICtrlCreateButton("Start", 16, 16, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Global $Paused
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
_funktion1()
EndSwitch
WEnd
Func _funktion1()
GUICtrlSetData($Button1,"Ausgeführt")
HotKeySet("{F10}", "_funktion2")
EndFunc
Func _funktion2()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script ist pausiert',0,0)
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
ToolTip("")
EndFunc
Du musst dann natürlich die Guievents in der Schleife abfragen -> GUIGetMsg <-
Die Schrift kannst du mit GUICtrlSetFont verändern
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 117, 84, 192, 124)
$Button1 = GUICtrlCreateButton("Start", 16, 16, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
Global $Paused
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
_funktion1()
EndSwitch
WEnd
Func _funktion1()
GUICtrlSetData($Button1,"Ausgeführt")
HotKeySet("{F10}", "_funktion2")
EndFunc
Func _funktion2()
$Paused = NOT $Paused
While $Paused
sleep(100)
ToolTip('Script ist pausiert',0,0)
WEnd
ToolTip("")
EndFunc
Stand so in der Hotkey Hilfe
EDIT: Den Comment hab ich rausgenommen, hatte davor die linke Alt Taste drinne (Habe mich dann aber kurzfristig um entschieden)
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 117, 84, 192, 124)
$Button1 = GUICtrlCreateButton("Start", 16, 16, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
_funktion1()
EndSwitch
WEnd
Func _funktion1()
GUICtrlSetData($Button1,"Ausgeführt")
HotKeySet("{F10}", "_funktion2") ;
EndFunc
Func _funktion2()
MsgBox(0,"","bla")
EndFunc
Was meinst du mit Hotkey start und stop?^^
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 117, 84, 192, 124)
$Button1 = GUICtrlCreateButton("Button1", 16, 16, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
_funktion1()
EndSwitch
WEnd
Func _funktion1()
MsgBox(0,"","Hotkey aktiv")
HotKeySet("{F10}", "_funktion2")
EndFunc
Func _funktion2()
MsgBox(0,"","bla")
EndFunc
In der Richtung müsstest du dein Script aufbauen
Du solltest dir auch vielleicht
[autoit]_Crypt_DecryptData
_Crypt_EncryptData
anschauen!
Wie gesagt... Benutzerdaten in Klartext in eine INI zu schreiben ist nicht gerade intelligent ;).
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <String.au3>
Global $name_read = IniRead("raz0r.ini","server","name","error!")
Global $pw_read = IniRead("raz0r.ini","server","pw","error!")
Global $lizenz_read = IniRead("raz0r.ini","server","lizenz","error!")
#Region ### START Koda GUI section ### Form=c:\programme\koda_2008-10-03\forms\dark messiah.kxf
$Form1_1 = GUICreate("Dark Messiah Server Anmeldung", 930, 420, 282, 150)
GUISetBkColor(0x000000)
$name = GUICtrlCreateInput("", 320, 176, 393, 21,$ES_PASSWORD)
$pw = GUICtrlCreateInput("", 320, 200, 393, 21,$ES_PASSWORD)
$login = GUICtrlCreateButton("Login", 536, 248, 177, 33, 0)
$Label1 = GUICtrlCreateLabel("Benutzername:", 200, 176, 113, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x00FF00)
$Label2 = GUICtrlCreateLabel("Passwort:", 240, 200, 73, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x00FF00)
$lizenz = GUICtrlCreateInput("", 320, 224, 393, 21,$ES_PASSWORD)
$Label3 = GUICtrlCreateLabel("Sicherheitsschlüssel:", 160, 224, 152, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
GUICtrlSetColor(-1, 0x00FF00)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $login
If $name_read = GUICtrlRead($name) And $pw_read == GUICtrlRead($pw) And $lizenz = GUICtrlRead($lizenz_read) Then;Passwort wird Casesensitive gehandelt
MsgBox(0,"","was auch immer")
Else
MsgBox(0,"","Eingabe falsch")
EndIf
EndSwitch
WEnd
Sowas ???
Das gehört doch nun wirklich zu den Grundlagen, bei der anzahl an Posts sollte man sowas schon beherrschen
Du brauchst den Thread nicht alle 3 Minuten zu pushen....
Ich versteh nicht wirklich was du möchtest.
Könntest du eventuell deine Zeichenfolge im ersten Post in eine korrekte und sinnvolle Reihenfolge bringen?
Bzw. willst du ein Login Programm machen, in dem du deine Benutzerdaten in einer INI speicherst? (wäre mit viel zu unsicher, besonders unverschlüsselt...^^)
naja mit cmd /c notepad.exe | notepad.exe würde es schon gehen, der Nachteil dabei ist, da bleibt so eine nervige Schwarze Box offen
sonst gibt es ja noch die möglichkeit die Bulli genannt hat und verweist deine Verknüpfung auf das Script. Das Icon kann man ja dann wieder vom eigenen Programm nehmen o.ä.
Script funktioniert einwandfrei und Hardware schläft bei Benutzung
Btw: @ DjBlume: ich glaube kaum das dein Prozessor 8 Kerne hat ^^. Hast du eventuell Hyper-Threading aktiviert ?
GUICreate("", 180, 235, 192, 124)
$List = GUICtrlCreateList("", 16, 16, 153, 201)
GUICtrlSetData(-1, "Item1|Item2|Item3|Item4|Item5|Item6")
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case -3
Exit
Case $List
TrayTip("Eintrag",GUICtrlRead($List),5,1)
EndSwitch
WEnd
Sowas in der Art??
Du könntest dir auch mal AutoIt Tutorials vornehmen und es selber machen.
Oder du bietest etwas für die Leistung in der Jobbörse
Es heißt hier Hilfe und Unterstützung nicht Wünsch dir was
Du kannst doch die bereits in der Ini vorhandenen in der Combo auswählen...
Du wählst den link aus ... liest den Wert mit Guictrlread aus und löscht ihn mit Inidelete.. ich sehe da kein Problem?
Ansonsten schau dir mal das Tutorial im Wiki an
IniDelete ; löscht den Inieintrag
GUICtrlCreateButton ;Damit kannst du den Button erstellen
GUICtrlRead ; damit kannst du den ausgewählten Link auslesen
Damit solltest du es hinbekommen
Ich gehe mal davon aus das bei 220 Rechnern eine Domäne vorhanden ist
Warum regelst du das denn nicht einfach so:
[Blockierte Grafik: http://public.bay.livefilestore.com/y1pnv6C9S64nh8ZiRxspj81F3907m3uZeIfAvhRfIXSOBRMIRW_zq5VTs_3JyvHkMbCDR5diUkhTJOjDFf7rF8qAw/GPODelete.png]
Man muss doch nicht das Rad neu erfinden
Falls du doch keine Domäne hast und du immer mit nem USB-Stick rumrennst oder die Datei sich an unterschiedlichen Orten befindet:
$aFiles = _RecursiveFileListToArray(@UserProfileDir, "Dateiname",1)
[/autoit] [autoit][/autoit] [autoit]For $i = 1 To $aFiles[0]
FileDelete($aFiles[$i])
Next
Func _RecursiveFileListToArray($sPath, $sPattern, $iFlag = 0, $iFormat = 1, $sDelim = @CRLF)
Local $hSearch, $sFile, $sReturn = ''
If StringRight($sPath, 1) <> '\' Then $sPath &= '\'
$hSearch = FileFindFirstFile($sPath & '*.*')
If @error Or $hSearch = -1 Then Return SetError(0, 0, $sReturn)
While True
$sFile = FileFindNextFile($hSearch)
If @error Then ExitLoop
If StringInStr(FileGetAttrib($sPath & $sFile), 'D') Then
If StringRegExp($sPath & $sFile, $sPattern) And ($iFlag = 0 Or $iFlag = 2) Then $sReturn &= $sPath & $sFile & '\' & $sDelim
$sReturn &= _RecursiveFileListToArray($sPath & $sFile & '\', $sPattern, $iFlag, 0)
ContinueLoop
EndIf
If StringRegExp($sFile, $sPattern) And ($iFlag = 0 Or $iFlag = 1) Then $sReturn &= $sPath & $sFile & $sDelim
WEnd
FileClose($hSearch)
If $iFormat Then Return StringSplit(StringTrimRight($sReturn, StringLen($sDelim)), $sDelim, $iFormat)
Return $sReturn
EndFunc
Also mit @OSArch wollte ich dir sagen, das X64 zurückgegeben wird (dachte deine Variable liest daraus den Wert)
Aber wenns dir wirklich um das Wartungscenter und die Anpassung geht, warum machst du nicht einfach
[autoit]ShellExecute("wscui.cpl")
ShellExecute("rundll32.exe","shell32.dll,Control_RunDLL desk.cpl,,2")
?
Unter http://www.osattack.com/windows-7/huge…shell-commands/ findest du übrigens ne gute Übersicht darüber