VB Script in Startup Kopieren?

...komplette Frage anzeigen

2 Antworten

Ungefähr so dürfte es funktionieren:

Function CopyToStartup(startupName)
Const ssfSTARTUP = &H7
Sim fso, wsh, shl, startup, script

Set fso = CreateObject("Scripting.FileSystemObject")
Set wsh = CreateObject("Wscript.Shell")

Set shl = CreateObject("Shell.Application")
Set startup = shl.NameSpace(ssfSTARTUP)

If Not startup Is Nothing Then
WScript.Echo startup.Self.Path
Else
set startup = wsh.SpecialFolders("Startup")
End If

Set script = wsh.ScriptFullName

fso.CopyFile script, startup & "\\\\" & startupName
End Function

Anmerkung: Habs net getestet (is auf Ubuntu mit Wine bissl schwierig ;), aber so ungefähr dürfts gehn...

P.S.:

@ctct1999: Wie zem Deibel kommst von VB Script (VBS) auf VB.NET?! Keen Wunder, dass dat net läuft...

Und zem Fragesteller: Hast doch hoffentlich nix ungutes vor...? ;)

Antwort bewerten Vielen Dank für Deine Bewertung

hast du es mal mit "FileCopy" probiert?

code : FileCopy(Pfad,Dtaei)

Antwort bewerten Vielen Dank für Deine Bewertung
Kommentar von ThreshX
01.03.2017, 14:59

kannst du nen beispiel schreiben? Also wo der startup Pfad hinkommt und wo der des VBS :)

0

Was möchtest Du wissen?