+- Sinisterly (https://sinister.ly)
+-- Forum: Coding (https://sinister.ly/Forum-Coding)
+--- Forum: Visual Basic & .NET Framework (https://sinister.ly/Forum-Visual-Basic-NET-Framework)
+--- Thread: [vb6] New_FileLen (/Thread-vb6-New-FileLen)
[vb6] New_FileLen - sylar - 08-24-2012
written by me / FileLen replacement
Code:
Public Function New_FileLen(ByVal FilePath As String) As Long
New_FileLen = Invoke("msvbvm60", "rtcFileLen", (StrPtr(FilePath)))
End Function