07-01-21, 06:22 PM
السلام عليكم ورحمة الله وبركاته..
أخوتى أريد كود لعمل اختصار لسطح المكتب لآى مجلد أكتب مساره مثلا فى التكست بوكس..
يعنى مثلا أريد عمل إختصار لهذا المجلد على سطح المكتب
E:\الفيجوال\Selenium
(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()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.(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