C# と VB.NET の質問掲示板

お世話になっております。

WINDOWS XP PRO + EXCEL 2003 + SQLServer2000 SP3
で開発をしています。

データベース操作でエラーが発生した場合の、
エラーメッセージを取得したいのです。

たとえば同一キーのデータを挿入すると
「PRIMARY KEY 違反、制約'PK_M_KBN_2'
:オブジェクト'M_KBN_2'には重複しキーは挿入できません。」
等のメッセージをEXCELのVBAの変数に取り込みたいと思います。
現在使用しているコードの概略は以下のとおりです。


　　cn As ADODB.Connection
　　rs As ADODB.Recordset

    Set cn = New ADODB.Connection
    cn.ConnectionString = "cnGoods"
    cn.Open
    Set rs = New ADODB.Recordset
    
    mySQL = "INSERT INTO TEST VALUES(1,'TEST')"
    
    rs.Open mySQL, cn, adOpenStatic, adLockOptimistic

　　cn.Close

いまさら・・の質問かも知れませんが、
よろしくご教授お願いいたします。