1. sayfa (Toplam 2 sayfa)
Programın Kısa yolundan kurulu olduğu dizine gitmek
Gönderilme zamanı: 18 Ara 2010, 17:52
gönderen Mendenn
Programın Kısa yolundan kurulu olduğu dizine gitmek için Çeşitli yöntemler mevcuttur. Ama bunu sağ klik (Context Menu) eklemek ister misiniz?
Aşağıda kodları verip dosya oluşturmanızı istediğim dosyaları aynı klasöre koyunuz.
Aşağıdaki kodu: Hedef
.reg olarak kayıt ediniz.
Kod: Tümünü seç
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\lnkfile\Shell\Hedefi Bul\command]
@="wscript.exe \"C:\\WINDOWS\\system32\\Find_target.vbs\" \"%1\""
Aşağıdaki kodu hedefbul
.bat olarak kayıt edin.
Kod: Tümünü seç
cmdow.exe @ /hid
@echo off
setlocal
set FT="%TEMP%\Find_Target.tmp"
set FTV="C:\WINDOWS\system32\Find_Target.vbs"
@echo REGEDIT4>%FT%
@echo.>>%FT%
@echo [HKEY_CLASSES_ROOT\lnkfile\Shell\Hedefi Bul\command]>>%FT%
@echo @="wscript.exe \"C:\WINDOWS\system32\Find_target.vbs\" \"%%1\"">>%FT%
@echo.>>%FT%
@echo.>>%FT%
@echo Dim param, filenam, targt, shortct>%FTV%
@echo Set param = WScript.Arguments>>%FTV%
@echo filenam = param (0)>>%FTV%
@echo Set WshShell = WScript.CreateObject("WScript.Shell")>>%FTV%
@echo Set shortct = WshShell.CreateShortcut(filenam)>>%FTV%
@echo targt = shortct.TargetPath>>%FTV%
@echo WshShell.Run "%windir%\explorer.exe /select," ^& Chr(34) ^& targt ^& Chr(34)>>%FTV%
regedit /s hedef.reg
del /q %FT%
endlocal
Yazan: Mendenn
Re: Programın Kısa yolundan kurulu olduğu dizine gitmek
Gönderilme zamanı: 18 Ara 2010, 18:11
gönderen velociraptor
tesekürler fakat
Find_Target.vbs nerde , sahsen ben olsam söyle bir anlatimi tercih ederdim:
Bir Programin hedef klasörünü bulmak icin genellikle o program kisayolunu sag tiklayip özellikler > hedefi bul deriz , fakat bu özelligi cokca kullaniyorsaniz direk sag tikladigmizda hedefi bul diye bir opsiyonumuz olsun istiyorsak asagidakileri uygulamamiz yeterlidir:
1. asagidaki kodu not defterine yapistirip bir isim veriniz ve uzantisini .bat olacak sekilde herhangi bir yere kaydedin:
Kod: Tümünü seç
cmdow.exe @ /hid
@echo off
setlocal
set FT="%TEMP%\Find_Target.tmp"
set FTV="C:\WINDOWS\system32\Find_Target.vbs"
@echo REGEDIT4>%FT%
@echo.>>%FT%
@echo [HKEY_CLASSES_ROOT\lnkfile\Shell\Hedefi Bul\command]>>%FT%
@echo @="wscript.exe \"C:\WINDOWS\system32\Find_target.vbs\" \"%%1\"">>%FT%
@echo.>>%FT%
@echo.>>%FT%
@echo Dim param, filenam, targt, shortct>%FTV%
@echo Set param = WScript.Arguments>>%FTV%
@echo filenam = param (0)>>%FTV%
@echo Set WshShell = WScript.CreateObject("WScript.Shell")>>%FTV%
@echo Set shortct = WshShell.CreateShortcut(filenam)>>%FTV%
@echo targt = shortct.TargetPath>>%FTV%
@echo WshShell.Run "%windir%\explorer.exe /select," ^& Chr(34) ^& targt ^& Chr(34)>>%FTV%
regedit /s hedef.reg
del /q %FT%
endlocal
Bu yukaridaki .bat kodu calistirildiginda
C:\Windows\system32 klasörünün icine
Find_Target.vbs isminde bir vbs olusturur , eger birsekilde sizde bu olusmadi ise asagidakini notepad e yapistirip Find_target.vbs seklinde C:\Windows\system32 icine atiniz
Kod: Tümünü seç
Dim param, filenam, targt, shortct
Set param = WScript.Arguments
filenam = param (0)
Set WshShell = WScript.CreateObject("WScript.Shell")
Set shortct = WshShell.CreateShortcut(filenam)
targt = shortct.TargetPath
WshShell.Run "C:\Windows\explorer.exe /select," & Chr(34) & targt & Chr(34)
Asil isi yapan bu ve birazdan kullanacagimiz sag tikta hedefi bul olusmasini saglayan registry kaydidir.
2. asagidaki registry kaydini calistiriniz
Kod: Tümünü seç
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\lnkfile\Shell\Hedefi Bul\command]
@="wscript.exe \"C:\\WINDOWS\\system32\\Find_target.vbs\" \"%1\""
artik sag tikta hedefi bul diye bir Opsiyonumuz var
Mendenn
paylasim icin tekrar tesekkürler
Re: Programın Kısa yolundan kurulu olduğu dizine gitmek
Gönderilme zamanı: 18 Ara 2010, 18:48
gönderen Mendenn
Arkadaş Tarkan abi haklı ama yanıldığı bir nokta var. ilk bakışta kodlar incelendiğinde sanki bir dosya eksikmiş gibi. oda dosyada : Find_Target.vbs öğle duruyor. o dosya bat uzantılı dosya tarafından oluşturuluyor. (Ben kodlardan fazla anlamam ama deneyerek yaptığım için. her bilgisayara format attığımda bu işi yaparım. bu arada yeni format attım :) ...)

