Access更新问题,看看有没有朋友遇上过

[mostone]

使用oleDB连接Access97数据库,下面两条执行:
?dbcommon.ExecuteNoQuery("update (select * from vendor where cVenCode=@cVenCode) set cvenname=@cVenName",new OleDbParameter(){new OleDbParameter(commonconst.PARA_CVENCODE,strcode),new OleDbParameter(commonconst.PARA_CVENNAME,strname)},me.objImportConnection,me.objImportTransaction)
1
?dbcommon.ExecuteNoQuery("update vendor set cvenname=@cVenName where cVenCode=@cVenCode",new OleDbParameter(){new OleDbParameter(commonconst.PARA_CVENCODE,strcode),new OleDbParameter(commonconst.PARA_CVENNAME,strname)},me.objImportConnection,me.objImportTransaction)
0

一个返回更新了一条,一个返回更新了零条,怪了说....

[ch00549476]

郁闷中成长 UP

[bitpolar]

写的这么复杂 看不懂艾

[amandag]

这语句看的真累

[lyfer]

NND.ado.net就是麻烦.楼主看看是不是字段类型和写入的值不对

[lyfer]

NND=nai nai de,楼主误会我了

[mostone]

不是NND.ado.net
dbcommon.ExecuteNoQuery是自己写的一个方法
'******************************************************************************
'* 概要 ： 执行SQL,返回影响行数
'* 参数 ： (i)strSQL 查询语句
'* (i)objParas() 参数数组
'* (i)objConn 数据库连接
'* (i)objTran 数据库事务
'* 返回值 ： 影响记录条数
'* 说明 ： 如果没有参数，objParas()请使用Nothing
'* 作成日 ： 2006/05/12
'* 作成者 ：
'******************************************************************************
Public Shared Function ExecuteNoQuery(ByVal strSQL As String, _
ByVal objParas() As OleDbParameter, _
ByVal objConn As OleDbConnection, _
Optional ByVal objTran As OleDbTransaction = Nothing) As Integer
Dim objCommand As OleDbCommand
Dim intRows As Integer

' 创建SelectCommand
objCommand = objConn.CreateCommand()

Try
' 设置查询SQL语句
objCommand.CommandText = strSQL

' 判断参数是否存在
If Not objParas Is Nothing AndAlso objParas.Length > 0 Then
' 如果参数存在，向SelectCommand中添加所有参数
For Each objPara As OleDbParameter In objParas
objCommand.Parameters.Add(objPara)
Next
End If

' 判断是否存在事务
If Not objTran Is Nothing Then
' 如果事务存在，设置SelectCommand的事务
objCommand.Transaction = objTran
End If

' 执行SQL语句
intRows = objCommand.ExecuteNonQuery()

Finally
' 执行清除处理
objCommand.Dispose()
End Try

' 返回影响记录行数
Return intRows
End Function