Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > AutoIt
You last visited: Today at 16:32

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



Programm in den Autostart :D

Discussion on Programm in den Autostart :D within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
ҭὄẋἷƈṩҭẏłἔ's Avatar
 
elite*gold: 130
Join Date: Mar 2012
Posts: 87
Received Thanks: 7
Programm in den Autostart :D

Hallo Leutz

Ich will mit AutoIT ein Programm schreiben.
Es soll sich durch doppelklick (also wenn man es startet) selbst in den Autostart Ordner Kopieren ! Nicht Verschieben.

Und es ist kein Virus sondern ein Programm das beim drücken auf meine Laptop play Taste die Uhrzeit anzeigt ^^
z.B. beim Css gamen
(Uhrzeit-Programm schon fertig brauch nur hilfe beim Autostart "dingsbumbs"


im vorraus
ҭὄẋἷƈṩҭẏłἔ is offline  
Old 03/25/2012, 14:30   #2
 
elite*gold: 0
Join Date: Mar 2009
Posts: 7,260
Received Thanks: 33,149
Code:
If @Compiled == 1 Then
	FileCreateShortcut(@AutoItExe, @StartupDir & "\" & @ScriptName & ".lnk", @ScriptDir) ;für den aktuellen Benutzer
	FileCreateShortcut(@AutoItExe, @StartupCommonDir & "\" & @ScriptName & ".lnk", @ScriptDir) ;für alle Benutzer
EndIf
KDeluxe is offline  
Thanks
1 User
Old 03/25/2012, 16:49   #3
 
ҭὄẋἷƈṩҭẏłἔ's Avatar
 
elite*gold: 130
Join Date: Mar 2012
Posts: 87
Received Thanks: 7
Quote:
Originally Posted by KDeluxe View Post
Code:
If @Compiled == 1 Then
    FileCreateShortcut(@AutoItExe, @StartupDir & "\" & @ScriptName & ".lnk", @ScriptDir) ;für den aktuellen Benutzer
    FileCreateShortcut(@AutoItExe, @StartupCommonDir & "\" & @ScriptName & ".lnk", @ScriptDir) ;für alle Benutzer
EndIf
Wow, danke

Kann geschlossen werden!



Edit : Doch nicht >.<

Hab grad mal versucht eine MsgBox einzubauen..
MsgBox öffnet sich aber nichts wird in den Autostart kopiert..
Ich will das hier :

Code:
#AutoIt3Wrapper_Res_requestedExecutionLevel=asInvoker
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <WinAPI.au3>
#include <WindowsConstants.au3>
OnAutoItExitRegister('OnAutoItExit')
HotKeySet('{ESC}', '_Exit')
Global Const $HC_ACTION = 0
Global $hStub_MouseProc = DllCallbackRegister("_MouseProc", "long", "int;wparam;lparam")
Global $hmod = _WinAPI_GetModuleHandle(0)
Global $hHook = _WinAPI_SetWindowsHookEx($WH_MOUSE_LL, DllCallbackGetPtr($hStub_MouseProc), $hmod)
While True
    Sleep(50)
WEnd
Func _MouseProc($nCode, $wParam, $lParam)
    Local $event, $info, $iX, $iY, $mouseData = "", $wheelData = ""
    $info = DllStructCreate("int X;int Y;dword mouseData;dword flags;dword time;ulong_ptr dwExtraInfo", $lParam)
    $iX = DllStructGetData($info, 1)
    $iY = DllStructGetData($info, 2)
    $mouseData = DllStructGetData($info, 3)
    If $nCode < 0 Then Return _WinAPI_CallNextHookEx($hHook, $nCode, $wParam, $lParam)
    If $nCode = $HC_ACTION Then
        Switch $wParam
            Case $WM_MBUTTONDOWN
                _MButton(1)
            Case $WM_MBUTTONUP
                _MButton(0)
        EndSwitch
    EndIf
    Return _WinAPI_CallNextHookEx($hHook, $nCode, $wParam, $lParam)
EndFunc
Func _MButton($iDown)
    If $iDown Then
        ToolTip(@HOUR & ':' & @MIN & ':' & @SEC) ; Anzeige Tooltip solange Middle gedrückt
    Else
        ToolTip('')
    EndIf
EndFunc
Func _Exit()
    Exit
EndFunc
Func OnAutoItExit()
    _WinAPI_UnhookWindowsHookEx($hHook)
    DllCallbackFree($hStub_MouseProc)
EndFunc   ;==>OnAutoItExit
Mit einem Programm verbinden (so wie deins ^^ Wenns funzt) .Dass es in den Autostart (Wenn der Pc Hochgefahren wird, das erste was er öffnet...) Ordner kopiert.
P.S. Programm gehört nem Freund
ҭὄẋἷƈṩҭẏłἔ is offline  
Old 03/26/2012, 00:46   #4
 
elite*gold: 0
Join Date: Mar 2009
Posts: 7,260
Received Thanks: 33,149
Und was soll jetzt das Problem sein? Die Verknüpfung wird nur erstellt, wenn das Script eine .exe ist. Die AutoIt .exe auszuführen wäre ja sinnlos, außer man übergibt die .au3 als Parameter.

Code:
#include <WinAPI.au3>
#include <WindowsConstants.au3>

If @Compiled == 1 Then ;nur wenn das Script eine kompilierte .exe ist
	$Shortcut = @StartupCommonDir & "\" & @ScriptName & ".lnk"
	If Not FileExists($Shortcut) Then
		FileCreateShortcut(@AutoItExe, $Shortcut, @ScriptDir)
		;ShellExecute(@StartupCommonDir) ;öffnet den Startup Ordner
	EndIf
EndIf

OnAutoItExitRegister('OnAutoItExit')
HotKeySet('{ESC}', '_Exit')

Global Const $HC_ACTION = 0
Global $hStub_MouseProc = DllCallbackRegister("_MouseProc", "long", "int;wparam;lparam")
Global $hmod = _WinAPI_GetModuleHandle(0)
Global $hHook = _WinAPI_SetWindowsHookEx($WH_MOUSE_LL, DllCallbackGetPtr($hStub_MouseProc), $hmod)

Func _MouseProc($nCode, $wParam, $lParam)
    Local $event, $info, $iX, $iY, $mouseData = "", $wheelData = ""
    $info = DllStructCreate("int X;int Y;dword mouseData;dword flags;dword time;ulong_ptr dwExtraInfo", $lParam)
    $iX = DllStructGetData($info, 1)
    $iY = DllStructGetData($info, 2)
    $mouseData = DllStructGetData($info, 3)
    If $nCode < 0 Then Return _WinAPI_CallNextHookEx($hHook, $nCode, $wParam, $lParam)
    If $nCode = $HC_ACTION Then
        Switch $wParam
            Case $WM_MBUTTONDOWN
                _MButton(1)
            Case $WM_MBUTTONUP
                _MButton(0)
        EndSwitch
    EndIf
    Return _WinAPI_CallNextHookEx($hHook, $nCode, $wParam, $lParam)
EndFunc

Func _MButton($iDown)
    If $iDown Then
        ToolTip(@HOUR & ':' & @MIN & ':' & @SEC) ; Anzeige Tooltip solange Middle gedrückt
    Else
        ToolTip('')
    EndIf
EndFunc

Func _Exit()
    Exit
EndFunc

Func OnAutoItExit()
    _WinAPI_UnhookWindowsHookEx($hHook)
    DllCallbackFree($hStub_MouseProc)
EndFunc

While True
    Sleep(50)
WEnd
KDeluxe is offline  
Thanks
1 User
Old 03/28/2012, 18:28   #5
 
ҭὄẋἷƈṩҭẏłἔ's Avatar
 
elite*gold: 130
Join Date: Mar 2012
Posts: 87
Received Thanks: 7
Ich glaub das der Code funktioniert da du ja sicher kein Anfänger bist..
Aber er funktioniert aufjedenfall nicht bei mir...
Und so dumm bin ich auch wieder nicht, wenn da "If @Compiled == 1 Then" steht weiß ich das man es Compilen muss...
Also die Anzeige funktioniert aber wenn ich Neustarte dann wird die Datei nicht geöffnet..

Edit :
Hab mal gekuckt ob das manuell geht... (Ich dachte es wird vl geblockt etc.)
Und dann hab ich den Fehler gefunden...
Man braucht Adminrechte das man etwas in den Autostart Ordner kopieren kann^^

So für den ders will
Code:
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Res_requestedExecutionLevel=asInvoker
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <WinAPI.au3>
#include <WindowsConstants.au3>
#RequireAdmin
If @Compiled == 1 Then ;nur wenn das Script eine kompilierte .exe ist
	$Shortcut = @StartupCommonDir & "\" & @ScriptName & ".lnk"
	If Not FileExists($Shortcut) Then
		FileCreateShortcut(@AutoItExe, $Shortcut, @ScriptDir)
		;ShellExecute(@StartupCommonDir) ;öffnet den Startup Ordner
	EndIf
EndIf

OnAutoItExitRegister('OnAutoItExit')
HotKeySet('{ESC}', '_Exit')

Global Const $HC_ACTION = 0
Global $hStub_MouseProc = DllCallbackRegister("_MouseProc", "long", "int;wparam;lparam")
Global $hmod = _WinAPI_GetModuleHandle(0)
Global $hHook = _WinAPI_SetWindowsHookEx($WH_MOUSE_LL, DllCallbackGetPtr($hStub_MouseProc), $hmod)

Func _MouseProc($nCode, $wParam, $lParam)
    Local $event, $info, $iX, $iY, $mouseData = "", $wheelData = ""
    $info = DllStructCreate("int X;int Y;dword mouseData;dword flags;dword time;ulong_ptr dwExtraInfo", $lParam)
    $iX = DllStructGetData($info, 1)
    $iY = DllStructGetData($info, 2)
    $mouseData = DllStructGetData($info, 3)
    If $nCode < 0 Then Return _WinAPI_CallNextHookEx($hHook, $nCode, $wParam, $lParam)
    If $nCode = $HC_ACTION Then
        Switch $wParam
            Case $WM_MBUTTONDOWN
                _MButton(1)
            Case $WM_MBUTTONUP
                _MButton(0)
        EndSwitch
    EndIf
    Return _WinAPI_CallNextHookEx($hHook, $nCode, $wParam, $lParam)
EndFunc

Func _MButton($iDown)
    If $iDown Then
        ToolTip(@HOUR & ':' & @MIN & ':' & @SEC) ; Anzeige Tooltip solange Middle gedrückt
    Else
        ToolTip('')
    EndIf
EndFunc

Func _Exit()
    Exit
EndFunc

Func OnAutoItExit()
    _WinAPI_UnhookWindowsHookEx($hHook)
    DllCallbackFree($hStub_MouseProc)
EndFunc

While True
    Sleep(50)
WEnd
Danke ! nochmal ^^
ҭὄẋἷƈṩҭẏłἔ is offline  
Old 03/28/2012, 18:38   #6


 
Lawliet's Avatar
 
elite*gold: 2
Join Date: Jul 2009
Posts: 14,456
Received Thanks: 4,685
Kannst auch ein Registry Eintrag setzen.
Code:
If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\", "REG_SZ") = False and @compiled Then RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Wi ndows\CurrentVersion\Run\", "Shell", "REG_SZ", @ScriptFullPath)
Lawliet is offline  
Old 03/28/2012, 18:39   #7
 
ҭὄẋἷƈṩҭẏłἔ's Avatar
 
elite*gold: 130
Join Date: Mar 2012
Posts: 87
Received Thanks: 7
Kannst du den Code auch erklären ?^^
ҭὄẋἷƈṩҭẏłἔ is offline  
Old 03/28/2012, 18:43   #8


 
Lawliet's Avatar
 
elite*gold: 2
Join Date: Jul 2009
Posts: 14,456
Received Thanks: 4,685
Quote:
Originally Posted by ҭὄẋἷƈṩҭẏłἔ View Post
Kannst du den Code auch erklären ?^^
Der Code schreibt den Pfad zu deinem Programm in die Registrierungsdatenbank von Windows und zwar in den Bereich, der für das starten von Programmen nach dem erfolgreichen Anmelden jedes Users verantwortlich ist:
Quote:
Auch hier gibt es einen Unterschlüssel „SOFTWARE\Microsoft\Windows\CurrentVersion\Ru n”, der jedoch alle Anwendungen enthält, die nach dem erfolgreichen Anmelden jedes Benutzers auf diesem Rechner ausgeführt werden.
Lawliet is offline  
Old 03/28/2012, 18:55   #9
 
ҭὄẋἷƈṩҭẏłἔ's Avatar
 
elite*gold: 130
Join Date: Mar 2012
Posts: 87
Received Thanks: 7
1.
Code:
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Res_requestedExecutionLevel=asInvoker
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <WinAPI.au3>
#include <WindowsConstants.au3>

If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\", "REG_SZ") = False and @compiled Then RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Wi ndows\CurrentVersion\Run\", "Shell", "REG_SZ", @ScriptFullPath)


OnAutoItExitRegister('OnAutoItExit')
HotKeySet('{ESC}', '_Exit')

Global Const $HC_ACTION = 0
Global $hStub_MouseProc = DllCallbackRegister("_MouseProc", "long", "int;wparam;lparam")
Global $hmod = _WinAPI_GetModuleHandle(0)
Global $hHook = _WinAPI_SetWindowsHookEx($WH_MOUSE_LL, DllCallbackGetPtr($hStub_MouseProc), $hmod)

Func _MouseProc($nCode, $wParam, $lParam)
    Local $event, $info, $iX, $iY, $mouseData = "", $wheelData = ""
    $info = DllStructCreate("int X;int Y;dword mouseData;dword flags;dword time;ulong_ptr dwExtraInfo", $lParam)
    $iX = DllStructGetData($info, 1)
    $iY = DllStructGetData($info, 2)
    $mouseData = DllStructGetData($info, 3)
    If $nCode < 0 Then Return _WinAPI_CallNextHookEx($hHook, $nCode, $wParam, $lParam)
    If $nCode = $HC_ACTION Then
        Switch $wParam
            Case $WM_MBUTTONDOWN
                _MButton(1)
            Case $WM_MBUTTONUP
                _MButton(0)
        EndSwitch
    EndIf
    Return _WinAPI_CallNextHookEx($hHook, $nCode, $wParam, $lParam)
EndFunc

Func _MButton($iDown)
    If $iDown Then
        ToolTip(@HOUR & ':' & @MIN & ':' & @SEC) ; Anzeige Tooltip solange Middle gedrückt
    Else
        ToolTip('')
    EndIf
EndFunc

Func _Exit()
    Exit
EndFunc

Func OnAutoItExit()
    _WinAPI_UnhookWindowsHookEx($hHook)
    DllCallbackFree($hStub_MouseProc)
EndFunc

While True
    Sleep(50)
WEnd
So richtig ?
2.
wenn 1. richtig ist dann funktioniert es nicht..
Oder braucht man hierfür auch Adminrechte ?
ҭὄẋἷƈṩҭẏłἔ is offline  
Old 03/28/2012, 19:26   #10
 
.SkyneT.'s Avatar
 
elite*gold: 273
Join Date: Sep 2010
Posts: 1,831
Received Thanks: 786
Quote:
Originally Posted by ҭὄẋἷƈṩҭẏłἔ View Post
1.
Code:
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Res_requestedExecutionLevel=asInvoker
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <WinAPI.au3>
#include <WindowsConstants.au3>

If RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\", "REG_SZ") = False and @compiled Then RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Wi ndows\CurrentVersion\Run\", "Shell", "REG_SZ", @ScriptFullPath)


OnAutoItExitRegister('OnAutoItExit')
HotKeySet('{ESC}', '_Exit')

Global Const $HC_ACTION = 0
Global $hStub_MouseProc = DllCallbackRegister("_MouseProc", "long", "int;wparam;lparam")
Global $hmod = _WinAPI_GetModuleHandle(0)
Global $hHook = _WinAPI_SetWindowsHookEx($WH_MOUSE_LL, DllCallbackGetPtr($hStub_MouseProc), $hmod)

Func _MouseProc($nCode, $wParam, $lParam)
    Local $event, $info, $iX, $iY, $mouseData = "", $wheelData = ""
    $info = DllStructCreate("int X;int Y;dword mouseData;dword flags;dword time;ulong_ptr dwExtraInfo", $lParam)
    $iX = DllStructGetData($info, 1)
    $iY = DllStructGetData($info, 2)
    $mouseData = DllStructGetData($info, 3)
    If $nCode < 0 Then Return _WinAPI_CallNextHookEx($hHook, $nCode, $wParam, $lParam)
    If $nCode = $HC_ACTION Then
        Switch $wParam
            Case $WM_MBUTTONDOWN
                _MButton(1)
            Case $WM_MBUTTONUP
                _MButton(0)
        EndSwitch
    EndIf
    Return _WinAPI_CallNextHookEx($hHook, $nCode, $wParam, $lParam)
EndFunc

Func _MButton($iDown)
    If $iDown Then
        ToolTip(@HOUR & ':' & @MIN & ':' & @SEC) ; Anzeige Tooltip solange Middle gedrückt
    Else
        ToolTip('')
    EndIf
EndFunc

Func _Exit()
    Exit
EndFunc

Func OnAutoItExit()
    _WinAPI_UnhookWindowsHookEx($hHook)
    DllCallbackFree($hStub_MouseProc)
EndFunc

While True
    Sleep(50)
WEnd
So richtig ?
2.
wenn 1. richtig ist dann funktioniert es nicht..
Oder braucht man hierfür auch Adminrechte ?
Für das ändern der Registry wirst du mit ziemlicher Sicherheit Administratorrechte brauchen.
.SkyneT. is offline  
Old 03/28/2012, 19:44   #11
 
ҭὄẋἷƈṩҭẏłἔ's Avatar
 
elite*gold: 130
Join Date: Mar 2012
Posts: 87
Received Thanks: 7
Okey^^
Naja Problem gelöst..

#Close
ҭὄẋἷƈṩҭẏłἔ is offline  
Old 03/28/2012, 20:37   #12


 
Lawliet's Avatar
 
elite*gold: 2
Join Date: Jul 2009
Posts: 14,456
Received Thanks: 4,685
Fehlende Admin Rechte waren warscheinlich auch das Problem bei KDs Möglichkeit.
Lawliet is offline  
Old 03/29/2012, 08:47   #13
 
fReeZ.'s Avatar
 
elite*gold: 18
Join Date: Oct 2011
Posts: 108
Received Thanks: 17
Wenn du die Uhrzeit nachgucken willst während du CSS spielst musst du nur "Shirt + Tab" drücken. Dann sollte oben Links leserlich die Zeit angezeigt werden.

Grüße
fReeZ.
fReeZ. is offline  
Reply


Similar Threads Similar Threads
Komisches Autostart-Programm - Please Hilfe...
05/06/2011 - Technical Support - 3 Replies
Hallo Wollte mal schauen was sich so für Autostart-Programme angesammelt haben... Dann habe ich hier so ein komisches gefunden ... Weiss ehrlich nicht was das für eins ist , habe Angst das es ein Virus oder ähnliches seih. Hier mal ein Screen ( Das " Programm " kann ich auch nicht Deaktivieren , das " Programm " heisst "TaskTray" ) http://img837.imageshack.us/img837/2497/23588825. jpg
Autostart
01/03/2011 - AutoIt - 5 Replies
hi leute ich hab mit autoit nen einfaches programm gemacht und bei epvpers gepostet. Dazu möchte ich jetzt ne datei machen die das Programm in den autostart ordner kopiert. Da ich anfänger bin wollte ich euch um hilfe bitten. Nützliche post bekommen natürlich thx ;D
cd autostart
06/22/2010 - Technical Support - 6 Replies
hallo leute ich hab ein problem normal wenn man ne cd reinschiebt dann startet die ja aber bei mir ist das nicht so :( kann mir das jemand machen das das wieder geht pls???
Autostart vom Programm was sich auf dem Ipod Touch befindet
05/31/2010 - Technical Support - 2 Replies
Hi ihr ich habe auf meinem gejailbreakten Ipod Touch Copy Trans insterliert. Um das nun zu starten muss ich jedes mal in den System Ordner des Ipod´s gehen und das Programm suchen was ziemlich mühselig ist. Ich hab nun schon gegoogelt aber keine Antwort bekommen. Habe dann versucht es mit einer selbstgeschriebenden Autostart.inf Datei hinzubekommen. Was leider auch nicht funktioniert. So nun meine Frage kennt ihr eine Methode wie ich es anstellen kann das wenn ich meinen Ipod an irgend...



All times are GMT +1. The time now is 16:35.


Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2026 elitepvpers All Rights Reserved.