VB6连接到远程mySQL服务器挂起应用程序

Question

我正在使用VB应用程序连接到在真实Web服务器上远程托管的MySQL数据库。

当我尝试逐个插入最少50条记录时，它会挂起我的VB应用程序，有时操作系统会建议杀死任务。

我在VB使用带有ADO DB的Mysql ODBC连接器。

我的应用程序需要4000条记录才能接收或发送到数据库。 在这种情况下，连接VB和MySql的最佳和最快捷方式是什么。

请告知。

Answer 1

如果你真的需要逐个插入记录，你应该在每次插入后制作一个DoEvents。

For i = 1 To 4000
    ' Insert record
    ' ......

    DoEvents
Next i

Doevents可防止死锁，并允许处理其他应用程序事件。

（有时使用Doevents循环可能需要更长时间）