• Vui lòng đọc nội qui diễn đàn để tránh bị xóa bài viết
  • Tìm kiếm trước khi đặt câu hỏi

Mã Nguồn K++ Mini Tools

Mã nguồn các chương trình tiện ích

Điều hành viên: tungcan5diop, QUANITGROBEST

Hình đại diện của người dùng
ico
Thành viên danh dự
Thành viên danh dự
Bài viết: 193
Ngày tham gia: T.Ba 20/07/2010 9:23 am
Đến từ: https://sites.google.com/site/icowaredownload
Has thanked: 1 time
Been thanked: 23 time
Liên hệ:

Mã Nguồn K++ Mini Tools

Gửi bàigửi bởi ico » T.Bảy 14/08/2010 2:39 pm

Tên chương trình: K++ Mini Tools
Ngôn ngữ lập trình: VB.NET
Tác giả: iCo
Chức năng: Phần mềm tiện ích giúp thay thay đổi các cài đặt trong Window



Download
Tập tin đính kèm
K++ Mini System Tools 2.rar
KMst
(151.96 KiB) Đã tải 561 lần
K++ Mini System Tool 1.rar
Thay doi tieu de logon
(103.13 KiB) Đã tải 510 lần
K++ Mini System Tools 3.rar
Chong Download Từ IE
(80.45 KiB) Đã tải 477 lần
K++ Mini System Tools 4.rar
Thay doi Tieu De IE
(111.12 KiB) Đã tải 562 lần
Sửa lần cuối bởi ico vào ngày CN 15/08/2010 9:10 am với 5 lần sửa.


Copy và Paste là 2 thành tựu hàng đầu thế giới và được các chuyên gia hàng đầu về tin học tin dùng

Hình đại diện của người dùng
vuathongtin
Điều hành viên
Điều hành viên
Bài viết: 1028
Ngày tham gia: CN 02/05/2010 10:03 pm
Đến từ: Xứ sở DG
Has thanked: 2 time
Been thanked: 105 time
Liên hệ:

Re: Mã Nguồn phần mềm ẩn hiện applet trong control panel

Gửi bàigửi bởi vuathongtin » T.Bảy 14/08/2010 3:08 pm

Cho mình hỏi tí nha
applet
là gì thế ? :D

Phải add vào listbox bằng cách thủ công à, có cách nào tự động Scan hok vậy,
  1. Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  2.         ListBox1.Items.Add("Accessibility Options")
  3.         ListBox1.Items.Add("Add or Remove Programs")
  4.         ListBox1.Items.Add("Display")
  5.         ListBox1.Items.Add("Add Hardware")
  6.         ListBox1.Items.Add("Internet Options")
  7.         ListBox1.Items.Add("Regional and Language Options")
  8.         ListBox1.Items.Add("Game Controls Options")
  9.         ListBox1.Items.Add("Mouse + Keyboard")
  10.         ListBox1.Items.Add("Sound and Audio Devices")
  11.         ListBox1.Items.Add("Network Connnections")
  12.         ListBox1.Items.Add("User Accounts")
  13.         ListBox1.Items.Add("Power Options")
  14.         ListBox1.Items.Add("System ")
  15.         ListBox1.Items.Add("Telephony")
  16.         ListBox1.Items.Add("Date and Time")
  17.         ListBox1.Items.Add("Scanners and Cameras")
  18.         ListBox1.Items.Add("Quick Time")
  19.         ListBox1.Items.Add("Norton Live Update")
  20.         ListBox2.Items.Add("access.cpl")
  21.         ListBox2.Items.Add("appwiz.cpl")
  22.         ListBox2.Items.Add("desk.cpl")
  23.         ListBox2.Items.Add("hdwwiz.cpl")
  24.         ListBox2.Items.Add("inetcpl.cpl")
  25.         ListBox2.Items.Add("intl.cpl")
  26.         ListBox2.Items.Add("joy.cpl")
  27.         ListBox2.Items.Add("main.cpl")
  28.         ListBox2.Items.Add("mmsys.cpl")
  29.         ListBox2.Items.Add("ncpa.cpl")
  30.         ListBox2.Items.Add("nusrmgr.cpl")
  31.         ListBox2.Items.Add("powercfg.cpl")
  32.         ListBox2.Items.Add("sysdm.cpl")
  33.         ListBox2.Items.Add("telephon.cpl")
  34.         ListBox2.Items.Add("timedate.cpl")
  35.         ListBox2.Items.Add("sticpl.cpl")
  36.         ListBox2.Items.Add("quicktime.cpl")
  37.         ListBox2.Items.Add("s32lucp1.cpl")
  38.     End Sub
