Миграция приложения с IIS 8.5 (Win Server 2012 R2) на IIS 10 (Win Server 2016) с проблемой страницы ASP.NET и кода VB.NET - PullRequest
Новая
       64

Миграция приложения с IIS 8.5 (Win Server 2012 R2) на IIS 10 (Win Server 2016) с проблемой страницы ASP.NET и кода VB.NET

0 голосов
/ 23 января 2019

Я везде искал совет, но ничего не нашел :( Моя проблема находится на странице приложения ASP.NET, созданного с кодом VB.NET , после перехода с Windows.Server 2012 R2 с IIS 8.5 до Windows Server 2016 с IIS10 только эта страница выдает ошибку при просмотре в сети.

Когда я запускаю тест, выполняя "Просмотр"из IIS не проблема. Я пришел к выводу, что в коде страницы (о котором я сообщаю ниже) есть строка, которая больше не распознается IIS10 по соображениям безопасности.

Можете ли вы сказать мне, если вы заметили что-то странное? Я сообщаю ниже подробности ошибки, сообщенной EVENT VIEWER, кажется, что ошибка в строке 28

ОШИБКА ПРОСМОТРА СОБЫТИЙ:

Информация об исключении: Тип исключения: IOException Сообщение об исключении: Указанный сервер не может выполнить запрошенную операцию.

в System.IO.__Error.WinIOError (Int32 errorCode, String MaybeFullPath) в System.IO.FileSystemEnumerableIterator 1.CommonInit () в System.IO.FileSystemEnumerableIterator 1..ctor (строковый путь, строковый originalUserPath, строковый searchPattern, искомый искатель поиска поиска, поиск и поиск поиска, поиск).checkHost) в System.IO.DirectoryInfo.InternalGetFiles (String searchPattern, SearchOption searchOption) в it_prod_ship_xmlparser_it.Page_Load (Отправитель объекта, EventArgs e) в C: \ inetpub \ wwwroot \ drivetools \ it \ prod \ ship \ xbpar.xстрока 28 в System.Web.UI.Control.OnLoad (EventArgs e) в System.Web.UI.Control.LoadRecursive () в System.Web.UI.Page.ProcessRequestMain (логическое значение includeStagesBeforeAsyncPoint, логическое значение includeStagesAfterAsyncPoint)

* 
Imports System.Data
Imports System.Linq
Imports System.Xml.Linq
Imports System.IO
Imports System.Xml
Imports System.Data.SqlClient
Imports System.Net
Imports System.Security.Principal
Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.Shared
Imports System.Security
Imports System.Text
Imports System.Security.Cryptography
Imports System.Drawing

Partial Class it_prod_ship_xmlparser_it
Inherits System.Web.UI.Page

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
    If Not Page.IsPostBack Then
        Session("utente") = UCase(funzioni.usr)
        If Session("utente") = "ITXXXXXX" Or Session("utente") = "ITXXXXXX" Then
            btnXML.Enabled = False : btnBart.Enabled = False : btnTrackC.Enabled = False
            btnLbl.Enabled = False : btnTel.Enabled = False : btnTrack.Enabled = False
            AsyncFileUpload1.Enabled = False : gvXML.Enabled = False
        End If
        Dim folder As New DirectoryInfo("\\servercompany.it.company\drivefiles\xmlfiles")
        Dim listfile As FileInfo() = folder.GetFiles("*.xml")
        If listfile.Length = 0 Then
            btnXML.Enabled = False
        Else
            Dim fsize As Double = 0
            For Each f As FileInfo In listfile
                fsize += f.Length
            Next
            btnXML.Text = "Importa (" & listfile.Length & " - " & Math.Round(fsize / 1024 / 1000, 1) & " Mb)"
        End If

    End If

End Sub

Заранее благодарим за всю информацию, которую вы можете дать мне

...