Home » 1. Notebook News

เปลี่ยนค่า Default ของไดเรกทอรี Program Files ด้วย VBScript

22 May 10 - By l

โดยปกติโปรแกรมส่วนใหญ่ติดตั้งใน Windows จะไปที่พาธ C:\Program Files เป็นค่าดีฟอลต์ของ Windows? แต่ถ้าพื้นที่ฮาร์ดดิสก์ (C)?? เริ่มมีน้อย เราสามารถเปลี่ยนตำแหน่งที่เก็บโปรแกรมที่จะติดตั้งได้ โดยให้ไปอยู่ที่ไดรฟ์อื่นๆ โดยสามารถแก้ได้ที่ Registry แต่เพื่อความสะดวกไม่ต้องไปยุ่งกับ Registry โดยตรง ก็ใช้วิธีเขียนเป็น VBScript แทนโดยทำได้ดังนี้…

1. เปิด Notepad ขึ้นมา ก็อปปี้ Script ข้างล่างไปปะที่ Notepad

Option Explicit

Set ws = WScript.CreateObject(“WScript.Shell”)
Dim ws, t, p1, p2, n, cn
Dim itemtype

p1 = “HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\”

n = ws.RegRead(p1 & “ProgramFilesDir”)
t = “Change Default Installation Path Utility”
cn = InputBox(“พิมพ์พาธ Program Files Directory? ลงในช่องว่าง แล้วคลิก OK”, t, n)
If cn <> “” Then
ws.RegWrite p1 & “ProgramFilesDir”, cn
End If

2. บันทึกไฟล์นี้เป็นชื่อ Change Program File Directory.vbs

3. เวลาใช้งานก็ดับเบิลคลิกที่ไฟล์สร้างขึ้นมา จะมีหน้าต่าง Change Default Installation Path Utility ออกมา ให้คุณใส่พาธไดเรกทอรีตามที่คุณต้องการลงในช่องว่างของหน้าต่าง

4. คลิกปุ่ม OK ก็เสร็จเรียบร้อย

program_files

ต่อไปนี้ถ้ามีการติดตั้งโปรแกรมใหม่ Windows จะติดตั้งจะไปที่ค่าพาธที่คุณตั้งใหม่เป็นค่าดีฟอลต์



© Copyright - Notebookspec.com All Rights