7 lines
165 B
Plaintext
7 lines
165 B
Plaintext
Dim vprglist : Set vprglist = CreateObject("System.Collections.ArrayList")
|
|
...
|
|
If vprogram.LastRunTime = "" Then
|
|
vprglist.Add vprogram.FullName
|
|
i = i + 1
|
|
End If
|