Tin học
Bạn có muốn phản ứng với tin nhắn này? Vui lòng đăng ký diễn đàn trong một vài cú nhấp chuột hoặc đăng nhập để tiếp tục.

Trong Linux, so sánh Soft Link vớI Hard Link và trình bày cách tạo lập.

Go down

Trong Linux, so sánh Soft Link vớI Hard Link và trình bày cách tạo lập. Empty Trong Linux, so sánh Soft Link vớI Hard Link và trình bày cách tạo lập.

Bài gửi  lethaibaochau 16/5/2009, 11:21

Liên kết tắt mềm (Soft Link):

- Nhập tập tin .LNK trong Windows.
- Lệnh tạo lập:
$ ln -s /bin mybin
$ ls -l mybin
lrwxrwxrwx 1 mk books 9 May 23 16:14 mybin->/bin
$ ln -s /bin/calculator.exe /programs/calc
$ /programs/calc

-Cách tạo lập: (Admin: Những đoạn code viết bằng VB dưới đây chỉ dùng được với Windows !)
Dim WSHShell
Set WSHShell = WScript.CreateObject("WScript.Shell")
Dim MyShortcut, MyDesktop, DesktopPath
DesktopPath = WSHShell.SpecialFolders("Desktop")
Set MyShortcut =
WSHShell.CreateShortcut(DesktopPath & "\Shortcut to notepad.lnk")
MyShortcut.TargetPath = WSHShell.ExpandEnvironmentStrings("%windir%\notepad.exe")
MyShortcut.WorkingDirectory = WSHShell.ExpandEnvironmentStrings("%windir%")
MyShortcut.WindowStyle = 4
MyShortcut.IconLocation = WSHShell.ExpandEnvironmentStrings("%windir%\notepad.exe, 0")
MyShortcut.Save
WScript.Echo "A shortcut to Notepad now exists on your Desktop."

-Liên kết tắt cứng (Hard Link):
- Khônh có khái niệm tương đương trong Win 9X.
- Lệnh tạo lập:
$ cat >testfile
Cong Hoa Xa Hoi Chu Nghia Viet Nam
Doc lap - Tu do - Hanh phuc
^[
$ ls -l test*
-rw-rw-r-- 1 mk books 50 May 13 18:30 testfile
$ ln testfile test1
$ ls -l test*
-rw-rw-r-- 2 mk books 50 May 13 20:41 test1
-rw-rw-r-- 2 mk books 50 May 13 18:30 testfile
$ ln testfile test2 hoặc ln test1 test2
$ ls -l test*
-rw-rw-r-- 3 mk books 50 May 13 20:41 test1
-rw-rw-r-- 3 mk books 50 May 13 20:46 test2
-rw-rw-r-- 3 mk books 50 May 13 18:30 testfile
$ rm testfile test1
$ ls -l test*
-rw-rw-r-- 1 mk books 50 May 13 20:46 test2
$ cat test2
Cong Hoa Xa Hoi Chu Nghia Viet Nam
Doc lap - Tu do - Hanh phuc

-Cách tạo lập:
Public Declare Function CreateHardLink Lib "kernel32.dll"
Alias "CreateHardLinkA" (ByVal lpFileName As String,
ByVal lpExistingFileName As String,
ByRef lpSecurityAttributes As Any) As Long
Private Sub CreateHardLinkTest()
Dim s As String
Open "c:\test1.tst" For Output As #1
Print #1, "Hello ";
Close #1
CreateHardLink "c:\test2.tst", "c:\test1.tst", ByVal 0&
Open "c:\test2.tst" For Append As #1
Print #1, "World !"
Close #1
s = String(FileLen("c:\test2.tst"), 0)
Open "c:\test1.tst" For Binary As #1
Get #1, , s
Close #1
MsgBox s
Kill "c:\test1.tst"
Kill "c:\test2.tst"
End Sub

lethaibaochau

Tổng số bài gửi : 40
Join date : 23/04/2009

Về Đầu Trang Go down

Về Đầu Trang

- Similar topics

 
Permissions in this forum:
Bạn không có quyền trả lời bài viết