Dim formatteddate As String formatteddate = DateTime.Now.ToString("MMM" & "-" & "dd" & "-" & "yyyy" & "-" & "HHmm" & "-" & "ss") Dim Filetosave As String = "save recsound " & ("\\bsppd4wiswalld" & "\Recordings" & "\" & formatteddate & ".wav") mciSendString(Filetosave, "", 0, 0)
System.IO.File.SetAttributes(Filetosave, IO.FileAttributes.ReadOnly)
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)