*This code may help. *Public Sub Form_Open() Dim sPath As String = User.Home &/ "Desktop" Dim sFileList As String[] Dim sTemp As String Dim stStat As Stat sFileList = Dir(sPath) For Each sTemp In sFileList stStat = Stat(sPath &/ sTemp) Print sTemp & Space(50 - Len(sTemp)) & " Last Modified " & stStat.LastModified & " - Size " & stStat.Size & " bytes" Next End
-- View this message in context: http://gambas.8142.n7.nabble.com/Size-Multiple-Files-with-FileProperties-tp55443p55458.html Sent from the gambas-user mailing list archive at Nabble.com. ------------------------------------------------------------------------------ Site24x7 APM Insight: Get Deep Visibility into Application Performance APM + Mobile APM + RUM: Monitor 3 App instances at just $35/Month Monitor end-to-end web transactions and take corrective actions now Troubleshoot faster and improve end-user experience. Signup Now! http://pubads.g.doubleclick.net/gampad/clk?id=272487151&iu=/4140 _______________________________________________ Gambas-user mailing list Gambas-user@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/gambas-user
