progressbarr avec database

Question

Bonjour, 
voici le code de mon app

 Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        If t >= 100 Then
            Timer1.Stop()
            Exit Sub
        End If
        second = second + 1
        ProgressBar1.Value = t
        t += 1

    End Sub
    Sub progress()
        Timer1.Interval = 1000
        Timer1.Start() 'Timer starts functioning
        ' ProgressBar1.Minimum = 0
        ' ProgressBar1.Maximum = 200
    End Sub


mais lors que je click sur la cmd pour lire le data base le progressbarr ne fonctionne pas ...

mais si je click dans une autre btn qui ne fait pas la lecture dans le database tout est ok... que faire ?

Dim d As String = CDate(DateTimePicker1.Value).ToString("MM/dd/yyyy")
            Dim table As String = "MSC_" & Replace(d, "/", "")
            Dim querytable As String = "use E_DW "
            querytable += "SELECT * FROM INFORMATION_SCHEMA.TABLES"
            querytable += " WHERE TABLE_TYPE='BASE TABLE'  AND TABLE_NAME='" & table & "' "
            Dim cmdvery As SqlCommand = New SqlCommand(querytable, connection)
            Dim datareader As SqlDataReader
            datareader = cmdvery.ExecuteReader
            'datareader.Read()
            If datareader.HasRows = True Then
                ' MsgBox(datareader.HasRows).ToString()
            Else
                MsgBox("E_DW_dbo." & table & " Not Exist...")
                Return
            End If
            datareader.Close()
            cmdvery.Dispose()

            progress()
....

ucfoutu · Answer

Bonjour,
Et donc ===>>> ta procédure progress n'est appelée qu'une fois fermée la connexion. Ta "démarche" est "étonnante" !
 
________________________
Nul ne saurait valablement coder ce qu'il ne saurait exposer clairement.

Progressbarr avec database

1 réponse

Votre réponse

Discussions similaires