Imports System.IO
Public Class IsAccess
Public Shared Function IsAccessAble(ByVal path As String) As Boolean
Dim fs As FileStream = Nothing
Try
fs = New FileStream(path, FileMode.Open, FileAccess.ReadWrite, FileShare.None)
Catch __unusedIOException1__ As IOException
Return False
Finally
If fs IsNot Nothing Then
fs.Close()
End If
End Try
Return True
End Function
End Class
'VB.net' 카테고리의 다른 글
richtexbox 단어찾고 자동 스크롤 (0) | 2020.01.21 |
---|---|
Windows Update History 가져오기 (0) | 2019.12.09 |
CMD에 원하는명령어를 보내자. (0) | 2019.12.09 |
에러 발생 시 문자 발송하는 로직(URL이용) (0) | 2019.12.04 |
RadGridView 컨트롤 색상변경 예제 (0) | 2019.12.04 |