ADODB updating HFSQL problem

[cramaboule]

Hello, 

I can read HFSQL database (took exemple here https://www.autoitscript.fr/forum/viewtopic.php?t=14596)

I can 'Update' the table (the result is ok) BUT it doesn't give me the 'RecordsAffected' value correct  as describe here: https://www.w3schools.com/asp/met_comm_execute.asp#commandtypeenum
Any Idea why ?

expandcollapse popup

Global $oMyError = ObjEvent("AutoIt.Error", "MyErrFunc") ; Initialize a COM error handler
Global $ErrorCom

Global Const $PROVIDER = "PCSoft.HFSQL"
Global Const $SERVER = '\\myserver\' 
Global Const $WDDPATH = 'path\file.wdd'
Global $sPathDsn = $SERVER & 'iprefaceE\TEST\TEST\TEST24\'


$sQuery = "update produit set typpr = 'USA' where typpr = 'USB'"
;~ $sQuery = "update produit set typpr = 'USB' where typpr = 'USA'"
$oMyError = ObjEvent("AutoIt.Error", "MyErrFunc")     ; Initialize a COM error handler

Global $adoCon = ObjCreate("ADODB.Connection")
Global $adoCmd = ObjCreate("ADODB.Command")


$dsn = "Provider=" & $PROVIDER & ";Data Source=" & $SERVER & $WDDPATH & ";Initial Catalog=" & $sPathDsn & ";"
ConsoleWrite($dsn & @CRLF)
$adoCon.ConnectionString = $dsn
$adoCon.CursorLocation = 3     ;A indiquer pour PC Soft sinon ne fonctionne pas
$adoCon.Open

; Execute the SQL query
$adoCmd.ActiveConnection = $adoCon
$adoCmd.CommandText = $sQuery

Local $RecordsAffected = -1
$adoCmd.Execute($RecordsAffected, $sQuery)

; Output the number of affected rows
ConsoleWrite("Number of rows affected: " & $RecordsAffected & @CRLF)


$adoCon.Close

Func MyErrFunc() ; error handler
;~  MsgBox(16 + 262144, 'Error',
    ConsoleWrite(@CRLF & "We intercepted a COM Error !" & @CRLF & @CRLF & _
            "err.description is: " & @TAB & $oMyError.description & @CRLF & _
            "err.windescription:" & @TAB & $oMyError.windescription & @CRLF & _
            "err.number is: " & @TAB & "0x" & Hex($oMyError.number, 8) & @CRLF & _
            "err.number is: " & @TAB & $oMyError.number & @CRLF & _
            "err.lastdllerror is: " & @TAB & $oMyError.lastdllerror & @CRLF & _
            "err.scriptline is: " & @TAB & $oMyError.scriptline & @CRLF & _
            "err.source is: " & @TAB & $oMyError.source & @CRLF & _
            "err.helpfile is: " & @TAB & $oMyError.helpfile & @CRLF & _
            "err.helpcontext is: " & @TAB & $oMyError.helpcontext & @CRLF & _
            "err.retcode is: " & @TAB & "0x" & Hex($oMyError.retcode) & @CRLF & _
            "err.retcode is: " & @TAB & $oMyError.retcode & @CRLF & @CRLF)
    $oMyError = ''
    $ErrorCom = 1
EndFunc   ;==>MyErrFunc

I search a lot but didn't find anything!

Any help appreciated !

Cramaboule

[cramaboule]

Found that it is not possible: 

 

[mLipok]

https://www.autoitscript.com/forum/topic/129810-the-number-of-records-affected-is-not-returned-for-sqlserver-compact/#comment-1534988