[ابو روضة]

السلام عليكم ورحمة الله وبركاته..

أخوتى أريد كود لعمل اختصار لسطح المكتب لآى مجلد أكتب مساره مثلا فى التكست بوكس..

يعنى مثلا أريد عمل إختصار لهذا المجلد على سطح المكتب

E:\الفيجوال\Selenium

[اسامه الهرماوي]

وعليكم السلام...
هذه المواضيع متعلقة بالمطلوب.
تفضل:
http://vb4arb.com/vb/showthread.php?tid=4902
http://vb4arb.com/vb/showthread.php?tid=3983

[اليوم السابع]

(07-01-21, 06:22 PM)ابو روضة كتب :

السلام عليكم ورحمة الله وبركاته..

أخوتى أريد كود لعمل اختصار لسطح المكتب لآى مجلد أكتب مساره مثلا فى التكست بوكس..

يعنى مثلا أريد عمل إختصار لهذا المجلد على سطح المكتب

E:\الفيجوال\Selenium

كود :

      Dim path As String = "C:\Program Files\king1\Debug\King Master 4.1.0.exe"
Dim DesktopPath As String = Environment.GetFolderPath(Environment.SpecialFolder.Desktop)
Dim lnkPath As string = DesktopPath & "\Test.lnk"

      Dim thing As New WshShell

      Dim shortcut As IWshShortcut
shortcut CType(thing.CreateShortcut(lnkPath), IWshShortcut)
shortcut.TargetPath = path
shortcut.Save()

[ابو روضة]

جزاكم الله كل الخير أخوتى الكرام....

[معاند الحظ]

ايضا يوجد امر من اوامر ms commands وهو mklink

وهذا شرح الامر 

كود :

MKLINK [[/D] | [/H] | [/J]] Link Target

        /D      Creates a directory symbolic link.  Default is a file
                symbolic link.
        /H      Creates a hard link instead of a symbolic link.
        /J      Creates a Directory Junction.
        Link    Specifies the new symbolic link name.
        Target  Specifies the path (relative or absolute) that the new link
                refers to.

اما طريقة الاستخدام فهي كالتالي
تفتح cmd كمسؤول 

تكتب اولا mklink ثم احد الخيارات الثلاثة والتي هي عبارة D /H/ /J/ بعدها الاسم الذي تريد تسمية الاختصار به ويجب ان يحتوي على المسار الكامل بما فيه حرف محرك الاقراص

الذي تود انشاء الاختصار فيه والا فان الاختصار سينشىء في windows\system32 واخيرا مسار المجلد او الملف المطلوب عمل اختصار له

مثال

mklink  /d D:\myShortcutFolder d:\bkup

هنا لدي مجلد اسمه  d:\bkup عملت له اختصار اسمه D:\myShortcutFolder

اخيرا لكي يتم الغاء الاختصار يستخدم الامر RD متبوعا بالمسار الكامل لملف او مجلد الاختصار

مثال

rd D:\myShortcutFolder

[ابو روضة]

(08-01-21, 05:15 AM)معاند الحظ كتب : ايضا يوجد امر من اوامر ms commands وهو mklink

وهذا شرح الامر 

كود :

MKLINK [[/D] | [/H] | [/J]] Link Target

        /D      Creates a directory symbolic link.  Default is a file
                symbolic link.
        /H      Creates a hard link instead of a symbolic link.
        /J      Creates a Directory Junction.
        Link    Specifies the new symbolic link name.
        Target  Specifies the path (relative or absolute) that the new link
                refers to.

اما طريقة الاستخدام فهي كالتالي
تفتح cmd كمسؤول 

تكتب اولا mklink ثم احد الخيارات الثلاثة والتي هي عبارة D /H/ /J/ بعدها الاسم الذي تريد تسمية الاختصار به ويجب ان يحتوي على المسار الكامل بما فيه حرف محرك الاقراص

الذي تود انشاء الاختصار فيه والا فان الاختصار سينشىء في windows\system32 واخيرا مسار المجلد او الملف المطلوب عمل اختصار له

مثال

mklink  /d D:\myShortcutFolder d:\bkup

هنا لدي مجلد اسمه  d:\bkup عملت له اختصار اسمه D:\myShortcutFolder

اخيرا لكي يتم الغاء الاختصار يستخدم الامر RD متبوعا بالمسار الكامل لملف او مجلد الاختصار

مثال

rd D:\myShortcutFolder

تسلم أخى ربنا يكرمك ويبارك فيك...