To Notepad (Σημειωματάριο) είναι ένα πρόγραμμα που υπάρχει στα Windows από πάντα, κι έτσι περνά συνήθως στα «ψιλά» της καθημερινής χρήσης, ενώ μπορεί να κάνει απίθανα πράγματα!Από ένα σωρό τρικ μέχρι και αστείους «ιούς» που στέλνεις σε φίλους.
Ξεδιπλώνοντας την αστείρευτη μαγεία του Notepad, εδώ θα δούμε ένα εξίσου υπέροχο κόλπο που κάνει τον υπολογιστή μας να λέει ό,τι ακριβώς πληκτρολογούμε.
Ανοίγουμε λοιπόν το Notepad (Σημειωματάριο) και επικολλούμε με copy-paste τον παρακάτω κώδικα.
Dim Message, Speak
Message=InputBox(“Enter text”,”Speak”)
Set Speak=CreateObject(“sapi.spvoice”)
Speak.Speak Message
Κατόπιν πάμε να σώσουμε το αρχείο. Ανοίγουμε το Save As (Αποθήκευση ως), επιλέγουμε το All Types (Όλα τα αρχεία) και σώζουμε το αρχείο με ό,τι όνομα θέλουμε και την κατάληξη «.vbs» (π.χ. Speak.vbs).
Με διπλό κλικ πάνω στο σωσμένο αρχείο (αποθηκεύστε το στην επιφάνεια εργασίας για εύκολη πρόσβαση), θα ανοίξει ένα μικρό παράθυρο. Εκεί πληκτρολογούμε το κείμενο που θέλουμε (στα αγγλικά, αναγκαστικά) και πατάμε OK.
Το κομπιούτερ θα πει ό,τι ακριβώς γράψαμε. Το τρικ δουλεύει με όλες τις εκδόσεις των Windows, πηγαίνοντας πίσω ως και τα Windows XP.
