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
Resim

Resim

Resim

Resim

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 :) ...)

Resim

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:

Resim

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.