Πίνακας περιεχομένων:

Κάντε ένα ενοχλητικό πρόγραμμα που ανοίγει και κλείνει όλες τις μονάδες δίσκου σας: 4 βήματα
Κάντε ένα ενοχλητικό πρόγραμμα που ανοίγει και κλείνει όλες τις μονάδες δίσκου σας: 4 βήματα

Βίντεο: Κάντε ένα ενοχλητικό πρόγραμμα που ανοίγει και κλείνει όλες τις μονάδες δίσκου σας: 4 βήματα

Βίντεο: Κάντε ένα ενοχλητικό πρόγραμμα που ανοίγει και κλείνει όλες τις μονάδες δίσκου σας: 4 βήματα
Βίντεο: Πως να σταματήσετε τις εφαρμογές να τρέχουν κατά την εκκίνηση των Windows 10, ελευθερώνοντας μνήμη 2024, Νοέμβριος
Anonim
Φτιάξτε ένα ενοχλητικό πρόγραμμα που ανοίγει και κλείνει όλες τις μονάδες δίσκου σας
Φτιάξτε ένα ενοχλητικό πρόγραμμα που ανοίγει και κλείνει όλες τις μονάδες δίσκου σας
Φτιάξτε ένα ενοχλητικό πρόγραμμα που ανοίγει και κλείνει όλες τις μονάδες δίσκου σας
Φτιάξτε ένα ενοχλητικό πρόγραμμα που ανοίγει και κλείνει όλες τις μονάδες δίσκου σας

αυτό είναι το πρώτο μου εκπαιδευτικό, οπότε πείτε μου πώς μπορώ να βελτιωθώ.

αυτό το διδακτικό σας λέει πώς να φτιάξετε ένα ενοχλητικό πρόγραμμα που ανοίγει και κλείνει όλους τους δίσκους cd σας. θα χρειαστείτε: έναν υπολογιστή με παράθυρα

Βήμα 1: Ανοίξτε το Σημειωματάριο

Ανοίξτε το Σημειωματάριο
Ανοίξτε το Σημειωματάριο

πρώτα, ανοίξτε το σημειωματάριο

Υπάρχουν 2 τρόποι που ξέρω να κάνω με αυτόν τον τρόπο 1: κάντε κλικ στο κουμπί έναρξης, μεταβείτε στα προγράμματα ή σε όλα τα προγράμματα, μεταβείτε στα αξεσουάρ κάντε κλικ στο σημειωματάριο 2: κρατήστε πατημένο το πλήκτρο των παραθύρων, στη συνέχεια πατήστε το R και αφήστε το κλειδί των παραθύρων, ένα πλαίσιο θα εμφανιστεί, σε αυτό το πλαίσιο πληκτρολογήστε σημειωματάριο

Βήμα 2: Πληκτρολογήστε το σενάριο

Πληκτρολογήστε το Script
Πληκτρολογήστε το Script

το παράθυρο του σημειωματάριου θα πρέπει τώρα να είναι ανοιχτό και να επικολλήσετε το παρακάτω κείμενο στο notepaddoDim tsDim strDriveLetterDim intDriveLetterDim fs 'As Scripting. FileSystemObjectConst CDROM = 4On Error Resume NextSet fs = CreateObject ("Scripting. FileSystemObete" ") Προς Asc (" Z ") Err. ClearIf fs. GetDrive (Chr (intDriveLetter)). DriveType = CDROM ThenIf Err. Number = 0 ThenstrDriveLetter = Chr (intDriveLetter) Exit ForEnd IfEnd IfNextSet oWMP = WEMPEject (CreateObject) 7 ") Ορίστε colCDROMs = oWMP.cdromCollectionFor d = 0 σε colCDROMs. Count - 1colCDROMs. Στοιχείο (d). EjectNext 'nullFor d = 0 σε colCDROMs. Count - 1colCDROMs. Στοιχείο (d). EjectNext' nullset owmp = not τίποτα

Βήμα 3: Αποθήκευση και δοκιμή

αποθηκεύστε το αρχείο ως cd.vbs στην επιφάνεια εργασίας σας και κάντε διπλό κλικ για να το εκτελέσετε

Βήμα 4: Κάντε το να σταματήσει

πατήστε ctrl+alt+διαγραφή ανοιχτής εργασίας διαχειριστή κλικ διαδικασίες κλικ wscript.exe πατήστε τερματισμός διαδικασίας

Συνιστάται: