THCS Quang Trung_Điện Bàn_Quảng Nam

Chào mừng các bạn đến với diễn đàn của Trường THCS Quang Trung_Điện Bàn
 
IndexCalendarGalleryTrợ giúpTìm kiếmThành viênNhómĐăng kýĐăng Nhập

Share | 
 

 Thêm một cách để đổi tên lệnh Run

Xem chủ đề cũ hơn Xem chủ đề mới hơn Go down 
Tác giảThông điệp
congtuan_luckyboy1996
Chuyên gia Spamer
Chuyên gia Spamer
avatar

Nam
Tổng số bài gửi : 111
Age : 21
Đến từ : 7/3, THCS Quang Trung, Vĩnh Điện, Điện Bàn, Quãng Nam, Việt Nam, Châu Á, Trái Đất, Ngân Hà hok bit
Registration date : 29/12/2008

Bài gửiTiêu đề: Thêm một cách để đổi tên lệnh Run   Thu Jan 08, 2009 8:22 pm

Bạn từng biết sử dụng khóa Registry để đổi tên trong menu Start , tuy nhiên ta sẽ có cách thứ

hai để đổi tên lệnh Run .

Bạn mở Notepad chép đọan code này vào :

Option Explicit

Set ws = WScript.CreateObject("WScript.Shell")

Dim ws, t, p1, n, cn, MyBox, Title

Dim itemtype

p1 = "HKCR\CLSID\{2559a1f3-21d7-11d4-bdaf-00c04f60b9f0}\"

n = ws.RegRead(p1 & "LocalizedString")

t = "Change the Name of Run on Start Menu"

cn = InputBox("Type in the name to replace Run with.", t, n)

If cn <> "" Then

ws.RegWrite p1 & "LocalizedString", cn

End If

Title = "Run on the Start Menu has now been renamed."

MyBox = MsgBox(Title,64,"Finished")

Lưu tập tin này với tên changerun.vbs

Sau đó bạn tiến hành chạy tập tin này và nhập vào tên cần thay đổi . Logoff hoặc khởi động lại

máy tính

Lưu ý : Thủ thuật này không áp dụng cho Classical Start Menu
cat cat cat
Về Đầu Trang Go down
Xem lý lịch thành viên http://hacker.yourme.net/
 
Thêm một cách để đổi tên lệnh Run
Xem chủ đề cũ hơn Xem chủ đề mới hơn Về Đầu Trang 
Trang 1 trong tổng số 1 trang

Permissions in this forum:Bạn không có quyền trả lời bài viết
THCS Quang Trung_Điện Bàn_Quảng Nam :: Học Tập :: Tin học trẻ-
Chuyển đến