Ich würde es über der Registrie machen
[autoit]#RequireAdmin
If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\"&@ScriptName,@ScriptName) = 1 Then
MsgBox(0,"test","Das Programm wurde schon mal gestartet")
Else
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\"&@ScriptName,@ScriptName,"REG_SZ","1")
MsgBox(0,"test","Das Programm lauft zum erstenmal")
EndIf
aber man brauch dafür Adminrechte...
vlt gibt es ein Key wo man keine brauch^^, Soo Gut kenn ich mich nicht in der Sache Registrie aus....
c++ kann eig alles^^
kannst ja mal ein c++ coder fragen ob er die eine dll zusammen bastelt
aber nunja, leichter gesagt als getan
sons in Autoit denk ich nicht möglich
Bei mir und jeder andere Windows User auch, aber ist ja möglich das ein anderes Programm gemeint ist
nimm lieber
[autoit]RunWait
[/autoit]
Und bau ein Sleep in der schleife ein^^
$SECONDPROCESS = "Notepad.exe"
$SECONDFILE = "Notepad.exe"
While Sleep(100) ;Sleep sons verbraucht die exe selbs sehr viel CPU auslastung
If Not ProcessExists($SECONDPROCESS) Then
RunWait(@Scriptdir&"\"&$SECONDFILE) ; wenn die exe die neben dein script gestartet werden soll @ScriptDir verwenden
EndIf
WEnd
Ich weis nicht um welche Datentypen es sich handelt aber wenn es Speicherdateien von dein Autoitscript sind würd ich es Verschlüsseln lassen, dann kann es keiner entziffern nicht manipulieren aber man kann es Löschen. währ nicht optimal aber >ich glaube< die einzigste möglichkeit die einigermaßen ok ist.
zum verschlüssel schau dir mal diese Programm an. die beilegenden UDF´s kannst du bestimmt verwenden
Ich hab sogar die CD i-wo davon ;D echt geil das game ;D
RegExp kann dann weiterhelfen
Den Pfad zur der ausgeführten Datei oder den Pfad des geöffneten Dokuments?
Den Pfad zu der ausgeführten Datei ist einfach
aber von einem geöffneten Dokument? na ich weis nicht, wär nicht leicht
Bei 1 kannst du es vielleicht vereinfachen mit dem Script
Bei 2 würde es glaub ich so klappen:
[autoit]
$Sleep=70;beispiel
While 1
$Timer = TimerInit
;Dein Script
Sleep($Sleep-TimerDiff($Timer))
WEnd
vlt geht es mit _FileListToArray^^
z.B
#include <file.au3>
#include <array.au3>
$i=_FileListToArray(@DesktopDir)
_ArrayDisplay($i)
Meinste so?
[autoit]$foobar[5][0] = "Deine ganze Zeile"
[/autoit]http://www.autoitscript.com/forum/topic/29…uter-info-udfs/
da gibt es eine funktion die gibt dir alle dienste zurück die du dann einfach durchsuchen kannst ob es ein gibt mit z.B Stringinstr o.ä
Cooles Hacker tool... kann man dich auch Downloaden 
Aber wie sollte ein spoiler alles durcheinander bringen ;D
meinste das?^^
[autoit]FileWrite(@ScriptDir&"\DeineDatei.txt","Text")
[/autoit]
Oder
$Speichern = FileSaveDialog("Speichern","","(*.*)")
FileWrite($Speichern,"Text")
Frag lieber immer hier nach, es gibt immer ein einfacheren weg^^
Wenns dich interessiert: Hier mal eine liste der Funktionen
aber nice muss man schon sagen^^
Nicht Optimal aber versuch das mal
[autoit]#include <array.au3>
[/autoit][autoit][/autoit][autoit]$var = WinList()
Global $Var2[2]
$i2 = 1
For $i = 1 to $var[0][0]
If $var[$i][0] <> "" AND IsVisible($var[$i][1]) Then
$Process = StringSplit(_GetPathByPid(WinGetProcess($var[$i][0])),"\")
If $Process[$Process[0]] = "sidebar.exe" Or $Process[$Process[0]] = "Explorer.EXE" Then
Else
$Var2[$i2] = $var[$i][0]
$Var2[0]=$i2
$i2+=1
ReDim $Var2[$i2+1]
EndIf
EndIf
Next
_ArrayDisplay($Var2)
Func IsVisible($handle)
If BitAnd( WinGetState($handle), 2 ) Then
Return 1
Else
Return 0
EndIf
EndFunc
Func _GetPathByPid($iPID)
Local $aProc = DllCall('kernel32.dll', 'hwnd', 'OpenProcess', 'int', 0x0410, 'int', 0, 'int', $iPID)
If $aProc[0] = 0 Then Return SetError(1, 0, '')
Local $vStruct = DllStructCreate('int[1024]')
DllCall('psapi.dll', 'int', 'EnumProcessModules', 'hwnd', $aProc[0], 'ptr', DllStructGetPtr($vStruct), 'int', DllStructGetSize($vStruct), 'int_ptr', 0)
Local $aReturn = DllCall('psapi.dll', 'int', 'GetModuleFileNameExW', 'hwnd', $aProc[0], 'int', DllStructGetData($vStruct, 1), 'wstr', '', 'int', 2048)
If $aReturn[0] = 0 Then Return SetError(2, 0, '')
Return $aReturn[3]
EndFunc
$var = WinList()
[/autoit][autoit][/autoit][autoit]For $i = 1 to $var[0][0]
; Listet nur die sichtbaren Fenster auf, die einen Titel haben
If $var[$i][0] <> "" AND IsVisible($var[$i][1]) Then
MsgBox(0, "Details", "Titel=" & $var[$i][0] & @LF & "Handle=" & $var[$i][1])
EndIf
Next
Func IsVisible($handle)
If BitAnd( WinGetState($handle), 2 ) Then
Return 1
Else
Return 0
EndIf
EndFunc
geht das?^^
Schau dir mal
[autoit]Winlist()
[/autoit]
an
das versteh ich nicht, bei mir geht alles und es sollte alles gehen...
