mirror of https://github.com/tongzx/nt5src
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
16 lines
307 B
16 lines
307 B
Attribute VB_Name = "Module1"
|
|
Public IExplorer As InternetExplorer
|
|
|
|
Public Sub EmptyFolderList()
|
|
For i = 1 To FolderList.Count
|
|
FolderList.Remove 1
|
|
Next i
|
|
|
|
End Sub
|
|
|
|
Public Sub EmptyFolderItemList()
|
|
For i = 1 To FolderItemList.Count
|
|
FolderItemList.Remove 1
|
|
Next i
|
|
|
|
End Sub
|