在網頁有個查詢按鈕去呼叫webservice中的資料
s = New ServiceReference1.ServiceSoapClient()
Dim ds As System.Data.DataSet = s.MD04_Search(UCase(getKey(Me.DDL_IN_MATNR.Text)), UCase(getKey(Me.DDL_IN_WERKS.Text)))
Dim dt As System.Data.DataTable = ds.Tables(0)
'GridView1.Font.Size = FontSize.XXLarge
GridView1.DataSource = dt
Session("TaskTable") = dt
GridView1.Font.Size = FontUnit.Point(12)
GridView1.DataBind()
在webservice頁面
If comm.Connection() = True Then
comm.REMOVEALL()
comm.AddFUNC("ZPORTAL_MD04")
comm.Export("IN_MATNR", _IN_MATNR
Dim TABLE = comm.RetTable("OUT_ITAB")
Dim row_index As Integer
DT = New Data.DataTable("OUT_ITAB")
Dim DAT00 As New Data.DataColumn : DAT00.ColumnName = "DAT00" : DAT00.Caption = "" : DAT00.ReadOnly = True : DT.Columns.Add(DAT00)
For row_index = 1 To TABLE.RowCount()
Dim DR As Data.DataRow
DR = DT.NewRow
DR("DAT00") = TABLE(row_index, "DAT00").ToString()
Next
Else
End If
Dim ds As New DataSet()
ds.Tables.Add(DT)
這里我只寫出DATOO一個欄位，其時不知一個，可以有10來個欄位，假如這里的資料拿的是多張表中的欄位。而已資料量十分大。就一個人訪問就要1分鐘左右。又時還出不來資料，如何改進呢？如果多人同時點擊會等更久最后報SENDOUT超時。。。我設定的是10分鐘。。還是出不來資料，是資料死鎖了呢還是怎么？如何能使多人同時更快的能拿到資料呢？麻煩各位大神，解決的話加分。謝謝
uj5u.com熱心網友回復：
我用finereport的時候查詢功能可以無編碼實作的。。VB的真心復雜，編程量略大。轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/99677.html