私のコードでは、ストリームライターを使用してファイルを開いたり作成したり、ファイルに書き込んだりしています。これはデバッグ モードでは問題なく動作しますが、実行可能ファイルを実行すると「アクセス許可が拒否されました」というエラーが表示されます。これが問題のコードです。
Left out part of the code in first post, here's the correct snippet:
Dim DateOfTest As Date
Dim TesterName As String
Dim SerialNumber As String
TesterName = TextBoxTester.Text
DateOfTest = Now
SerialNumber = TextBoxBoardSN.Text
'File writing for test info
Dim path As String = "C:\" & SerialNumber & ".txt"
If File.Exists(path) Then
File.Delete(path)
End If
' Create the file.
Dim writer As StreamWriter = New StreamWriter(path)
writer.WriteLine("CPX Loopback Test " & vbCrLf)
writer.WriteLine("Serial Number " & vbTab & "Tester Name" & vbTab & "Date")
writer.WriteLine(SerialNumber & vbTab & vbTab & TesterName & vbTab & vbTab & DateOfTest & vbCrLf)