In my original post I didn't add that I close the connection just before I exit the function. If lngRecordAffected <> 0 Then ' if the execute was successful then let's commit the updates cn.CommitTrans WriteData = lngRecordAffected Else ' otherwise let's rollback to before the execute command. cn.RollbackTrans WriteData = lngRecordAffected End If
If cn Is Nothing Then Else cn.Close End If Exit Function I do not really understand your question about pooled connections. Does the above code answer your question? In your VB code, are your connections pooled, or are you using the same connection for each database call?