Dim val As Integer
Dim cmd As New SQLCommand
cmd.C
cmd.CommandText = "declare @p2 int exec GetICMaxNum 'POrequest',@p2 output,1,16394 select @p2 as 内码 "
val = cmd.ExecuteScalar()
Tables("porequest").AddNew
Tables("porequest").Current("fbrno") = 0
Tables("porequest").Current("finterid") = Val
这个代码执行后，只会 新增一行 ，但fbrno,finterid 的值没办法写进去
但如果代码改成Dim val As Integer
Dim cmd As New SQLCommand
cmd.C
cmd.CommandText = "declare @p2 int exec GetICMaxNum 'POrequest',@p2 output,1,16394 select @p2 INSERT INTO PORequest ([FBrNo],[FInterID]) VALUES ('0',@p2) "
val = cmd.ExecuteScalar()
DataTables("porequest").LoadFilter=""
DataTables("porequest").Load
就能正确执行，请高手解释一下，如何才能使用第一段代码
[此贴子已经被作者于2015/12/15 9:20:35编辑过]
加好友 
发短信
Post By：2015/12/15 9:14:00 [显示全部帖子]
