VB Msgbox带有SQL调用

Question

只是一个快速的VB问题 -

我正在使用VB6，我只需要添加一个If ... Then语句来提示用户何时覆盖以前填充在SQL中的字段。这将使其他用户多次更新该字段，而不知道我已经更新了它。我只是不确定它属于的顺序。以前，它是按此顺序：

1. 单击按钮，测试与sql数据库的连接，如果当前为空，则使用user1的名称更新字段userName。
2. 关闭sql连接

添加我的If ...然后，它更像是这样：

1. 单击按钮，测试连接，并使用user1的名称更新字段userName，如果它为空。
2. 更新后，更新'updated'布尔字段（我添加了一个字段，以便在每次有sql更新时跟踪）为True。
3. 在第一个语句的结束IF之前添加了IF语句，声明IF'upated'= True，然后显示YES / NO Msgbox，提示user2决定是否要继续更新userName字段第二次，并覆盖user1的名称，然后End If。
4. 结束如果在第一个更新声明中。
5. 关闭sql连接。

最终目标是防止user2立即覆盖user1的更新，而不会收到user1已经更新过的某种类型的提示。我只是不确定我的代码是否应该包围初始更新IF..THEN，或者放在内部或它初始检查字段是否为空。任何帮助都会很棒。

我会提供实际的代码，但它是专有的。

Answer 1

我认为这是你的想法？

(connect to SQL, get field)
If strSQLField = "" Then
    If fUpdated = True Then
        nReturn = MsgBox "Do you want to overwrite the field?", vbYesNo
        If nReturn = vbYes Then
            (do overwrite code here)
        End If
    Else
        (do normal write code here)
    End If
End If
(close connection)