PC Toledo

Código: Selecionar todos

LINK98 C:\WINDOWS\NOTEPAD.EXE C:\WINDOWS\DESKTOP C:\WINDOWS\MENUIN~1\PROGRA~1 ICONE

Código: Selecionar todos

@echo off
::A batch file for Windows 95/98 that creates LNK shortcuts.
::Author: Walter Zackery
::December 2,1999
if %4[==[ goto syntax
if not exist %1 if not exist %1\nul goto syntax
for %%? in (%2 %3) do if not exist %%?\nul goto syntax
%5 %0 %1 %2 %3 %4 rem "PASTA" InstallHinfSection
echo > %temp%\#path#.bat path %path%
path %1
echo > %temp%\#k#.inf [version]
echo >>%temp%\#k#.inf signature="$chicago$"
echo >>%temp%\#k#.inf [DefaultInstall]
echo >>%temp%\#k#.inf UpdateInis=Addlink
echo >>%temp%\#k#.inf [Addlink]
echo >>%temp%\#k#.inf setup.ini, progman.groups,, "group0=%6"
echo >>%temp%\#k#.inf setup.ini, group0,, ""%6""
echo >>%temp%\#k#.inf setup.ini, group0,,""%4",""%path%"",,0,"
for %%? in (call del) do %%? %temp%\#path#.bat
start/w rundll setupx.dll,%7 DefaultInstall 132 %temp%\#k#.inf
::del %temp%\#k#.inf
move %3\PASTA\%4.lnk %2 > nul
rd "%3\PASTA"
goto end
:syntax
for %%? in (cls echo[) do %%?
echo O quarto parametro deve ser passado para o arquivo em lote
echo na mesma ordem. Näo coloque barra-invetida no final de cada
echo parametro que é passado para o arquivo em lote.
echo Nomes longos de arquivo devem estar entre aspas.
echo[
echo O primeiro parametro deve ser o nome do arquivo ou pasta
echo ao qual será acessado pelo atalho criado.
echo[
echo O segundo parametro deve ser o local da pasta onde irá
echo ser criado o atalho.
for %%? in (pause cls echo[) do %%?
echo O terceiro paremetro deve ser o local da pasta onde se encontram
echo seu programas. Essa pasta deve conter a maioria dos acessos pelo
echo menu iniciar e normalmente é C:\Windows\Menu Iniciar\programas. 
echo Se voce está usando perfís entäo deve considerar a pasta como
echo c:\Windows\perfis\%%username%%\Menu Iniciar\Programas, onde
echo %%username%% é o nome do usuário. Note que se informar errado
echo a localizaçäo da pasta de Programas, o atalho irá ser criado
echo mas ele näo será movido para a pasta que foi especificada.
echo No entanto o arquivo irá permanecer no Menu Iniciar com o nome
echo de PASTA.
echo[
echo O quarto parametro deve ser a descrição e nome que voce que dar
echo para o atalho. Näo adicione a extensäo para o nome ao menos
echo que voce queira que faça parte do nome do atalho.
:end

Código: Selecionar todos

LINKXP C:\WINDOWS\NOTEPAD.EXE C:\DOCUME~1\PABLO\DESKTOP C:\WINDOWS\SYSTEM32\CONFIG\SYSTEM~1\MENUIN~1\PROGRA~1 ICONE

Código: Selecionar todos

@echo off & setlocal
::For Windows NT 4.0 users only!!!
::Creates LNK and PIF files from the command line.
::Author: Walter Zackery
if not %1[==[ if exist %1 goto start
echo You must pass the path of a file or folder to the
echo batch file as a shortcut target.
if not %1[==[ echo %1 is not an existing file or folder
(pause & endlocal & goto:eof)
:start
(set hkey=HKEY_CURRENT_USER\Software\Microsoft\Windows)
(set hkey=%hkey%\CurrentVersion\Explorer\Shell Folders)
(set inf=rundll32 setupapi,InstallHinfSection DefaultInstall)
start/w regedit /e %temp%\#57#.tmp "%hkey%"

for /f "tokens=*" %%? in (
'dir/b/a %1? 2^>nul') do (set name=%%~nx?)

for /f "tokens=2* delims==" %%? in (
'findstr/b /i """desktop"""= %temp%\#57#.tmp') do (set d=%%?)

for /f "tokens=2* delims==" %%? in (
'findstr/b /i """programas"""= %temp%\#57#.tmp') do (set p=%%?)

(set d=%d:\\=\%) & (set p=%p:\\=\%)
if not %2[==[ if exist %~fs2\nul (set d=%~fs2)
if not %2[==[ if exist %~fs2nul (set d=%~fs2)
set x=if exist %2\nul
if not %2[==[ if not %d%==%2 %x% if "%~p2"=="\" set d=%2
echo %d%|find ":\" >nul||(set d=%d%\)
(set file=""""""%1"""""")
for /f "tokens=1 delims=:" %%? in ("%file:"=%") do set drive=%%?
(set progman=setup.ini, progman.groups,,)
echo > %temp%\#k#.inf [version]
echo >>%temp%\#k#.inf signature=$chicago$
echo >>%temp%\#k#.inf [DefaultInstall]
echo >>%temp%\#k#.inf UpdateInis=Addlink
echo >>%temp%\#k#.inf [Addlink]
echo >>%temp%\#k#.inf %progman% ""group200="}new{"""
echo >>%temp%\#k#.inf setup.ini, group200,, """%name%"",%file%
start/w %inf% 132 %temp%\#k#.inf
del %temp%\#k#.inf %temp%\#57#.tmp
move %p%\"}new{\*.*" %d% >nul 2>&1
rd %p%\}new{ 2>nul
move %p%\}new{.lnk %d%\"drive %drive%.lnk" >nul 2>&1
endlocal