TransactionScope 事务处理 分布式处理问题:
我在一个事务处理下进行循环多条插入,第一条断点能走过 第二条就走不过了。能不能插入还不知道。。。我整了快一天了,谁能救救我啊 我今天纳品啊
代码如下:
'トランザクション開始
Using txScope As TransactionScope = New TransactionScope(TransactionScopeOption.RequiresNew)
If (dtKen.Rows.Count > 0) Then
For intI As Integer = 0 To dtKen.Rows.Count - 1
strIKN_NO = CStr(CInt(strIKN_NO) + 1)
Dim b As Integer = tj_JYUKENSYA.InsertTA_JYUKENSYA(strIKN_NO, _
"B", _
CStr(dtKen.Rows(intI).Item("SEI_NM")), _
CStr(dtKen.Rows(intI).Item("MEI_NM")), _
CStr(dtKen.Rows(intI).Item("SEI_FR")), _
CStr(dtKen.Rows(intI).Item("MEI_FR")), _
CStr(dtKen.Rows(intI).Item("SEX")), _
CStr(dtKen.Rows(intI).Item("BRTH_YEAR")), _
CStr(dtKen.Rows(intI).Item("BRTH_GENGOU")), _
CStr(dtKen.Rows(intI).Item("BRTH_YEAR")), _
CStr(dtKen.Rows(intI).Item("BRTH_MONTH")), _
CStr(dtKen.Rows(intI).Item("BRTH_DAY")), _
CStr(dtKen.Rows(intI).Item("YUBIN_CD")), _
CStr(dtKen.Rows(intI).Item("J_ADD1_NM")), _
CStr(dtKen.Rows(intI).Item("J_ADD2_NM")), _
CStr(dtKen.Rows(intI).Item("J_ADD3_NM")), _
CStr(dtKen.Rows(intI).Item("J_ADD4_NM")))
Next intI
'コミット指示(この時点ではコミットされません。Usingを出たタイミングです)
txScope.Complete()
End If
End Using
报处理的异常是TransactionException パートナー トランザクション マネージャにより、リモート トランザクションまたはネットワーク トランザクションのサポートが無効にされました。 (HRESULT からの例外: 0x8004D025)(不知道大家日语能不能看得懂)
我感觉还是分布式处理 系统配置问题 但我和他们的都一样啊