Möglich mit filecopy() von exe datei den verknüfnung irgendwohin zu kopieren?

  • Also wie gesagt, soll nur verknüfnung kopiert werden. und nicht herstellt. möglich?
    danke in voraus

  • Willst du die Verknüpfungen zu einer EXE aufgelistet haben oder wie?

    @PokerFace

    Lesen
    Denken
    Posten

  • Mal nicht so vorlaut..
    Man kann sich ja mal irren Burak ;)
    Würdest du lesen und dann denken, wüsstest du was er will.

    Naja egal.
    Wenn du nur die Verknüpfung kopieren willst, dann reicht es, wenn du FileCopy verwendest.
    Verknüpfungen haben die Endung : .ink
    Also zum Beispiel Firefox:
    Firefox.ink

  • vielen danke. schon gelöst. jetzt kriege ich immer beim windows start mit verknüfnung immer fehlermeldung, da steht irgendwas von line 3487 error und sowas
    aber wenn ich nachher den verknüfnung selber starte, funktioniert alles wunderbar

  • Wie heißt denn die Fehlermeldung?
    Vielleicht können wir dir auch dabei helfen. :)

  • Mach mal Global und der Variablenname in Zeile 3847. (Am Anfang des Programms.)

  • Mach mal Global und der Variablenname in Zeile 3847. (Am Anfang des Programms.)

    mmmh. Könnten sie bitte bisschen genauer erklären. Verstehe nicht was sie meinen. danke

  • Was gibt es da noch zu erklären?

    Kannst du mir mal sagen bei welchen Variablennamen in Zeile 3847 ein Error ensteht? Entsprechend kann ich dir sagen wass du an den Anfang schreiben musst, erfolg ist nicht garantiert, es kann sein das die Variable im Ablauf des Skript deklariert werden soll, es aber nicht wird. Dann kann Global auch nicht das ersetzt was du an der Stelle, als der Variablenname deklariert wird, willst.

    Oder gib mir den Code.

    MfG

  • Das ist jetzt doch ein EXE datei. wenn ich das jetzt als .TXT ablese, sehe ich nur hieroglyfe. und wenn ich den als autoit skript lese, gibts keine line 3456.
    ich verstehe das irgendwie nicht, weil er nur beim autostart das fehler anzeigt und sonst kann ich normal starten.
    hier ist originnele skript:

    [autoit]

    #Include <StaticConstants.au3>
    #Include <WindowsConstants.au3>
    #include <GUIConstants.au3>
    #include <Date.au3>
    #NoTrayIcon
    HotKeySet("+!i", "exitProg")
    AdlibRegister("UpdateTime", 100)

    [/autoit][autoit][/autoit][autoit]

    Global $IDC_PICTURE, $IDC_EXIT, $MainGUI, $iDiffold
    Local $Width = 306

    [/autoit][autoit][/autoit][autoit]

    $MainGUI = GUICreate("timer", _
    $Width, 236, @DesktopWidth - $Width, 0, _
    $WS_POPUP, BitOR ($WS_EX_TOOLWINDOW, $WS_EX_LAYERED))

    [/autoit][autoit][/autoit][autoit]

    $IDC_PICTURE = GUICtrlCreatePic(@ScriptDir & "\lll.gif", _
    0, 0, 0, 0, _
    BitOR ($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS), _
    $GUI_WS_EX_PARENTDRAG)

    [/autoit][autoit][/autoit][autoit]

    $IDC_EXIT = GUICtrlCreateButton("X", 0, 0, 0, 0)
    GUICtrlSetState ($IDC_EXIT, $GUI_ONTOP)

    [/autoit][autoit][/autoit][autoit]

    $IDC_TIME = GUICtrlCreateLabel("", 60, 216, 190, 15)
    GUICtrlSetFont($IDC_TIME, 10, 500, 0, "Harlow Solid Italic")
    GUICtrlSetColor($IDC_TIME, 0xC71585);
    GUICtrlSetBkColor($IDC_TIME, 0x000000)

    [/autoit][autoit][/autoit][autoit]

    GUISetState(@SW_SHOW)

    [/autoit][autoit][/autoit][autoit]

    While TRUE
    Switch GUIGetMsg()
    Case $IDC_EXIT
    Exit
    EndSwitch
    WEnd

    [/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]

    Func ExitProg()
    Exit 0
    EndFunc

    [/autoit][autoit][/autoit][autoit]

    Func UpdateTime()
    $iDiffnew = _DateDiff('s', '2010/06/12 00:03:00', _NowCalc())
    If $iDiffold <> $iDiffnew Then
    Guictrlsetdata($IDC_TIME, _SecondsToDateTime($iDiffnew))
    $iDiffold = $iDiffnew
    EndIf
    EndFunc

    [/autoit][autoit][/autoit][autoit]

    Func _SecondsToDateTime($iSeconds, $iLang = 1)
    If $iLang < 0 Or $iLang > 1 Then $iLang = 0
    Local $sOut = '', $bCheck = False, $bNegative = False, $aDiv[5] = [2592000, 86400, 3600, 60, 1]
    Local $aFormat[5][2] = [['M', 'M.'],['Tage', 'D.'],['Stunden', 'H.'],['Minuten', 'Min.'],['Sekunden', 'Sec.']]
    If $iSeconds = 0 Then Return '0 ' & $aFormat[4][$iLang]
    If $iSeconds < 0 Then
    $bNegative = True
    $iSeconds = Abs($iSeconds)
    EndIf
    For $i = 0 To 4
    If ($iSeconds >= $aDiv[$i]) Or $bCheck Then
    $sOut &= Int($iSeconds / $aDiv[$i]) & ' '
    If Int($iSeconds / $aDiv[$i]) = 1 Then
    $sOut &= StringTrimRight($aFormat[$i][$iLang], 1) & ', '
    Else
    $sOut &= $aFormat[$i][$iLang] & ', '
    EndIf
    $bCheck = True
    EndIf
    $iSeconds = Mod($iSeconds, $aDiv[$i])
    Next
    If $bNegative Then $sOut = ' - ' & $sOut
    Return StringTrimRight($sOut, 2)
    EndFunc

    [/autoit]