Public Function InsertTemp(ByVal strContID As String, ByVal myTable As DataTable, ByVal strUser As String) As Integer
        Dim mySQL As String
        Dim i As Integer         Dim myConn As OracleConnection = New OracleConnection(ConfigurationSettings.AppSettings("ConnectionString"))
        myConn.Open()
        Dim myCommand As OracleCommand = New OracleCommand
        Dim myTrans As OracleTransaction
        myTrans = myConn.BeginTransaction()
        myCommand.Connection = myConn
        myCommand.Transaction = myTrans        Dim myField As Array = strContID.Split(",")        Try
            Dim drRow As DataRow
            For Each drRow In myTable.Rows
                mySQL = "Insert Into Contract_Temp(" & strContID & ",UpdateTime,UpdateUser) Values("                For i = 0 To UBound(myField)
                    '日期格式
                    j = myField(0)
                    If LCase(myField(i)) = "signdate" Or LCase(myField(i)) = "begindate" Or LCase(myField(i)) = "enddate" Then
                        mySQL += "To_Date('" + drRow(i) + "','yyyy-mm-dd HH24:MI:SS'),"
                    Else
                        mySQL += "'" + drRow(i) + "',"
                    End If
                Next                mySQL += "To_Date('" & Now() & "','yyyy-mm-dd HH24:MI:SS'),"
                mySQL += "'" & strUser & "')"                myCommand.CommandText = mySQL
                myCommand.ExecuteNonQuery()
            Next            myTrans.Commit()
            InsertTemp = 1
        Catch e As Exception
            myTrans.Rollback()
            InsertTemp = 0
        Finally
            myConn.Close()
        End Try
    End Function我这边有个DataTable循环,如果DataTable中有10条纪录,如果执行到第五条时出错,请问
如果返回这个错误行数5,谢谢!!!