Thêm bớt đường dẫn trong biến môi trường
Xem bai viet bang font ABC

PCWorld VN 2/99

    Dưới đây là file BATCH tên là sp.bat có khả năng thêm bớt đường dẫn trong biến môi trường. Để chạy file BATCH đúng, bạn đặt nó cùng với hai file BATCH phụ tên là _sp1.bat và _sp2.bat vào chung thư mục C:\BAT đã nằm sẵn trong đường dẫn. Chẳng hạn trong file AUTOEXEC.BAT nằm ở ổ C:\ bạn có thể khai báo thêm dòng lệnh: set PATH=c:\bat; %PATH% ở cuối file.

    SP.BAT có khả năng cộng thêm hay loại bỏ một hay nhiều thư mục cùng lúc trong đường dẫn. Một khả năng thú vị của nó là tự động lược bỏ những thư mục trùng lặp ở vị trí bất kỳ trong đường dẫn.

    Chẳng hạn nếu hiện tại đường dẫn trong hệ thống là: c:\bat;c:\tools;c:\nu thì:

-1 Sau khi gõ lệnh sp c:\tools;c:\nu95 thì đường dẫn mới sẽ là c:\tools;c:\nu95; c:\bat;c:\nu, chứ không phải làc:\tools;c:\nu95;c:\bat; c:\tools;c:\nu

-2 Kế tiếp, sau khi gõ lệnh sp - c:\nu95;c:\nu thì đường dẫn sẽ chỉ còn c:\tools;c:\bat

    Điều rắc rối duy nhất là sau khi tối ưu các dòng lệnh thì tôi không tài nào giải thích cặn kẽ ý nghĩa của từng dòng lệnh nữa! Các bạn hãy thử tài xem. Tuy nhiên có điều chắc chắn là nó chạy rất ... tốt.

    Trước khi SP.BAT cộng thêm đường dẫn mới, bạn có thể dùng lệnh kiểm tra xem nó có thật trên đĩa cứng không bằng lệnh if [not] exist d:\thumuc\nul.

    Vậy bạn hãy thử cải tiến SP.BAT xem.

============
SP.BAT
============
@echo off
if x%1==x goto 2
set gg=%1
set g=%1
:1
shift
set g=%1;%g%
if not x%1==x goto 1
c:\bat\_sp1 %g%
:2
echo Sets a search path for executable files.
echo SP [-] [[drive:]path[;...]]
============
_SP1.BAT
============
:1
path %1;%path%
call c:\bat\_sp2 %path%
shift
if not x%1==x goto 1
set gg=
set g=
===========
_SP2.BAT
===========
set g=%1
if x%gg%==x- goto sub
:add
set path=%1
:getdir
shift
if x%1==x goto ret
if not x%g%==x%1 set path=%path%;%1
goto getdir
:sub
shift
if x%1==x%g% goto sub
goto add
:ret

Lê Hoàng, TP. HCM


LeHoanPc 1996 - 2001
Mirror 1
: http://www.tlnet.com.vn/weblh/
Mirror 2: http://www.hcmpt.vnn.vn/co/weblh/
Mirror 3: http://www.lehoan.andi.vn/