Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim filepath As String = Server.MapPath("file/" & Path.GetFileName(file1.PostedFile.FileName))
If (T1.Text <> "") And (T2.Text <> "") And (T3.Text <> "") And (file1.Value <> "") Then
T3.Text = filepath
Dim myconnection As New OleDbConnection("provider=microsoft.jet.oledb.4.0;data source=" & Server.MapPath("new.mdb"))
file1.PostedFile.SaveAs(filepath)
Dim mycommand2 As New OleDbCommand("insert into aa(biaoti,neirong,zuozhe,img) values ('" & Trim(T1.Text) & "', '" & Trim(T2.Text) & "','" & Trim(T3.Text) & "','" & Trim(Path.GetFileName(file1.PostedFile.FileName)) & "')", myconnection)
myconnection.Open()
mycommand2.ExecuteNonQuery()
myconnection.Close()
End If
End Sub
End Class
异常详细信息: System.UnauthorizedAccessException: 对路径“c:\inetpub\wwwroot\WebApplication1\新闻1\file\样品.jpg”的访问被拒绝。 ASP.NET 未被授权访问所请求的资源。请考虑授予 ASP.NET 请求标识访问此资源的权限。ASP.NET 有一个在应用程序没有模拟时使用的基进程标识(通常，在 IIS 5 上为 {MACHINE}\ASPNET，在 IIS 6 上为网络服务)。如果应用程序正在通过 <identity impersonate="true"/> 模拟，则标识将为匿名用户(通常为 IUSR_MACHINENAME)或经过身份验证的请求用户。 若要授予 ASP.NET 对文件的写访问权，请在资源管理器中右击该文件，选择“属性”，然后选择“安全”选项卡。单击“添加”添加适当的用户或组。突出显示 ASP.NET 帐户，选中所需访问权限对应的框。源错误:
行 57： T3.Text = filepath
行 58： Dim myconnection As New OleDbConnection("provider=microsoft.jet.oledb.4.0;data source=" & Server.MapPath("new.mdb"))
行 59： file1.PostedFile.SaveAs(filepath)
行 60： Dim mycommand2 As New OleDbCommand("insert into aa(biaoti,neirong,zuozhe,img) values ('" & Trim(T1.Text) & "', '" & Trim(T2.Text) & "','" & Trim(T3.Text) & "','" & Trim(Path.GetFileName(file1.PostedFile.FileName)) & "')", myconnection)
行 61： myconnection.Open()
源文件: c:\inetpub\wwwroot\WebApplication1\新闻1\addnews.aspx.vb 行: 59 我是初学者,不知问题出在哪里,请各位大虾指教
Dim filepath As String = Server.MapPath("file/" & Path.GetFileName(file1.PostedFile.FileName))
If (T1.Text <> "") And (T2.Text <> "") And (T3.Text <> "") And (file1.Value <> "") Then
T3.Text = filepath
Dim myconnection As New OleDbConnection("provider=microsoft.jet.oledb.4.0;data source=" & Server.MapPath("new.mdb"))
file1.PostedFile.SaveAs(filepath)
Dim mycommand2 As New OleDbCommand("insert into aa(biaoti,neirong,zuozhe,img) values ('" & Trim(T1.Text) & "', '" & Trim(T2.Text) & "','" & Trim(T3.Text) & "','" & Trim(Path.GetFileName(file1.PostedFile.FileName)) & "')", myconnection)
myconnection.Open()
mycommand2.ExecuteNonQuery()
myconnection.Close()
End If
End Sub
End Class
异常详细信息: System.UnauthorizedAccessException: 对路径“c:\inetpub\wwwroot\WebApplication1\新闻1\file\样品.jpg”的访问被拒绝。 ASP.NET 未被授权访问所请求的资源。请考虑授予 ASP.NET 请求标识访问此资源的权限。ASP.NET 有一个在应用程序没有模拟时使用的基进程标识(通常，在 IIS 5 上为 {MACHINE}\ASPNET，在 IIS 6 上为网络服务)。如果应用程序正在通过 <identity impersonate="true"/> 模拟，则标识将为匿名用户(通常为 IUSR_MACHINENAME)或经过身份验证的请求用户。 若要授予 ASP.NET 对文件的写访问权，请在资源管理器中右击该文件，选择“属性”，然后选择“安全”选项卡。单击“添加”添加适当的用户或组。突出显示 ASP.NET 帐户，选中所需访问权限对应的框。源错误:
行 57： T3.Text = filepath
行 58： Dim myconnection As New OleDbConnection("provider=microsoft.jet.oledb.4.0;data source=" & Server.MapPath("new.mdb"))
行 59： file1.PostedFile.SaveAs(filepath)
行 60： Dim mycommand2 As New OleDbCommand("insert into aa(biaoti,neirong,zuozhe,img) values ('" & Trim(T1.Text) & "', '" & Trim(T2.Text) & "','" & Trim(T3.Text) & "','" & Trim(Path.GetFileName(file1.PostedFile.FileName)) & "')", myconnection)
行 61： myconnection.Open()
源文件: c:\inetpub\wwwroot\WebApplication1\新闻1\addnews.aspx.vb 行: 59 我是初学者,不知问题出在哪里,请各位大虾指教
若要授予 ASP.NET 对文件的写访问权，请在资源管理器中右击该文件，选择“属性”，然后选择“安全”选项卡。单击“添加”添加适当的用户或组。突出显示 ASP.NET 帐户，选中所需访问权限对应的框。