ОБНОВЛЕНИЕ >>>> Если я запускаю это на локальном хосте, их нет дублирования данных, но на сайте есть.Помогает ли это людям дать представление о том, что может происходить?
У меня есть приложение, созданное кем-то другим, которое возвращает результаты от вызова сокета, когда конечный пользовательнабирает небольшую информацию о продукте, и хиты отправить.Приложение возвращает результаты, но иногда отображает результаты дважды.Например, если я щелкну «Отправить» в приложении, чтобы выполнить поиск продукта, он может вернуться с правильной одной, двумя или тремя записями (так как могут быть результаты из 1-3 местоположений), или он может повторить всеэти результаты дважды.(То есть, если было возвращено две записи, он может просто отображать информацию из двух записей или результаты двух записей в первых двух строках, а затем повторять строки 1 и 2 в строках 3& 4.) Продолжение нажатия кнопки «Отправить» на этой странице приведет к изменению (отображается случайным образом) результирующих отображаемых данных - циклически переключаясь между одним набором результатов и двумя.
Есть идеи о том, что может быть причиной этого?Я включил немного кода, который, я думаю, задействован.Я унаследовал этот код и пытаюсь заставить его работать, но я новичок в этом типе приложений и только в промежуточном звене в asp.net.Заранее спасибо всем, кто может пролить свет!
Protected Sub displayTableOne(ByVal records() As String)
Dim dt As New DataTable()
Dim values() As String = {""}
Dim i As Integer = 0
Try
Dim Row() As String = {"Company", "Piece", "Description", _
"Location", "Available", "Purchased", "Ship Date"}
#Create the columns
Dim column1 As New DataColumn("Company", GetType(String))
Dim column2 As New DataColumn("Piece", GetType(String))
Dim column3 As New DataColumn("Description", GetType(String))
Dim column4 As New DataColumn("Location", GetType(String))
Dim column5 As New DataColumn("Available", GetType(String))
Dim column6 As New DataColumn("Purchased", GetType(String))
Dim column7 As New DataColumn("Ship Date", GetType(String))
dt.Columns.Add(column1)
dt.Columns.Add(column2)
dt.Columns.Add(column3)
dt.Columns.Add(column4)
dt.Columns.Add(column5)
dt.Columns.Add(column6)
dt.Columns.Add(column7)
If (records.Length > 1) Then
For i = 0 To records.Length - 2 Step 1
values = Split(records(i), "|")
Dim l As Integer = 0
Dim dr As DataRow
dr = dt.NewRow()
If values(0) = "05" Then
If (values.Length > 4) Then
dr(Row(0)) = values(1)
dr(Row(1)) = values(2)
dr(Row(2)) = values(13)
dr(Row(3)) = values(17)
dr(Row(4)) = values(7)
dr(Row(5)) = values(15)
dr(Row(6)) = values(16)
End If
dt.Rows.Add(dr)
End If
Next
If values(23) = "Error" Then
invalidMessage()
Else
#Bind the DataTable to the DataGrid
Table1.Visible = True
Table1.DataSource = dt
Table1.DataBind()
End If
End If
Catch ex As Exception
invalidMessage()
Finally
Array.Clear(records, 0, records.Length)
Array.Clear(values, 0, values.Length)
End Try
End Sub