タイトル : 件数表示 投稿日 : 2007/08/25(Sat) 16:50 投稿者 : なぎ
初歩的な質問で申し訳ありませんが、 下記のような構文で契約DBの件数を表示させたいのですが、 msgboxの部分で"引数 'Prompt' は型 'String' に変換できません。" のエラーになります件数の表示を行うにはどのようにしたらよいのでしょうか? Public rs As Object '共通変数値設定 MyConString = "DRIVER={MySQL ODBC 3.51 Driver};" + _ "SERVER=localhost;" + _ "PORT=3306;" + _ "DATABASE=****;" + _ "UID=****;" + _ "PASSWORD=****;" + _ "OPTION=3" objConn = CreateObject("ADODB.Connection") objConn.ConnectionString = MyConString 'DBオープン objConn.Open() rs = objConn.Execute("select count(*) from 契約DB ;") msgbox(rs) 'DBクローズ objConn.close() VB.NET 2005/MySQL/OS:WinXP |