[VBS] LNK 파일 만들기

VBS로 숏컷 만들기

LNK 파일을 만들려고 하니 귀찬음. 자동화를 위해서는 스크립트를 만들어야 해서 작성함.

시나리오는 C:\TEST\TEST.TXT 파일을 C:\TEST 디랙토리에 test.LNK 파일을 만든다.

Set oWS = WScript.CreateObject("WScript.Shell")
sLinkFile = "C:\test\test.LNK"
Set oLink = oWS.CreateShortcut(sLinkFile)
    oLink.TargetPath = "C:\test\test.txt"
 '  oLink.Arguments = ""
 '  oLink.Description = "MyProgram"   
 '  oLink.HotKey = "ALT+CTRL+F"
 '  oLink.IconLocation = "C:\test\test.txt, 2"
 '  oLink.WindowStyle = "1"   
 '  oLink.WorkingDirectory = "C:\test\"
oLink.Save

또는 CMD로 만들어서 할수도있다는 바탕화면에 notepad.exe 숏컷을 만드는 예제.

@echo off
echo Set oWS = WScript.CreateObject("WScript.Shell") > CreateShortcut.vbs
echo sLinkFile = "%HOMEDRIVE%%HOMEPATH%\Desktop\Hello.lnk" >> CreateShortcut.vbs
echo Set oLink = oWS.CreateShortcut(sLinkFile) >> CreateShortcut.vbs
echo oLink.TargetPath = "C:\Windows\notepad.exe" >> CreateShortcut.vbs
echo oLink.Save >> CreateShortcut.vbs
cscript CreateShortcut.vbs
del CreateShortcut.vbs