Jump to content

Kısayol Attırma


digitall
 Share

Recommended Posts

Olmamış kardeşim \w bu şekilde olmuş ama şu şekilde olmalıydı; /w

 

Evet biliyorum autoitle bu kadar, belki çalışır dedim :), bence bir cevaplayan çıkmazda yapamazsan hocam masaüstüne iki kısayoluda hazırla exenin içine aldır masaüstüne çıkarttır olsun bitsin, selametle...

Link to comment
Share on other sites

Önceki cevaplarda isteğin kodu verdim. Derleyip bakma zahmetine girmemişsin sanırım :) İsteğin basit bir olay ama ben yinede bunun fonksiyonunu yazdım daha işlevsel ve anlaşılır olsun diye. Diğer çalışmalarında da kullanabilirsin. Bu arada @ProgramFilesDir sisteme göre sonuç döndürür yani @OSArch ile koşul koşmaya pek gerek yok diye hatırlıyorum..


;Dosya Adı|Kısayol konumu|Çalışma dizini|Parametre|Açıklama|Simge|Simge numarası|Başlagıç sitili|Kısayol tuşu
SK_SHORTCUT(@ProgramFilesDir & "\Nero\Nero Burning ROM\nero.exe", @DesktopDir & "\Nero Express", @ProgramFilesDir & "\Nero\Nero Burning ROM", "/w", "", @ProgramFilesDir & "\Nero\Nero Burning ROM\nero.exe", 1, @SW_MAXIMIZE)
Func SK_SHORTCUT($DOSYA_ADI, $LNK, $CALISMADIZINI = "", $PARAM = "", $ACIKLAMA = "", $SIMGE = "", $NSIMGE = 0, $DURUM = "", $KISAYOLT = "")
	Local $KLASOR
	If $NSIMGE = "" Then $NSIMGE = 0
	If StringRight($LNK, 4) <> ".lnk" Then $LNK &= ".lnk"
	If Not StringInStr($DOSYA_ADI, ":\", 0) Then $DOSYA_ADI = @ScriptDir & "\" & $DOSYA_ADI
	If Not FileExists($DOSYA_ADI) Then Return -1
	$KLASOR = StringSplit($LNK, "\")
	$KLASOR = StringLeft($LNK, StringInStr($LNK, $KLASOR[$KLASOR[0]]) - 2)
	If Not FileExists($KLASOR) Then DirCreate($KLASOR)
	FileCreateShortcut($DOSYA_ADI, $LNK, $CALISMADIZINI, $PARAM, $ACIKLAMA, $SIMGE, $KISAYOLT, $NSIMGE, $DURUM)
EndFunc   ;==>SK_SHORTCUT

Program Hali.

https://app.box.com/s/n489it59d1940hfuc2el
Link to comment
Share on other sites

Verdiğin kodlar biraz karışık gelmişti pek anlayamadım kardeşim ama çok daha basit bir şekilde yapımını söyledi reyiz usta ama şurda bir sorunum oldu.

 

  1. nircmd.exe shortcut "~$folder.programfiles$\Nero\Nero Burning ROM\nero.exe" "~$folder.desktop$\" "Nero Express" "/w"

64 bitte çalışmıyor. Yol şu şekilde nasıl yapacağımı bilemedim.

 

C:\Program Files (x86)\Nero\Nero Burning ROM

 

Esasen bunu 64 bitte yapabilirsem çok iyi olacak 32 bitte yukarıdaki sorunsuz.

Link to comment
Share on other sites

Program halini de verdim kullanmıyorsan sen bilirsin. 64 bit için üstteki programın ilgili sürümünü indirip dene veyahut buna benzer bir program var onu da önceki cevaplarda parametreleriyle verdim..

http://www.nirsoft.net/utils/nircmd-x64.zip
Link to comment
Share on other sites

Ustam nircmdnin 64biti zaten var ama şu kod nircmd(x86) için geçerli ve sorunsuz.

  1. nircmd.exe shortcut "~$folder.programfiles$\Nero\Nero Burning ROM\nero.exe" "~$folder.desktop$\" "Nero Express" "/w"

bu kodun nircmd(x64) şekli ve bu şekilde 1,2 satırlık kısa bir şekli yok mu acaba?

Edited by digitall
Link to comment
Share on other sites

Ustam nircmdnin 64biti zaten var ama şu kod nircmd(x86) için geçerli ve sorunsuz.

  1. nircmd.exe shortcut "~$folder.programfiles$\Nero\Nero Burning ROM\nero.exe" "~$folder.desktop$\" "Nero Express" "/w"

bu kodun nircmd(x64) şekli ve bu şekilde 1,2 satırlık kısa bir şekli yok mu acaba?

~$folder.programfiles$ yerine %ProgramFiles% kullanmayı denesene 64 bitte "Program Files (x86)" klasörüne denk geliyor bildiğim kadarıyla.

Link to comment
Share on other sites

Arkadaşlar şu kodu bi derleyip; uydurabilecek yok mu tamam program filesa direkt girmiyor ancak şöyle yapabiliriz.

 

Run RegEdit with SYSTEM user (On Windows 7/8/Vista/2008), which allows you to view all hidden system Registry keys nircmd.exe elevatecmd runassystem c:\windows\regedit.exe

 

Orjinal sitesinden buna yakın bir kod buldum.

 

%SystemDrive%\Program Files (x86) benzetmemiz gereken ise bu kod.

 

 

64 bitte kısayolda şunu yapmam lazım.

 

"C:\Program Files (x86)\Nero\Nero Burning ROM\nero.exe" /w

Edited by digitall
Link to comment
Share on other sites

O kadar kod ve program verdik tutturdun nircmd ile yapacam diye şimdi o olmayınca yine dediğim programa geldin :D Alt tarafı bir kısayol bu kadar uzatmanın bi alemi yok kanımca. Önceki postlarda isteğini vermiştim ama pm attığın için son defaya mahsus hazırlayıp veriyorum. Kabak tadı vermeye başladı çünkü.

https://app.box.com/s/rbokk1csllme5g26a3o5
Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...