therock Δημοσ. 14 Μαΐου 2005 Δημοσ. 14 Μαΐου 2005 Kalispera pedia,den gnorizo apo programming kkai tha ithela tin voitheia sas sto na mou ftiaksete ena aplo scriptaki. Exo ena programma sto kinito symbian opou elegxo apo to kinito mou to pc me bluetooth.Winamp,powerpoint,etc. Ayto pou tha ithela akoma na kano einai na mporo meso tou programmatos aytou na stelno apo to kinito ena sindiasmo pliktron pou na ekteleitai sto pc! Me alla logia tha ithela apo to kinito na ektelo to sindiasmo ctrl+shift+f1 oste na ekteleitai to hotkey ayto sto pc. P.s.Sto programma mporeis na kaneis add item stin morfi visual basic script,javascript kai puppetmaster script. Opoio sas volevei an mporeitai kantecopy psdte tid grammoules edo!Tha sas eimai ipoxreos.eyxaristo poli!
therock Δημοσ. 14 Μαΐου 2005 Μέλος Δημοσ. 14 Μαΐου 2005 Pedia sorry,gia na min grafete scriptaki gia to kinito mipos kalitera tha itan na ftiaxnate ena .exe opou otan to ektelo sto pc na ektelei ton sindiasmo ctrl+shift+f1?
Skeftomilos Δημοσ. 15 Μαΐου 2005 Δημοσ. 15 Μαΐου 2005 Δε χρειάζεται .exe, αρκεί ένα script σε VBScript ή JScript. Το παρακάτω script κάνει αυτό που θέλεις, αρκεί να το σώσεις σε αρχείο με κατάληξη .js, π.χ. Ctrl-Shift-F1.js >var shell = WScript.CreateObject("WScript.Shell") shell.SendKeys("^+{F1}")
therock Δημοσ. 15 Μαΐου 2005 Μέλος Δημοσ. 15 Μαΐου 2005 Oxi distixos den to kanei! O sindiasmos aytos (ctrl+shift+f1) einai hotkey pou exo dilosei sto nview properties ton forceware kai allazei to display apo tin othoni tou pc stin tv. Metonomasa to parpano se .js kai to etreksa alla den egine tpt. KApoio scriptaki ginetai pou na allazei to display stin tv?
Skeftomilos Δημοσ. 15 Μαΐου 2005 Δημοσ. 15 Μαΐου 2005 Μήπως το shortcut είναι Control-Alt-F1? Σε αυτή την περίπτωση το script είναι >var shell = WScript.CreateObject("WScript.Shell") shell.SendKeys("^%{F1}") Με ποιο τρόπο το έτρεξες? Αν πάτησες Enter είναι πιθανό να μπερδέυτηκε τα πλήκτρο Enter μαζί με τα υπόλοιπα. Κάνε καλύτερα διπλό κλικ πάνω στο αρχείο. Ή κάνε δεξί κλικ στο αρχείο -> Open With -> Microsoft Windows Based Sctipt Host. Με το F1 δε μπορώ να κάνω δοκιμή για να δω αν δουλεύει ή όχι. Γίνεται να αλλάξεις προσωρινά το shortcut σε κάτι άλλο? Π.χ. το Control-Alt-C το δοκίμασα και δουλεύει. Ο κώδικας είναι: >var shell = WScript.CreateObject("WScript.Shell") shell.SendKeys("^%c") Μπορείς να προσθέσεις στην αρχή την εντολή WScript.Sleep(1000) ώστε το script να τρέχει 1 δευτερόλεπτο μετά την ενεργοποίησή του.
therock Δημοσ. 15 Μαΐου 2005 Μέλος Δημοσ. 15 Μαΐου 2005 Me to ctrl+alt+c ginetai ontos!Me to ctrl+shift+f1 giati den ginetai? EDIT: To scriptaki sou einai kalo kai se eyxaristo poli,alla gia na mou figei i aporia rotao se ti fteei o sindiasmos? Kai sto programma pou xrisimopoio gia to kinito exei epilogi gia na kanei send keys,alla to ctrl+shift+f1 den epoiane,tore pou to allaksa se ctrl+alt+c poianei kai apo ekei?Pou einai to provlima sto proto sindiasmo den katalavaino!
makaveli Δημοσ. 16 Μαΐου 2005 Δημοσ. 16 Μαΐου 2005 Aυτό που έχει περισσότερο ενδιαφέρον τώρα είναι να μας πεις ποια είναι η jessica που έχεις στο desktop? lol No offense!
Skeftomilos Δημοσ. 17 Μαΐου 2005 Δημοσ. 17 Μαΐου 2005 Από περιέργεια βρήκα τρόπο να δοκιμάσω το συνδυασμό CTRL+SHIFT+F1, αλλά δε συνάντησα πρόβλημα. Καταρχήν έκανα ένα shortcut στο desktop των Windows για το Notepad με το παρακάτω script (createlink.js): >var shell = WScript.CreateObject("WScript.Shell") var desktop_path = shell.SpecialFolders("Desktop") var link = shell.CreateShortcut(desktop_path + "\\Notepad Shortcut.lnk") link.TargetPath = "Notepad.exe" link.WindowStyle = 1 link.Hotkey = "CTRL+SHIFT+F1" link.IconLocation = "Notepad.exe, 0" link.Description = "Shortcut for Notepad" link.Save() WScript.Echo("Δημιουργία link έγινε.") Μετά έτρεξα το άλλο script (sendkeys.js): >var shell = WScript.CreateObject("WScript.Shell") shell.SendKeys("^+{F1}") ... το οποίο προκάλεσε το άνοιγμα του Notepad κανονικά. Δεν ξέρω τι φταίει στην περίπτωσή σου και δεν τρέχει.
therock Δημοσ. 18 Μαΐου 2005 Μέλος Δημοσ. 18 Μαΐου 2005 Telika diki mou vlakeia!To hotkey pou eixa itan ctrl+shift+1 oxi f1 ! Eyxaristo para poli gia tin voitheia pados!
therock Δημοσ. 25 Ιουνίου 2005 Μέλος Δημοσ. 25 Ιουνίου 2005 Kalispera pedia,epanafero to topic mias kai tha ithela tin voitheia sas gia mia akoma fora. Exo to programma ayto sto pc opou meso bluetooth mporeis apo to kinito na ellekseis ton ipologisti. Tha ithela ena script opou otan me kaloun na pagonei to media player classic an pezei kai otan telionei i klisi na sinexizei.To programma exei ena tetoio script etoimo gia to winamp,ego tha ithela gia media player classic,ti na kano? Paratheto ta script pou exei etoima gia Winamp: A) //*************************************************************************** // Pause WinAMP if it is playing //*************************************************************************** timeout = 50; windowClassName = "Winamp v1.x"; window = Windows.findWindow(windowClassName); if(!window) return; state = window.sendMessageTimeout(0x400, 0, 104, timeout, 0); if(state == 1) // Playing! { // Toggle play/pause window.postMessage(0x111, 40046, 0); } //*************************************************************************** //*************************************************************************** // Unpause WinAMP //*************************************************************************** timeout = 50; windowClassName = "Winamp v1.x"; window = Windows.findWindow(windowClassName); if(!window) return; state = window.sendMessageTimeout(0x400, 0, 104, timeout, 0); if(state == 3) // Paused! { // Toggle play/pause window.postMessage(0x111, 40046, 0); } //***************************************************************************
Προτεινόμενες αναρτήσεις
Αρχειοθετημένο
Αυτό το θέμα έχει αρχειοθετηθεί και είναι κλειστό για περαιτέρω απαντήσεις.