Dosya Silinmesini Engellemek

Katılım
28 Ocak 2007
Mesajlar
185
Excel Vers. ve Dili
2016 Türkçe
Arakdaşlar kafe çalıştırıyorum masaüstünde bir kısayolum var bunu siliyorlar. Bunun silinmesini cafeplus ile engelleyebilirmiyim?


Korumayı sağlayamıyorsam bari yeniden oluşturayım sürekli aklıma şöle bir fikir geldi bir bat dosyası olurmak istiyorum. Bu bat dosyasını tıklandığında masa üstüne kısayolu eklemek bu bat dosyasını nasıl oluşturabilirim.
 
Katılım
25 Aralık 2005
Mesajlar
4,160
Excel Vers. ve Dili
MS Office 2010 Pro Türkçe
Sayın myefsane,

Aşağıdaki linkteki program işinizi görür sanırım:

http://optimumx.com/download/#Shortcut

veya aşağıdaki vbscripten de birşeyler yapabilirsiniz:

Kod:
set WshShell = WScript.CreateObject("WScript.Shell" )
strDesktop = WshShell.SpecialFolders("AllUsersDesktop" )
set oShellLink = WshShell.CreateShortcut(strDesktop & "\shortcut name.lnk" )
oShellLink.TargetPath = "c:\application folder\application.exe"
oShellLink.WindowStyle = 1
oShellLink.IconLocation = "c:\application folder\application.ico"
oShellLink.Description = "Shortcut Script"
oShellLink.WorkingDirectory = "c:\application folder"
oShellLink.Save

İyi çalışmalar
 
Katılım
28 Ocak 2007
Mesajlar
185
Excel Vers. ve Dili
2016 Türkçe
Abi teşekkür ediyorum deneyeceğim.

 
Son düzenleme:
Üst