there is already an open datareader associated with this command-error
fn1:
SQL = "query"
reader = cmd.ExecuteReader()
If reader.Read() Then
' operation
reader.close()
end if
reader.close
fn:2
SQL = "query"
reader = cmd.ExecuteReader()
If reader.Read() Then
' operation
reader.close()
end if
reader.close