在远程计算机上创建文件夹时出现Access denied
错误
Dim findDirectory = "\\SERVER\D$\AAA"
Dim Y_N = System.IO.Directory.Exists(findDirectory)
If Y_N = True Then
Else
Directory.CreateDirectory(findDirectory)
End If
Dim MyFilename = findDirectory & "\" & Today.Day & "-" &
Today.Month & "-" & Today.Year & "-" & tineNow & "-" & Today.Minute & ".wav"
FileCopy("\\SERVER\D$\AAA\test.wav", MyFilename1)