私はプログラマーではありません。同じテーブルから情報を取得するために非常に基本的なクエリが必要なだけです (したがって、プログラムで使用する必要があるのは SELECT ステートメントだけです)。
私は試します
SELECT INFOR.PFAC , INFOR.PPAR FROM MAINSYSTEM.INFOR INFOR WHERE ppar = '240XXX2A'
iSeriesからのデータ転送を使用すると、速度が非常に速くなりますが、値を返すのに3分ほどかかります。クエリを高速化する方法はありますか?
接続して使っDriver={Client Access ODBC Driver (32-bit)}
ています。
ボタンを押すとボタンがあり、データを取得してgridViewに表示します
Dim MyODBCConnection As New Odbc.OdbcConnection("Driver={Client Access ODBC Driver (32-bit)};" & _
"System=163.201.28.55 ;Default Collection=bpcshv81.PEXPLOSNA;")
'Open the connection
MyODBCConnection.Open()
Dim Table_BOM As New DataTable
Dim Table_BOM_Fill As New Odbc.OdbcDataAdapter("SELECT PEXPLOSNA.PFAC , PEXPLOSNA.PPAR FROM MAINSYSTEM.INFOR PEXPLOSNA WHERE ppar = '240XXX2A'", MyODBCConnection)
Table_BOM_Fill.Fill(Table_BOM)
DataGridView1.DataSource = Table_BOM