If e.DataCol.Name = "原审案号" Then
If e.NewValue Like "*鲁0102*" Or e.NewValue Like "*历*" Then
e.DataRow("原审法院") = "济南市历下区人民法院"
Else If e.newValue Like "*鲁0103*" Then
e.DataRow("原审法院") = "济南市市中区人民法院"
Else If e.newValue Like "*鲁0104*" Or e.NewValue Like "*槐*" Then
e.DataRow("原审法院") = "济南市槐荫区人民法院"
Else If e.newValue Like "*鲁0105*" Then
e.DataRow("原审法院") = "济南市天桥区人民法院"
Else If e.newValue Like "*鲁0112*" Then
e.DataRow("原审法院") = "济南市历城区人民法院"
Else If e.newValue Like "*鲁0113*" Then
e.DataRow("原审法院") = "济南市长清区人民法院"
Else If e.newValue Like "*鲁0124*" Then
e.DataRow("原审法院") = "山东省平阴县人民法院"
Else If e.newValue Like "*鲁0125*" Then
e.DataRow("原审法院") = "山东省济阳县人民法院"
Else If e.newValue Like "*鲁0126*" Then
e.DataRow("原审法院") = "山东省商河县人民法院"
Else If e.newValue Like "*鲁0181*" Then
e.DataRow("原审法院") = "济南市章丘区人民法院"
Else If e.newValue Like "*鲁0191*" Then
e.DataRow("原审法院") = "济南高新技术产业开发区人民法院"
Else If e.newValue Like "*鲁0116*" Then
e.DataRow("原审法院") = "济南市莱芜区人民法院"
Else If e.newValue Like "*鲁0117*" Then
e.DataRow("原审法院") = "济南市钢城区人民法院"
End If
End If