Bùi Thành Nhân
CNTT-Sở Thông tin & Truyền thông tỉnh Phú Yên
giasulaptrinh.com
Skype:vuathongtin

Hình đại diện của người dùng
ico
Thành viên danh dự
Thành viên danh dự
Bài viết: 193
Ngày tham gia: T.Ba 20/07/2010 9:23 am
Đến từ: https://sites.google.com/site/icowaredownload
Has thanked: 1 time
Been thanked: 23 time
Liên hệ:

Re: Mã Nguồn phần mềm ẩn hiện applet trong control panel

Gửi bàigửi bởi ico » T.Bảy 14/08/2010 4:13 pm

Applet là tên gọi chung các ứng dụng trong Control Panel
Còn Scan Thì chắc là có nhưng mình không biết.
Giả dụ thực sự có cách để Scan thì việc hiện ẩn các ứng dụng trong Control Panel (hay còn gọi là Applet :D ) không phải cái nào cũng giống nhau. Nếu Scan Tất thì làm sao phân biệt được cái này mở theo cách nào, cái kia mở theo cách nào được chứ :-S
Cái Tool này mình chỉ chọn nhưng cái nào có cách ẩn hiện giống nhau mình mới cho vào thôi.
Nếu bạn thích làm cái có thể Scan thì mình nói cho bạn thêm một cách khác để mở applet nè :)) :

Trong Control Panel có một số thành phần khác như Fonts, Folder Options, Printers and Faxs, ... không bắt nguồn từ các file .cpl trong thư mục Windows\System32 mà chúng là những shortcut của hệ thống bắt nguồn từ các khoá trong Registry để gọi thư viện liên kết động dll.

Bảng dưới đây sẽ giúp bạn tham khảo một số các thành phần đó: (Hơi xộc xệc một tí mong bạn thông cảm và cố gắng đọc :"> )

Tên khoá trong Registry Tên trong Control Panel
{D20EA4E1-3957-11d2-A40B-0C5020524153} Administrator Tools
{D20EA4E1-3957-11d2-A40B-0C5020524152} Fonts
{6DFD7C5C-2451-11d3-A299-00C04F8EF6AF} Folder Options
{7007ACC7-3202-11D1-AAD2-00805FC1270E} Network Connections
{2227A280-3AEA-1069-A2DE-08002B30309D} Printers and Faxes
{D6277990-4C6A-11CF-8D87-00AA0060F5BF} Scheduled Task
{E211B736-43FD-11D1-9EFB-0000F8757FCD} Scanners and Cameras
{0DF44EAA-FF21-4412-828E-260A8728E7F1} TaskBar and Start Menu

Để hiên chúng thì làm như sau ( Imports Microsoft.Win32 )

Mã: Chọn hết

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim regKey As RegistryKey
        regKey = Registry.CurrentUser.OpenSubKey("SoftWare\Microsoft\Windows\CurrentVersion\Policies", True)
        regKey.CreateSubKey("NonEnum")
        regKey.Close()
 My.Computer.Registry.SetValue("HKEY_CURRENT_USER\SoftWare\Microsoft\Windows\CurrentVersion\Policies\NonEnum", "Ten Khoa Trong Registry, "1", Microsoft.Win32.RegistryValueKind.DWord)
        MsgBox("Ghi Key Thanh Cong")
    End Sub


Mình làm thử cái đoạn mà cũng thấy hãi..... :-S Cái Registry này loằng ngoằng kinh =(( Mà lúc làm còn sợ làm hỏng máy nữa chứ :( Ghi Sai Khóa là Toi :-B May Mà Không Sao :))

Mà mình Up THêm 3 cái tool + 2 mã nguồn nữa (Nhẹ tênh hà toàn 30 KB minitool mà :D )
Copy và Paste là 2 thành tựu hàng đầu thế giới và được các chuyên gia hàng đầu về tin học tin dùng


Quay về “[.NET] Mã nguồn chương trình tiện ích”

Đang trực tuyến

Đang xem chuyên mục này: Không có thành viên nào trực tuyến.1 khách