Foro de elhacker.net

Programación => .NET (C#, VB.NET, ASP) => Mensaje iniciado por: santillanjl en 29 Agosto 2022, 23:27 pm



Título: Saludos Ayuda con función demorosa
Publicado por: santillanjl en 29 Agosto 2022, 23:27 pm
Buenas tardes,
Su ayuda en un programa desarrollado en vb.net para windows net.framework 4.5.2 estoy usando la función File.Exists, pero la primera vez que carga, demora demasiado, 3 a 5 minutos sin dar respuesta, las siguientes no tarda nada.

        Dim pUbicacion As String = tbLocales.Rows(cbLocales.SelectedIndex).Item(2).ToString
        If Not File.Exists(pUbicacion) Then
            MsgBox("No exixte el archivo: " & pUbicacion)
            Exit Sub
        End If

        Dim Reader As New Microsoft.VisualBasic.FileIO.TextFieldParser(pUbicacion)

Si me pueden ayudar con alguna idea para no desesperar al usuario


Título: Re: Saludos Ayuda con función demorosa
Publicado por: **Aincrad** en 30 Agosto 2022, 19:52 pm
Buenas tardes,
Su ayuda en un programa desarrollado en vb.net para windows net.framework 4.5.2 estoy usando la función File.Exists, pero la primera vez que carga, demora demasiado, 3 a 5 minutos sin dar respuesta, las siguientes no tarda nada.

        Dim pUbicacion As String = tbLocales.Rows(cbLocales.SelectedIndex).Item(2).ToString
        If Not File.Exists(pUbicacion) Then
            MsgBox("No exixte el archivo: " & pUbicacion)
            Exit Sub
        End If

        Dim Reader As New Microsoft.VisualBasic.FileIO.TextFieldParser(pUbicacion)

Si me pueden ayudar con alguna idea para no desesperar al usuario


Primeramente es imposible que te tarde tanto el verificar si el archivo existe. (A no ser que tengas un disco extremadamente lento o que tenga sectores dañados.)

Segundo, Intenta un Debug.Writeline, en cada linea de codigo , para ver en que parte en especifico esta tardando.