15-11-2011, 15:28
|
|
|
חבר מתאריך: 07.02.04
הודעות: 2,421
|
|
מחיקת לינק HTML משולחן העבודה דרך VBS
שלום
אני מנסה למחוק קובץ לינק HTML משולחן העבודה דרך vbs
יש לי VBS שמוחק כל לינק בשולחן העבודה אבל לצערי HTML (קיצור דרך של אתר מסויים על ה Desktop) לא במצע מחיקה.
קוד:
Dim WSHShell, DesktopPath
Set WSHShell = WScript.CreateObject("WScript.Shell")
DesktopPath = WSHShell.SpecialFolders("Desktop")
on error resume next
Icon = DesktopPath & "\deletefile"
Folder = DesktopPath & "\sample folder"
Set fs = CreateObject("Scripting.FileSystemObject")
Set A = fs.GetFile(Icon)
A.Delete
set B = fs.GetFolder(folder)
B.Delete
WScript.Quit
עזרתכם
|