|
To get the # of Files you’ll need a
FileSystem Object and a Folder Object Dim fsObj As New
FileSystemObject Dim fldObj As Folder
'-------------------------------------------------- 'Create the file system
object and get the folder
On Error GoTo ErrHandle
'--------------------------------------------------
Set fldObj = fsObj.GetFolder("c:\Windows")
MsgBox fldObj.Files.Count
GoTo CleanUp ErrHandle: MsgBox Err.Description,
vbInformation, "Unexpected Error" CleanUp: Set fsObj = Nothing Set fldObj = Nothing From:
[EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] On Behalf Of Bates, Bradley M. I'm not sure if you found a resolution to
this, but I believe the problem is ... Key
"{+END}" ... should read ... Key
"+{END}" -----Original Message----- I can't
get the following to highlight the character string so that the
delete will delete the whole string not just the first character
... (OS is Windows 2000/ Service Pack 4, latest BostonWorkStation
7.0 if that might make a difference!). Key
"{HOME}" Key
"{+END}" Key
"{DELETE}" I'm
also wondering how, when using FileSystemObject code (which I had tremendous
help in setting up!!!), to get a count of the number of files in the
folder ??? thanx
in advance!!!, sherry HCA 816/823-0406 |
- [Talk] Blocking and Deleting Text in a Windows Text Box Mitchell, Sherry
- RE: [Talk] Blocking and Deleting Text in a Windows ... Corinna
- RE: [Talk] Blocking and Deleting Text in a Windows ... Mitchell, Sherry
- RE: [Talk] Blocking and Deleting Text in a Windows ... Angela LaVasser
- RE: [Talk] Blocking and Deleting Text in a Windows ... Angela LaVasser
- RE: [Talk] Blocking and Deleting Text in a Windows ... David Shelby
- RE: [Talk] Blocking and Deleting Text in a Windows ... Bates, Bradley M.
- mark albertson
