以下是引用有点蓝在2018/8/27 23:13:00的发言:
cmd.CommandText = " 选择 Count(*) From {organList} Where organName = '" & organName & "'"
If cmd.ExecuteScalar > 0 Then
Messagebox.show("更改单位失败,该单位已经存在!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
e.Form.Controls("organName").Value = OldOrganName
With Tables("organList")
.Current("organName")=OldOrganName
End With
Return
End If
Tables("organList") .Current。save
cmd.CommandText = "选择 Count(*) From {organList} Where organId= '" & organId & "'"
If cmd.ExecuteScalar > 0 Then
Messagebox.show("更改单位失败,该金融机构编码已经存在!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
Return
End If
老师,那有的时候可能金融机构编码并没有修改,不需要判断,如何判断是否修改了没