2011-07-05 8 views
0

私はこのコードで見つかったSQLクエリによって引っ張ら情報でテキストボックスを埋めるためにしようとしています:VB6のSQLデータベース・エラー

Dim Sqlstring As String 
Dim rstCurrentTicket As Recordset 

Sqlstring = "SELECT SubmiterName, Department, Description, Urgency, SubmitDate,  ResolvedDate 
       FROM TroubleTickets 
       WHERE Title = " + Trim(TicketComboBox.Text) 

SET rstCurrentTicket = cnnSel.OpenRecordset(Sqlstring) 

Do While Not rstCurrentTicket.EOF 

    TicketComboBox.AddItem (rstCurrentTicket!TroubleTicketTitle) 

Loop 

デバッガは、現在設定さrstCurrentTicket文をflagingています。そして私に

RUN TIME ERROR 3146 ODBC Call failed

答えて

1

タイトルが文字列であると仮定すると言うエラーを与え、これにSqlstringにあなたの割り当てを変更してみてください:

Sqlstring = "Select SubmiterName, Department, Description, Urgency, SubmitDate,  ResolvedDate from TroubleTickets where Title ='" & Trim(TicketComboBox.Text) & "'" 

あなたがあなたのTicketComboBoxテキストの周りの単一引用符予選が必要になりますStringを使って作業しているSQL文を伝えてください。

+0

私はあなたが提案したように、今は違うエラーになっています。コンパイルエラー:メソッドまたはデータメンバーが見つかりません。デバッガは、このコードを実装するために使用しているメソッドを強調表示します: 'Public Sub SelectButton_Click()' – jth41

+0

@Johnあなたのプロジェクトの詳細を見ることなく何が起こっているのかを言うのは難しいですが、SelectButton_Click ?そのようなイベントがある場合、おそらくそれを呼び出すコードの範囲外です。 –

+0

プロジェクトで忌憚のないiveが公開とプライベートを試みました.. thanks tho – jth41

関連する問題