shortcut στο desktop το οποιο να εκτελει ενα keyboard combination?

[azuli]

Καλημερα,γινεται να φτιαξεις ενα shortcut στο desktop το οποιο να εκτελει ενα keyboard combination?

Δηλαδη να φτιαξεις ενα shortcut στο desktop που να εκτελει πχ το Win+E keyboard combination.

Σα να πατησες το κουμπι windows και το κουμπι Ε δηλαδη.

 

[ksessalonikios]

Κάτι τέτοιο ίσως;

https://blog.techinline.com/2016/08/11/how-to-create-a-desktop-icon-for-a-windows-keyboard-shortcut/

[azuli]

13 minutes ago, ksessalonikios said:

Κάτι τέτοιο ίσως;

https://blog.techinline.com/2016/08/11/how-to-create-a-desktop-icon-for-a-windows-keyboard-shortcut/

ακριβως!Με αυτο το script παλευω εδω και καποια ωρα,προσπαθω να το κανω να ανοιγει το win+E αλλα μεχρι τωρα δεν το χω καταφερει.Το προβλημα ειναι οτι δεν μπορω να βρω πως να γραψω το γραμμα Ε.

Kαμια ιδεα για την συνταξη?

[ksessalonikios]

στο 2ο κομμάτι του οδηγού γράφει μια εναλλακτική λύση για τον συνδιασμό WIN+CTRL+D, αν τον προσαρμόσεις μπορεί να δουλεψει, δυστυχώς κατι παραπανω δεν γνωρίζω

[azuli]

32 minutes ago, ksessalonikios said:

στο 2ο κομμάτι του οδηγού γράφει μια εναλλακτική λύση για τον συνδιασμό WIN+CTRL+D, αν τον προσαρμόσεις μπορεί να δουλεψει, δυστυχώς κατι παραπανω δεν γνωρίζω

Το εκανα με τον δευτερο τροπο και δουλεψε

Αλλα δεν ειναι λειτουργικο για τη δουλεια που το θελω γιατι αργει μεσω του 3rd party προγραμματος.Με την πρωτη μεθοδο ειναι γρηγορο αλλα δεν μπορω να βρω πως γραφεται.Κατι διαβασα οτι δεν υποστηριζει το κουμπι WIN?

[ksessalonikios]

ετσι γράφει γι' αυτό και προτείνει τον 2ο τρόπο

[tolhc1234]

 

1 ώρα πριν, azuli είπε

Καλημερα,γινεται να φτιαξεις ενα shortcut στο desktop το οποιο να εκτελει ενα keyboard combination?

Δηλαδη να φτιαξεις ενα shortcut στο desktop που να εκτελει πχ το Win+E keyboard combination.

Σα να πατησες το κουμπι windows και το κουμπι Ε δηλαδη.

Αυτό το έχεις δει/δοκιμάσει;

https://stackoverflow.com/questions/51868449/send-windows-key-in-batch-script

Απλά αντί για Keys.R θα βάλεις Keys.E στα 

keybd_event(CByte(Keys.R), 0, KEYEVENTF_KEYDOWN, 0) 'press the R key down
keybd_event(CByte(Keys.R), 0, KEYEVENTF_KEYUP, 0) 'release the R key

Edit: Αναφέρομαι στην 2η απάντηση

Επεξ/σία 8 Δεκεμβρίου 2018 από tolhc1234

[azuli]

8 hours ago, tolhc1234 said:

Αυτό το έχεις δει/δοκιμάσει;

https://stackoverflow.com/questions/51868449/send-windows-key-in-batch-script

Απλά αντί για Keys.R θα βάλεις Keys.E στα 

keybd_event(CByte(Keys.R), 0, KEYEVENTF_KEYDOWN, 0) 'press the R key down
keybd_event(CByte(Keys.R), 0, KEYEVENTF_KEYUP, 0) 'release the R key

