TransactionScope 事务处理 分布式处理问题:

Leen_fang 2008-08-25 05:31:15
我在一个事务处理下进行循环多条插入,第一条断点能走过 第二条就走不过了。能不能插入还不知道。。。我整了快一天了,谁能救救我啊 我今天纳品啊
代码如下:

'トランザクション開始
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)(不知道大家日语能不能看得懂)

我感觉还是分布式处理 系统配置问题 但我和他们的都一样啊
...全文
137 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
whtydn 2008-08-27
  • 打赏
  • 举报
回复
楼主应该懂日文吧..那希望你把翻译译出来..
yanlongwuhui 2008-08-26
  • 打赏
  • 举报
回复
楼主可真会难为人,试想有多少人懂日文呢,要不你去鬼子的论坛发帖试试
fengboawhf 2008-08-26
  • 打赏
  • 举报
回复
http://dev-hijiki.blogspot.com/2006/09/system.html
LQknife 2008-08-25
  • 打赏
  • 举报
回复
还日文的
ojekleen 2008-08-25
  • 打赏
  • 举报
回复
我看的懂。。。。。。。。。。。。。才怪

16,717

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