4200 - SQL0104 - 令牌无效
4200 - SQL0104 - Token was not valid
ERROR [42000] [IBM][System i Access ODBC Driver][DB2 for i5/OS]SQL0104
- Token ( was not valid. Valid tokens: FOR USE SKIP WAIT WITH FETCH ORDER UNION EXCEPT OPTIMIZE.
这是我的代码,我想将 Table 记录显示到来自 AS400VB 的数据网格视图
Sub ShowAS400()
Call takeconnectionas400()
conn.Close()
conn.Open()
adapter = New OdbcDataAdapter("select * from PYLEAVE (PTMIFLIB)", conn)
ds = New DataSet
adapter.Fill(ds, "PYLEAVE (PTMIFLIB)")
DGVAS400.DataSource = ds.Tables("PYLEAVE (PTMIFLIB)")
DGVAS400.ReadOnly = True
End Sub
尝试像这样修改您的查询
select * from PTMIFLIB.PYLEAVE
或者像这样
select * from PTMIFLIB/PYLEAVE
ERROR [42000] [IBM][System i Access ODBC Driver][DB2 for i5/OS]SQL0104 - Token ( was not valid. Valid tokens: FOR USE SKIP WAIT WITH FETCH ORDER UNION EXCEPT OPTIMIZE.
这是我的代码,我想将 Table 记录显示到来自 AS400VB 的数据网格视图
Sub ShowAS400()
Call takeconnectionas400()
conn.Close()
conn.Open()
adapter = New OdbcDataAdapter("select * from PYLEAVE (PTMIFLIB)", conn)
ds = New DataSet
adapter.Fill(ds, "PYLEAVE (PTMIFLIB)")
DGVAS400.DataSource = ds.Tables("PYLEAVE (PTMIFLIB)")
DGVAS400.ReadOnly = True
End Sub
尝试像这样修改您的查询
select * from PTMIFLIB.PYLEAVE
或者像这样
select * from PTMIFLIB/PYLEAVE