Mình đang làm một chương trình nhỏ để quản lý văn thư. Mình xin hỏi đoạn code để xóa một file văn bản (word, excel, pdf...) bằng đường dẫn đã lưu trong data. Xin các pro chỉ giáo.

(27-11-12, 05:28 PM)duyliem2222 Đã viết: Mình đang làm một chương trình nhỏ để quản lý văn thư. Mình xin hỏi đoạn code để xóa một file văn bản (word, excel, pdf...) bằng đường dẫn đã lưu trong data. Xin các pro chỉ giáo.

Xóa là xóa thế nào? Xóa đường dẫn đã lưu trong Data hay xóa hẳn file đó trong ổ đĩa rồi quăng vào thùng rác?

Xóa file văn thư vào thùng rác. Hoặc nếu có thể thì có thể cho tùy chọn là xóa lun hay xóa vào thùng rác dc ko bạn?

(27-11-12, 05:49 PM)duyliem2222 Đã viết: Xóa file văn thư vào thùng rác. Hoặc nếu có thể thì có thể cho tùy chọn là xóa lun hay xóa vào thùng rác dc ko bạn?

Xoá 1 file Excel hoặc ...
Kill "D:\thunghiem\Book1.xls"
Xoá nhiều file trên 1 Folder
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.NameSpace("D:\thunghiem")
Set colItems = objFolder.Items
For Each objItem In colItems

objItem.InvokeVerbEx ("Delete")
Next
Tuỳ biến nhé!
Nếu muốn xoá vào thùng rác thì dùng code thứ 2 cũng di chuyển vào thùng rác lun đó.

(27-11-12, 09:54 PM)trungn077 Đã viết: Xoá 1 file Excel hoặc ...
Kill "D:\thunghiem\Book1.xls"
Xoá nhiều file trên 1 Folder
Set objShell = CreateObject("Shell.Application")
Set objFolder = objShell.NameSpace("D:\thunghiem")
Set colItems = objFolder.Items
For Each objItem In colItems

objItem.InvokeVerbEx ("Delete")
Next
Tuỳ biến nhé!
Nếu muốn xoá vào thùng rác thì dùng code thứ 2 cũng di chuyển vào thùng rác lun đó.

Cám ơn bạn.