Salve, utilizzo quiesto codice per visualizzare in dei text box i valori di una tabella, per poi eseguire delle update, come mai però ogni volta che avvio la pagina i text box contengono sempre valore 1 anche se nei campi del db i valori sono diversi? Grazie


connection = New OleDbConnection
Dim connectionString As String = "Data Source= " & Server.MapPath("~/mdb-database/Fantacalcio.mdb") & " ;Provider=Microsoft.Jet.OLEDB.4.0;"
connection.ConnectionString() = connectionString
connection.Open()
Dim command As New OleDbCommand
command.Connection() = connection
command.CommandText() = "Select * From CalssificA "
Dim reader As OleDbDataReader = command.ExecuteReader()
If Not Page.IsPostBack Then
While reader.Read()

If VarType(reader("Pt")) <> 1 Then
nataTextBox.Text = reader("Pt")
ncagTextBox.Text = reader("Pt")
ncatTextBox.Text = reader("Pt")
nempTextBox.Text = reader("Pt")
nfioTextBox.Text = reader("Pt")
ngenTextBox.Text = reader("Pt")
nintTextBox.Text = reader("Pt")
njuTextBox.Text = reader("Pt")
nlazTextBox.Text = reader("Pt")
nlivTextBox.Text = reader("Pt")
nmilTextBox.Text = reader("Pt")
nnapTextBox.Text = reader("Pt")
npalTextBox.Text = reader("Pt")
nparTextBox.Text = reader("Pt")
nregTextBox.Text = reader("Pt")
nromTextBox.Text = reader("Pt")
nsieTextBox.Text = reader("Pt")
nsampTextBox.Text = reader("Pt")
ntorTextBox.Text = reader("Pt")
nudiTextBox.Text = reader("Pt")

End If
End While
End If