226 Part IV: Classes
msg = msg & vbcrlf & "CSCreationClassName: " & .CSCreationClassName
msg = msg & vbcrlf & "CSName: " & .CSName
msg = msg & vbcrlf & "Description: " & .Description
msg = msg & vbcrlf & "Drive: " & .Drive
msg = msg & vbcrlf & "EightDotThreeFileName: " & .EightDotThreeFileName
msg = msg & vbcrlf & "Encrypted: " & .Encrypted
msg = msg & vbcrlf & "EncryptionMethod:"&.EncryptionMethod
msg = msg & vbcrlf & "Extension: " & .Extension
msg = msg & vbcrlf & "FileName:"&.FileName
msg = msg & vbcrlf & "FileSize:"&.FileSize
msg = msg & vbcrlf & "FileType:"&.FileType
msg = msg & vbcrlf & "FSCreationClassName: " & .FSCreationClassName
msg = msg & vbcrlf & "FSName: " & .FSName
msg = msg & vbcrlf & "Hidden: " & .Hidden
msg ...