System.Security.SecurityException：私のアプリケーションは、リモートマシン上で表示されているときに、カレンダー

Question

こんにちはに私はこのエラーメッセージを受信して​​います（インターネット）

セキュリティ例外説明：アプリケーションが許可されていない操作を実行しようとしましたセキュリティポリシーによって保護されます。このアプリケーションに必要な権限を与えるには、システム管理者に連絡するか、設定ファイルのアプリケーションの信頼レベルを変更してください。

例外の詳細：System.Security.SecurityException: Request for the permission of type 'System.Security.Permissions.EnvironmentPermission, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089' failed.

Source Error: 

Line 7:  Dim oBF As New BinaryFormatter() 
Line 8:  Dim oFS As FileStream 
Line 9:  Dim strPath As String = Path.GetTempPath & "schedule.Bin" 
Line 10: 
Line 11:  Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load 


Source File: D:\Hosting\4423045\html\please-god\appointmentscheduler.aspx.vb Line: 9 

スタックトレース：ここ

は、アプリケーションの完全なコードです：

Imports System.IO 
    Imports System.Runtime.Serialization.Formatters.Binary 

    Partial Class appointmentscheduler 
     Inherits System.Web.UI.Page 
     Dim arrCalendar(12, 31) As String 
     Dim oBF As New BinaryFormatter() 
     Dim oFS As FileStream 
     Dim strPath As String = Path.GetTempPath & "schedule.Bin" 

     Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load 
      If (Cache("arrCalendar") Is Nothing) Then 
       If (File.Exists(strPath)) Then 
        oFS = New FileStream(strPath, FileMode.Open) 
        arrCalendar = DirectCast(oBF.Deserialize(oFS), Array) 
        oFS.Close() 
        Cache("arrCalendar") = arrCalendar 
       End If 
      Else 
       arrCalendar = Cache("arrCalendar") 
      End If 
     End Sub 

    Protected Sub btnSave_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnSave.Click 
     arrCalendar(Me.myCalendar.SelectedDate.Month, Me.myCalendar.SelectedDate.Day) = Me.myNotes.Text 
     oFS = New FileStream(strPath, FileMode.Create) 
     oBF.Serialize(oFS, arrCalendar) 
     oFS.Close() 
     Cache("arrCalendar") = arrCalendar 
    End Sub 

    Protected Sub btnDelete_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnDelete.Click 
     arrCalendar(Me.myCalendar.SelectedDate.Month, Me.myCalendar.SelectedDate.Day) = "" 
     oFS = New FileStream(strPath, FileMode.Create) 
     oBF.Serialize(oFS, arrCalendar) 
     oFS.Close() 
     Cache("arrCalendar") = arrCalendar 
     Me.myNotes.Text = "" 
    End Sub 

    Protected Sub myCalendar_DayRender(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DayRenderEventArgs) Handles myCalendar.DayRender 
     If arrCalendar(e.Day.Date.Month, e.Day.Date.Day) <> "" Then 
      e.Cell.BackColor = Drawing.Color.Red 
     End If 
    End Sub 

    Protected Sub myCalendar_SelectionChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles myCalendar.SelectionChanged 
     Me.myNotes.Text = "" 
     If arrCalendar(Me.myCalendar.SelectedDate.Month, Me.myCalendar.SelectedDate.Day) <> "" Then 
      Me.myNotes.Text = arrCalendar(Me.myCalendar.SelectedDate.Month, Me.myCalendar.SelectedDate.Day) 
     End If 
    End Sub 
End Class 

誰かがfixt私を助けることができるか、何を教えて行う。

Answer 1

アプリケーションが実行されているユーザーは、一時フォルダまたは特定のファイル（schedule.Bin）にアクセスできません。

これは、いくつかの助けになることがあります。

How Do I Determine the Security Account that IIS Uses to Run My Web Site?