Write In Database During DataReader Loop.

Hello,

I want to insert a value in a database table during a datareader loop. But I get an error saying that the connection (MyConnection) is already open. This is normal because it is open for processing the datareader loop. But how do I solve this? I just want to write a value for logging the process.

This is my code:

Dim iID as Integer = 1

Dim strSQLNewsLetter As String = "SELECT * FROM Members WHERE Members.Enabled=1"
Dim MyCommand=New MySqlCommand(strSQLNewsLetter, MyConnection)
MyConnection.Open()
Dim myReader as MySQLDataReader
 
myReader = MyCommand.ExecuteReader()
 
While myReader.Read()
 If MyReader.GetMySqlDateTime(3).ToString() = "0/00/0000 0:00:00" then
  WriteMyLog(iID, MyReader.GetInt32(0))
 End If
End While
 
myReader.Close()
myConnection.Close()

Function WriteMyLog(iID as Integer, iMemberID as Integer) 'Write Log after Newsletter has been sent
  Dim strSqlLog as String 'Create query
  strSqlLog = "INSERT INTO NewsLetterStats (ID, MemberID, TimeSent) VALUES ("
  strSqlLog &= "" & iID & "," 'NewsLetterID
  strSqlLog &= "" & iMemberID & "," 'MemberID
  strSqlLog &= "'" & MySQLTimeStamp() & "')" 'Timestamp
 
  Dim MyCmdLogNews As New MySqlCommand(strSqlLog, myConnection)
  MyCmdLogNews.Connection.Open()
  MyCmdLogNews.ExecuteNonQuery()
  MyCmdLogNews.Connection.Close()
End Function