-1

SQL および VBS プログラミングの初心者として、次の問題に遭遇しました。SQL テーブルの行数を特定し、その値を VBS 変数に保存してから、for ループで使用したいと考えています。次のコードを思いつきましたが、ここに何かが欠けていることは明らかで、基本的に行き詰まっています。

num_rows = "SELECT COUNT(id) FROM recepti_sol"

For y = 0 To "num_rows"

コードを完成させるのを手伝ってください。時間と労力をありがとう！

4

2 に答える 2

1

編集 これはSQLサーバーの例です。
実行するのが最も簡単ですが、クリアテキストのパスワードがあるため生産的ではありません。とにかく、sqlserver の構成によっては失敗する可能性がありますが、別の接続文字列で修正できるので、もう一度読んでください。

set conn= CreateObject("ADODB.Connection")
conn.Open "Driver={SQLServer};Server=Your_Server_Name;Database=Your_Database_Name;Uid=sa;Pwd=saPassword;"
set rs = CreateObject("ADODB.recordset")
rs.Open "SELECT COUNT(id) as num_rows FROM recepti_sol", conn
For y = 1 To rs("num_rows")
  ...
  ...
next
rs.close
conn.close
set rs = nothing
set conn = nothing
于 2012-12-04T13:48:46.020 に答える
0

他の質問に対する私の回答を参照してください- Recordset オブジェクトの .GetRows() メソッドを使用し、返された 2 次元配列を操作してください。

于 2012-12-04T13:50:33.027 に答える