Re: Programın Kısa yolundan kurulu olduğu dizine gitmek
Gönderilme zamanı: 18 Ara 2010, 19:09
gönderen velociraptor
bende sadece kodlara kisaca bakmistim sonradan .bat in bu gerekli vbs yi olusturup system32 icine attigini anladim , tekrar sagol
Re: Programın Kısa yolundan kurulu olduğu dizine gitmek
Gönderilme zamanı: 18 Ara 2010, 19:21
gönderen Mendenn
Bu kodu mentin belgesine yazıp. Hedefbul
.bat olarak kayıt ediniz. sonra çalıştırınız. Yukarında verdiğim iki kodu tek programda topladım. böylece daha rahat kullanırsınız.
Kod: Tümünü seç
cmdow.exe @ /hid
@echo off
REG ADD "HKCR\lnkfile\Shell\Hedefi Bul\command" /f
REG ADD "HKCR\lnkfile\Shell\Hedefi Bul\command" /v "@" /t REG_SZ /d ""wscript.exe \"C:\\WINDOWS\\system32\\Find_target.vbs\" \"%1\""" /f
setlocal
set FT="%TEMP%\Find_Target.tmp"
set FTV="C:\WINDOWS\system32\Find_Target.vbs"
@echo REGEDIT4>%FT%
@echo.>>%FT%
@echo [HKEY_CLASSES_ROOT\lnkfile\Shell\Hedefi Bul\command]>>%FT%
@echo @="wscript.exe \"C:\WINDOWS\system32\Find_target.vbs\" \"%%1\"">>%FT%
@echo.>>%FT%
@echo.>>%FT%
@echo Dim param, filenam, targt, shortct>%FTV%
@echo Set param = WScript.Arguments>>%FTV%
@echo filenam = param (0)>>%FTV%
@echo Set WshShell = WScript.CreateObject("WScript.Shell")>>%FTV%
@echo Set shortct = WshShell.CreateShortcut(filenam)>>%FTV%
@echo targt = shortct.TargetPath>>%FTV%
@echo WshShell.Run "%windir%\explorer.exe /select," ^& Chr(34) ^& targt ^& Chr(34)>>%FTV%
regedit /s hedef.reg
del /q %FT%
endlocal
Re: Programın Kısa yolundan kurulu olduğu dizine gitmek
Gönderilme zamanı: 18 Ara 2010, 20:34
gönderen velociraptor
bu daha kullanisli olmus bunu birde exe yapsaydin , yarin öbürgün senin bu emegin ile birileri ahkam kesemezdi
Edit: Son verdigin yanlis registry kaydi olusturdugundan calismiyor
Re: Programın Kısa yolundan kurulu olduğu dizine gitmek
Gönderilme zamanı: 18 Ara 2010, 20:37
gönderen Mendenn
Tarkan abi dediğim gibi. kodlardan anlamıyorum kodları torbaya atar gibi koydum demek
Kod: Tümünü seç
REG ADD "HKCR\lnkfile\Shell\Hedefi Bul\command" /f
REG ADD "HKCR\lnkfile\Shell\Hedefi Bul\command" /v "@" /t REG_SZ /d ""wscript.exe \"C:\\WINDOWS\\system32\\Find_target.vbs\" \"%1\""" /f
bu kodları belki daha aşağıya yazmam lazım.
Re: Programın Kısa yolundan kurulu olduğu dizine gitmek
Gönderilme zamanı: 18 Ara 2010, 20:48
gönderen Mendenn
velociraptor yazdı:bu daha kullanisli olmus bunu birde exe yapsaydin , yarin öbürgün senin bu emegin ile birileri ahkam kesemezdi
Edit: Son verdigin yanlis registry kaydi olusturdugundan calismiyor
ama bende çalışıyor. İşletim sistemim windows Xp Pro.

