www.ClickEXE.de Click.EXE - In 5 Minuten zum eigenen Programm!
cX5 Zahnräder Jetzt neu: click.EXE 5.0 - Hier klicken für weitere Informationen cX5 Zahnräder
Start Einloggen Einloggen Die Mitglieder Das Foren-Team Suchfunktion
30889 Posts & 5499 Themen in 34 Foren
Benutzername/Passwort:
  Login speichern
Forenübersicht » Andere Versionen und Sprachen » Click.EXE und VB-Script » VBS Hilfe: Verknüpfung anlegen

vorheriges Thema   nächstes Thema
4 Posts in diesem Thema (offen)
Seiten (1): (1)
Autor
Beitrag
Gast Alex2510  
Themenicon    VBS Hilfe: Verknüpfung anlegen
Gast
Kann mir einer Helfen?
ich habe ein script geschriebn
das Datei-verknüpfungen anlegen soll.
Der name staht in der Variable [Dateiname], und der Pfad
ist am Ende offen. z.b: C:\Windows und steht in der Variable [wäo] (wähle ordner) jetzt will ich das im selben Verzeichniss die Verknüpfungangelegt wird.
das heist:
datei Pfad= [wäo]\[Dateiname]
Verkn. Pfad= [wäo]\Verküpfung_mit_ [Dateiname].lnk
ich hab da ein VBS script gesehen aber das kann nur
verknüpfungen zum desktop machen! Hat irgenwer eine Idee?
Beitrag vom 14.07.2006 - 11:37
Diesen Beitrag melden   zum Anfang der Seite
BananenSplitter` ist offline BananenSplitter`  
1137 Beiträge - click.EXE - Guru
Mit Cx geht das mit dem Startemenü-Befehl, ich finde man sollte ihn umbennenen !
Beitrag vom 14.07.2006 - 12:12
Diesen Beitrag melden   nach weiteren Posts von BananenSplitter` suchen BananenSplitter``s Profil ansehen BananenSplitter` eine Kurznachricht senden BananenSplitter` zu deinen Freunden hinzufügen zum Anfang der Seite
Rolf ist offline Rolf  
Themenicon    Verknüpfung mit vb Skript
53 Beiträge - Fortgeschrittener Clicker
Ich hab dir mal einen Auszug aus einen Sript von mir gemacht die Variablennamen mußt du anpassen.
-------------------------------------------------------------
Dim Text, Prog, Ordner, Parameter, QuickInfo, Style, IconNummer,Taste, ArbeitsOrdner, IconDatei

Parameter = Var("Parameter") 'kann leer bleiben (optional)
QuickInfo = Var("QuickInfo") 'kann leer bleiben (kann eigener Text sein optional)
Taste = Var("TastenkombiText") 'kann leer bleiben (Tastenkombination ist optional)
Style = Var("FensterStyle") 'kann leer bleiben ((1,2 oder3 für normal minimiert oder maximiert öffnen)
IconNummer = Var("IconNummer") 'kann leer bleiben
IconDatei = Var("IconDatei") 'kann leer bleiben
ArbeitsOrdner = Var("ArbeitsOrdner") 'ist der Ordner in dem sich die Datei befindet die verknüpft werden soll, ohne () am Ende
Text = Var("Name") 'Name der Verknüpfung Du kannst den Dateinamen ohne Pfad verwenden oder einen anderen Namen hier ist ein Wert zwingend
Prog = Var("WertVKN") 'PfadDateiname der Datei die verknüpft werden soll hier ist ein Wert zwingend
Ordner = Var("EigeneWahlText") 'Angabe des Ordners wo die Verknüpfung abgspeichert werden soll (z.B. C:Dokumente und EinstellungenAll UsersStartmenüProgramme)

'Die Variablennamen sind aus meinem derzeitigen in arbeit befindlichem Skript Du mußt sie entsprechend anpassen.
'Wenn Du nicht alle Variablen verwenden willst lautet die Schreibweise z.B. link.HotKey = ""
'oder Du definierst die Variable mit "Setze in " und lässt den Wert leer
Dim Shell
Dim Ordner
Dim Link


Set Shell=CreateObject("WScript.Shell")
Set Link=Shell.CreateShortcut(Ordner & "" & Text & ".LNK")
link.HotKey = Taste
link.Description = QuickInfo
link.Arguments = Parameter
link.IconLocation = IconDatei &"," & IconNummer
link.TargetPath = Prog
link.WindowStyle = Style
link.WorkingDirectory = ArbeitsOrdner
link.Save
Beitrag vom 01.10.2006 - 18:34
Diesen Beitrag melden   nach weiteren Posts von Rolf suchen Rolf`s Profil ansehen Rolf eine E-Mail senden Rolf eine Kurznachricht senden Rolf zu deinen Freunden hinzufügen zum Anfang der Seite
Rolf ist offline Rolf  
Themenicon    VBS Dateibeispiel
53 Beiträge - Fortgeschrittener Clicker
ich noch mal, hier ein Beispiel einer VBS Datei
zum Verknüpfen des Taschenrechners, Du mußt den Text als name.vbs speichern gegebenenfalls anpassen wenn die Datei calc.exe woanders sitzt.
-------------------------------------

Set Shell = CreateObject("WScript.Shell")
DesktopPath = ("C:Dokumente und EinstellungenAll UsersStartmenü")
Set link = Shell.CreateShortcut(DesktopPath & "Rechner.lnk")
link.Arguments = ""
link.Description = "Taschenrechner starten"
link.HotKey = "ALT+T"
link.IconLocation ="C:Windowssystem32calc.exe,0"
link.TargetPath = "C:Windowssystem32calc.exe"
link.WindowStyle = 1
link.WorkingDirectory = "C:Windowssystem32"
link.Save
Beitrag vom 01.10.2006 - 18:47
Diesen Beitrag melden   nach weiteren Posts von Rolf suchen Rolf`s Profil ansehen Rolf eine E-Mail senden Rolf eine Kurznachricht senden Rolf zu deinen Freunden hinzufügen zum Anfang der Seite
Baumstruktur - Signaturen anzeigen
Seiten (1): (1)
vorheriges Thema   nächstes Thema

Gehe zu:  
Es ist / sind gerade keine registrierte(r) Benutzer und 250 Gäste online. Neuester Benutzer: Volker58
Alles gute zum Geburtstag    Wir gratulieren ganz herzlich zum Geburtstag:
dsoxygen (39), herby471 (68)
aktive Themen der letzten 48 Stunden - Top-User
0
0

www.ClickEXE.de © 2021
Seite in 0.34170 sec generiert