エラーは出ないが抽出もされない

質問

アクセスからのデータ抽出はうまくいったので、
接続部分のソースを変更してMySQLにつないでみたんですが、うまくいきません。いろいろ調べてはいるんですが、原因や解決策がまったく分からない状態です。。。

システムＤＮＳのＴｅｓｔはやはりうまくいきます。
ブラウザで確認すると、エラーは出ないものの、
データも抽出されない状態です。

IISマネージャの仮想ディレクトリ設定では、
フォルダ参照権限以外はすべて与えています。

ＡＳＰ自体は、以下だけだと不十分なのでしょうか？

Set db=Server.CreateObject("ADODB.Connection")
db.Open "dsn=AIU;Server=172.17.0.110; Database=db1; UID=root; PWD=admin;" db.CursorLocation = 3
Set rs = db.Execute("Select * From table1")

Do While Not(rs.EOF)
Response.Write rs.Fields.Item("koumoku1") & vbNewLine
Loop

環境
Windows2003Serverエンタープライズ
MySQL5.0
MySQL ODBC 3.51 Driver
IE6.0

回答No.1

osamuy · ベストアンサー

データを出力する前に、Typename(rs)で変数rsに何が設定されてるかとか、コレクションrs.Fieldsを列挙してみるとかのデバッグ情報を出力するページを作ってみて、DBへの接続がうまくいってるかをデバッグしてみては。

＞ Do While Not(rs.EOF)
＞ Response.Write rs.Fields.Item("koumoku1") & vbNewLine
＞ Loop
これだと、無限ループしてるのでは?
rs.MoveNextしてないので。

補足

ソース省略しすぎました。
実際はrs.MoveNextもつけています。

とりあえずTypename(rs)でデバッグしてみます。

その前に、ＰＣ自体がおかしくなってるので直さないといけないですが。。（ＣＤＲＯＭが認識しないので）