Re: Programın Kısa yolundan kurulu olduğu dizine gitmek
Gönderilme zamanı: 18 Ara 2010, 20:49
gönderen velociraptor
viewtopic.php?f=9&t=84536
üsttekini bir incele , exe yi de winrar ile yapmaya calis , yani senden ricam sunu tiklandiginda otomatik olarak herseyi yapan bir exe yapman , omadi ben bir caresine bakarim
sende calismasinin sebebi : önceden girimis dogru kayitlar , cünkü üstteki alakasiz kayitlar olusturuyor
Re: Programın Kısa yolundan kurulu olduğu dizine gitmek
Gönderilme zamanı: 18 Ara 2010, 21:01
gönderen Mendenn
Re: Programın Kısa yolundan kurulu olduğu dizine gitmek
Gönderilme zamanı: 18 Ara 2010, 21:02
gönderen Mendenn
Kod: Tümünü seç
cmdow.exe @ /hid
@echo off
setlocal
set FT="%TEMP%\Find_Target.tmp"
set FTV="C:\WINDOWS\system32\Find_Target.vbs"
@echo REGEDIT4>%FT%
@echo.>>%FT%
@echo [HKEY_CLASSES_ROOT\lnkfile\Shell\Hedefi Bul\command]>>%FT%
@echo @="wscript.exe \"C:\WINDOWS\system32\Find_target.vbs\" \"%%1\"">>%FT%
@echo.>>%FT%
@echo.>>%FT%
@echo Dim param, filenam, targt, shortct>%FTV%
@echo Set param = WScript.Arguments>>%FTV%
@echo filenam = param (0)>>%FTV%
@echo Set WshShell = WScript.CreateObject("WScript.Shell")>>%FTV%
@echo Set shortct = WshShell.CreateShortcut(filenam)>>%FTV%
@echo targt = shortct.TargetPath>>%FTV%
@echo WshShell.Run "%windir%\explorer.exe /select," ^& Chr(34) ^& targt ^& Chr(34)>>%FTV%
REG ADD "HKCR\lnkfile\Shell\Hedefi Bul\command" /f
REG ADD "HKCR\lnkfile\Shell\Hedefi Bul\command" /v "@" /t REG_SZ /d ""wscript.exe \"C:\\WINDOWS\\system32\\Find_target.vbs\" \"%1\""" /f
del /q %FT%
endlocal
Bunu bir denesen Tarkan abi ?
Re: Programın Kısa yolundan kurulu olduğu dizine gitmek
Gönderilme zamanı: 18 Ara 2010, 21:06
gönderen velociraptor
bu dogru kayitlari olusturdu , exe yi winrar ile mi yaptin ? (henüz indirmedimde)
Re: Programın Kısa yolundan kurulu olduğu dizine gitmek
Gönderilme zamanı: 18 Ara 2010, 21:07
gönderen Mendenn
Re: Programın Kısa yolundan kurulu olduğu dizine gitmek
Gönderilme zamanı: 18 Ara 2010, 21:19
gönderen velociraptor
geyet hos olmus , tikliyorsun amacini yerine getiriyor

baslik yerine tasinmistir cünkü vista ve windows 7 de zaten asagidaki secenek var:

Re: Programın Kısa yolundan kurulu olduğu dizine gitmek
Gönderilme zamanı: 19 Ara 2010, 00:07
gönderen Mendenn
Tarkan abi kodu düzelttim. Dediğim gibi çalışmıyordu. önce kendimki reg kaydını regisrty den sildim aynı şekilde oluşan dosyayı. sonra bat ile tek başına oluşturdum. çalışıyor.