現在、Vb6 をフロント エンドとして使用し、Oracle 9i をアプリケーションのバックエンドとして使用するプロジェクトに取り組んでいます。Oracle のテーブルからデータを取得し、VB6 形式で表示する必要があります。これにはレコードセットを使用していますが、問題のテーブルに有効なレコードが存在する場合でも、何らかの理由でレコードが含まれていません。誰が何が悪いのか教えてもらえますか? どんな助けでも大歓迎です。私のコードは次のとおりです-
Private Sub Command1_Click()
Dim sql As String
Set rs = New ADODB.Recordset
sql = "select test23.phoname from test23 where test23.ops='" + Text1.Text + "'"
rs.Open sql, con, adOpenStatic, adLockOptimistic
If rs.EOF = False Then
Form7.Show
Form7.Label2.Caption = rs.Fields("phoname")
End If
End Sub
レコードセットは常に空のように見えるため、if ステートメントは実行されません。EOF 条件を削除すると、実行時エラー 3021 が発生します。SQL クエリに何か問題がありますか? テーブル test23 は、属性 serialno、phoname、および ops を持つ Oracle データベースに既に存在します。ありがとう - ロン