Tracing\Debugging about npoco

[schotime]

Here is the easiest way which I use.
Create a class which derives from Database, then override the OnExecutingCommand method.

public class MyDb : Database 
{
    public override void OnExecutingCommand(IDbCommand cmd)
    {
        File.WriteAllText("blah.txt", FormatCommand(cmd));
    }
}

[katwork]

I found a function on PSC that combines the SQL and parameters and modified it to work in my database instance. I haven't made any changes to it yet other than changing the types to work with what NPoco uses. Pardon the VB.

Partial Public Class MyDB
  Inherits NPoco.Database

  Protected _lastCombinedSQL As String = String.Empty

  Public ReadOnly Property LastCombinedSQL As String
    Get
      Return _lastCombinedSQL
    End Get
  End Property

  Public Overrides Sub OnExecutingCommand(cmd As IDbCommand)
    Try
      _lastCombinedSQL = ConvertCommandParamatersToLiteralValues(cmd)
    Catch ex As Exception
      _lastCombinedSQL = "[error combining sql command and parameters]"
    End Try
    MyBase.OnExecutingCommand(cmd)
  End Sub

  ''' <summary>
  ''' A Method to convert a IDbCommand with paramaters to string value.
  ''' </summary>
  ''' <param name="cmd"></param>
  ''' <returns></returns>
  ''' <remarks>
  ''' Based on http://www.Planet-Source-Code.com/vb/scripts/ShowCode.asp?txtCodeId=7760&amp;lngWId=10 
  ''' </remarks>
  Public Shared Function ConvertCommandParamatersToLiteralValues(cmd As IDbCommand) As String
    If (cmd Is Nothing) Then Return String.Empty
    Dim query As String = cmd.CommandText
    For Each prm As IDbDataParameter In cmd.Parameters
      Select Case prm.DbType
        Case SqlDbType.Bit
          Dim boolToInt As Integer = If(CBool(prm.Value), 1, 0)
          query = query.Replace(prm.ParameterName, String.Format("{0}", If(CBool(prm.Value), 1, 0)))
          Exit Select
        Case SqlDbType.Int
          query = query.Replace(prm.ParameterName, String.Format("{0}", prm.Value))
          Exit Select
        Case SqlDbType.VarChar
          query = query.Replace(prm.ParameterName, String.Format("'{0}'", prm.Value))
          Exit Select
        Case Else
          query = query.Replace(prm.ParameterName, String.Format("'{0}'", prm.Value))
          Exit Select
      End Select
    Next
    Return query
  End Function

End Class

[schotime]

You could also use the latest Glimpse.Ado package, which will be able to monitor all SQLs that are run. If you are running on Asp.net MVC you will need to install the Glimpse.Mvc4 or relevant version of MVC as well.

It will look like this.

[techniq]

This might be a good item to add to the Wiki, along with MiniProfiler support.

[schotime]

Thanks @techniq. Have put one together quickly.
https://github.com/schotime/NPoco/wiki/Debugging-and-Profiling

[techniq]

Perfect. Thanks.