Edit: Αναφέρομαι στην 2η απάντηση

μπερδευτηκα λιγο ειναι αληθεια,δοκιμασα μερικες παραλλαγες αλλα δεν δουλεψε..

Αν ξερεις πες μου με ποια διαδικασια το κανω αυτο,γιατι αναφερονται διαφορες.Φτιαχνω δηλαδη ενα .txt που βαζω μεσα τι?και τι καταληξη του δινω?

[tolhc1234]

1 ώρα πριν, azuli είπε

μπερδευτηκα λιγο ειναι αληθεια,δοκιμασα μερικες παραλλαγες αλλα δεν δουλεψε..

Αν ξερεις πες μου με ποια διαδικασια το κανω αυτο,γιατι αναφερονται διαφορες.Φτιαχνω δηλαδη ενα .txt που βαζω μεσα τι?και τι καταληξη του δινω?

Πρώτα απ' όλα στα Windows βάλε να φαίνονται οι επεκτάσεις των ονομάτων αρχείων. Στα 10 ανοίγεις έναν οποιοδήποτε φάκελο και πας πάνω στις επιλογές που υπάρχουν στο tab Προβολή και τσεκάρεις το αντίστοιχο πεδίο.   Σε άλλα windows ψάξτο στο google δεν νομίζω να είναι κάτι πολύπλοκο.

ΟΚ, τώρα θα πας επιφάνεια εργασίας και φτιάξε ένα νέο text αρχείο.

Άνοιξε το και γράψε αυτό όπως είναι, αποθήκευσε το και κλείστο.

Imports System.Runtime.InteropServices
Imports System.Windows.Forms

Public Module SendWinKey

    Const KEYEVENTF_KEYDOWN As Integer = &H0
    Const KEYEVENTF_KEYUP As Integer = &H2

    Declare Sub keybd_event Lib "User32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As UInteger, ByVal dwExtraInfo As UInteger)

       Public Sub Main()    
           keybd_event(CByte(Keys.LWin), 0, KEYEVENTF_KEYDOWN, 0) 'press the left Win key down
           keybd_event(CByte(Keys.E), 0, KEYEVENTF_KEYDOWN, 0) 'press the E key down
           keybd_event(CByte(Keys.E), 0, KEYEVENTF_KEYUP, 0) 'release the E key
           keybd_event(CByte(Keys.LWin), 0, KEYEVENTF_KEYUP, 0) 'release the left Win key
       End Sub
End Module

Στην επιφάνεια εργασία λογικά θα έχεις αυτό το αρχείο ως Νέο έγγραφο κειμένου.txt

Κάνε μετονομασία σε Win+E.vb  και πρόσεξε να σβήσεις και το txt απ' το όνομα. Θα σου βγάλει μία προειδοποίηση ότι ίσως να μην μπορεί να χρησιμοποιηθεί πατάς Ναι.

Οκ τώρα άνοιξε το Command Line / Γραμμή Εντολών και κάνε paste αυτό

C:\Windows\Microsoft.NET\Framework\v4.0.30319\vbc "%userprofile%\desktop\Win+E.vb" /out:"%userprofile%\Desktop\Win+E.exe" /target:winexe

Θα δημιουργηθεί ένα νέο αρχείο exe στην επιφάνεια εργασίας σου που θα λέγεται Win+E.exe

Τρέχτο να δεις ότι κάνει αυτό που θες και είσαι οκ

Το αρχείο vb μπορείς να το διαγράψεις, το exe μπορείς να το μετονομάσεις/μετακινήσεις/οτιδήποτε και θα λειτουργεί κανονικά.

 

 

 

Επεξ/σία 8 Δεκεμβρίου 2018 από tolhc1234

[azuli]

12 minutes ago, tolhc1234 said:

