Đăng bởi Admin | 25/7/13 | 0 nhận xét
Bạn mới mua máy tính về, khi mở System Properties, bạn sẽ thấy thông tin đăng ký (Registered to) là một người dùng nào đó. Thủ thuật sau sẽ giúp bạn điều chỉnh thông tin đăng ký này thành tên của bạn rất dễ dàng. Bạn mở Notepad và nhập đoạn mã sau vào.
Option Explicit
Set ws = WScript.CreateObject("WScript.Shell")
Dim ws, t, p1, p2, n, g, cn, cg
Dim itemtype
p1 = "HKLM\Software\Microsoft\Windows NT\CurrentVersion\"
n = ws.RegRead(p1 & "RegisteredOwner")
g = ws.RegRead(p1 & "RegisteredOrganization")
t = "Change Owner and Organization Utility"
cn = InputBox("Type new Owner and click OK", t, n)
If cn <> "" Then
ws.RegWrite p1 & "RegisteredOwner", cn
End If
cg = InputBox("Type new Organization and click OK.", t, g)
If cg <> "" Then
ws.RegWrite p1 & "RegisteredOrganization", cg
End If
Lưu lại với tên là changeinfouser.vbs và chạy nó. Một hộp thoại sẽ yêu cầu bạn nhập tên mới cho máy tính. Nhập xong, bạn có thể vào lại System Properties để kiểm tra những thay đổi.
Thu thuat vi tinh
Option Explicit
Set ws = WScript.CreateObject("WScript.Shell")
Dim ws, t, p1, p2, n, g, cn, cg
Dim itemtype
p1 = "HKLM\Software\Microsoft\Windows NT\CurrentVersion\"
n = ws.RegRead(p1 & "RegisteredOwner")
g = ws.RegRead(p1 & "RegisteredOrganization")
t = "Change Owner and Organization Utility"
cn = InputBox("Type new Owner and click OK", t, n)
If cn <> "" Then
ws.RegWrite p1 & "RegisteredOwner", cn
End If
cg = InputBox("Type new Organization and click OK.", t, g)
If cg <> "" Then
ws.RegWrite p1 & "RegisteredOrganization", cg
End If
Lưu lại với tên là changeinfouser.vbs và chạy nó. Một hộp thoại sẽ yêu cầu bạn nhập tên mới cho máy tính. Nhập xong, bạn có thể vào lại System Properties để kiểm tra những thay đổi.
Thu thuat vi tinh
Không có nhận xét nào:
Đăng nhận xét
Cảm ơn bạn đã nhận xét !
Mã hóa Code- Bạn có thể chèn link vào nhận xét bằng thẻ: <a href="Link" rel="nofollow">Tên link</a>
- Tạo <b>Chữ đậm</b> và <i>Chữ ngiêng</i> cho nhận xét
- Hãy Chuyển đổi mã code trước khi chèn vào nhận xét
- Hãy bấm Theo dõi dưới chân trang để nhanh chóng nhận được phản hồi từ Thủ thuật vi tính
- Những nhận xét nào không lành mạnh hoặc chèn link spam sẽ bị xóa khỏi blog.