Πρώτα απ' όλα στα Windows βάλε να φαίνονται οι επεκτάσεις των ονομάτων αρχείων. Στα 10 ανοίγεις έναν οποιοδήποτε φάκελο και πας πάνω στις επιλογές που υπάρχουν στο tab Προβολή και τσεκάρεις το αντίστοιχο πεδίο.   Σε άλλα windows ψάξτο στο google δεν νομίζω να είναι κάτι πολύπλοκο.

ΟΚ, τώρα θα πας επιφάνεια εργασίας και φτιάξε ένα νέο text αρχείο.

Άνοιξε το και γράψε αυτό όπως είναι, αποθήκευσε το και κλείστο.

Imports System.Runtime.InteropServices
Imports System.Windows.Forms

Public Module SendWinKey

    Const KEYEVENTF_KEYDOWN As Integer = &H0
    Const KEYEVENTF_KEYUP As Integer = &H2

    Declare Sub keybd_event Lib "User32" (ByVal bVk As Byte, ByVal bScan As Byte, ByVal dwFlags As UInteger, ByVal dwExtraInfo As UInteger)

       Public Sub Main()    
           keybd_event(CByte(Keys.LWin), 0, KEYEVENTF_KEYDOWN, 0) 'press the left Win key down
           keybd_event(CByte(Keys.E), 0, KEYEVENTF_KEYDOWN, 0) 'press the E key down
           keybd_event(CByte(Keys.E), 0, KEYEVENTF_KEYUP, 0) 'release the E key
           keybd_event(CByte(Keys.LWin), 0, KEYEVENTF_KEYUP, 0) 'release the left Win key
       End Sub
End Module

Στην επιφάνεια εργασία λογικά θα έχεις αυτό το αρχείο ως Νέο έγγραφο κειμένου.txt

Κάνε μετονομασία σε Win+E.vb  και πρόσεξε να σβήσεις και το txt απ' το όνομα. Θα σου βγάλει μία προειδοποίηση ότι ίσως να μην μπορεί να χρησιμοποιηθεί πατάς Ναι.

Οκ τώρα άνοιξε το Command Line / Γραμμή Εντολών και κάνε paste αυτό

C:\Windows\Microsoft.NET\Framework\v4.0.30319\vbc "%userprofile%\desktop\Win+E.vb" /out:"%userprofile%\Desktop\Win+E.exe" /target:winexe

Θα δημιουργηθεί ένα νέο αρχείο exe στην επιφάνεια εργασίας σου που θα λέγεται Win+E.exe

Τρέχτο να δεις ότι κάνει αυτό που θες και είσαι οκ

Το αρχείο vb μπορείς να το διαγράψεις, το exe μπορείς να το μετονομάσεις/μετακινήσεις/οτιδήποτε και θα λειτουργεί κανονικά.

εισαι πολυ ωραιος,ευχαριστω για το χρονο σου!

Δεν κανει γι αυτο που το θελω γιατι ως .exe ανοιγει πιο αργα απο shortcut,αλλα και παλι ευχαριστω!

[tolhc1234]

3 λεπτά πριν, azuli είπε

εισαι πολυ ωραιος,ευχαριστω για το χρονο σου!

Δεν κανει γι αυτο που το θελω γιατι ως .exe ανοιγει πιο αργα απο shortcut,αλλα και παλι ευχαριστω!

Περίεργο αυτό που λες γιατί δεν βλέπω κάποια διαφορά στην ταχύτητα αλλά οκ

 

[azuli]

1 minute ago, tolhc1234 said:

Περίεργο αυτό που λες γιατί δεν βλέπω κάποια διαφορά στην ταχύτητα αλλά οκ

θελω να πιασω την ταχυτητα που ανοιγει ο explorer οταν πατας win+E γιατι με τα τελευταια updates των windows οταν τον ανοιγεις απο taskbar αργει 1 δευτερολεπτο να ανοιξει και εχω φρικαρει..!Πριν το update ανοιγε και απο το taskbar τοσο γρηγορα