vb中數據查詢語句
Private Sub cmdYK_Click()
*
*n = ""
*n = ""
*n = ""
Dim cn As *tion
Set cn = New *tion
Dim c As String
* "provider=*.4.0; data source=D:\VB\銷售軟件\data\*"
Dim rs As *set
Dim sql As String
c="K1B"
sql = "select * from 遙控代換表 where 遙控型號='" & c & "'"
Set rs = New *set
* sql, cn, adOpenForwardOnly, adLockOptimistic
*n = rs("電視品牌")
*n = rs("遙控芯片")
*n = rs("紅外系統碼")
Do While Not *
*m rs("遙控型號")
*xt
Loop
*
*
Set rs = Nothing
Set cn = Nothing
End Sub
vb 查詢語句
最后漏了一個雙引號
把后面改成:MODEL like '"&*&"' and DC like '"&*&"' and fDATE like '"&*&"'"
你復制過去看行不行:
"Select [MODEL],[fDATE],[fTIME],[YOBIKEY],[FEEDER] From [F_RECORD] Where [MODEL] like '" & * & "' and [DC] like '" & * & "' and [fDATE] like '" & * & "'"
如果不行,請告訴我出什么錯,然后試個簡單的:
"Select * From [F_RECORD] Where [MODEL] = '" & * & "'"
再告訴我出什么錯。
VB查詢數據庫的語句怎么寫
基于ADODC控件和DATAGRID控件的靈活應用。具體做法:
新建工程時選數據工程,此時VB6集成調試環境左邊工具箱內已加載了有關數據庫編程必須的控件。然后在FORM1窗體中添加ADODC控件和DATAGRID控件,將DATAGRID1的屬性DATASOURCE選ADODC1,打開ADODC1控件屬性頁使用連接字符串,選生成,在提供者選項中選MICROSOFT jet 4.0 OLE DB Provider,然后按要求連接數據庫等。在ADODC1控件屬性頁使用連接字符串空白文本窗口中就有一長串字符串,注意該字符串可復制到程序代碼用于編程。ADODC1控件屬性頁的數據源內有命令文本(SQL)編寫窗口可編寫SQL查詢語言。該窗口的SQL語句可復制到程序代碼用于編程。
SQL查詢語言主要結構為:
Select 查詢字段 from 表名 Where 查詢條件語句 [排序語句或分組語句]
查詢字段必須分別用(西文)逗號分開或就用一個*號代替,上述查詢中排序語句建議最好應用。
SQL查詢語言如有錯程序運行時告訴你出錯,作相應改動即可。本人一般先按上述連接,SQL用"SELECT * FROM TabelName"作調試,無問題,用一個按鈕控件將前述需復制的連接字符串和SQL查詢語言先復制于按鈕控件的CLICK事件中備著,以便放著以后使用。然后刪去ADODC1控件,再添加ADODC1控件再添其他內容。
VB SQL 查詢語句的問題
不能顯示有兩種情況:
1。程序有錯誤
2。程序沒錯,但查詢到的數據集合為空
對于第2點又有2種情況:
*語句不對
*正確,數據庫里的數據不滿足條件
在多表查詢時最好給所有字段都加上表名限制,減少出錯的可能性
可以先測試一下SQL語句
SQL SERVER在查詢分析器里執行語句
ACCESS的話新建一個查詢,在SQL視圖中執行語句
照你前面所說,應該是* = *,可是你后面有些sql中又有WHERE *='"& * &"'跟WHERE SNAME='"& * &"',我都不知道到底是哪個字段對應*了。如果可以,把數據庫結構貼出來看一下
我根據推測寫了一個,你看看行不行
SELECT * FROM C,SC,S
WHERE *=* AND *=* AND *='" & * & "' //“&”號兩邊都有空格
我說的表明限制就是指 表名.字段名 這種寫法,當數據庫很大內容很多的時候,難免會有多個表擁有相同的字段名,當多表查詢時這樣可以減少一些錯誤
我猜你應該用的是Access吧,SQL Server的話字符串要用單引號而不是雙引號
你可以先在數據庫測試sql語句,把*='" & * & "'換成*="具體值"
沒錯后再放到程序里,如果還是有問題,設下斷點跟蹤調試
vb模糊查詢語句
由于是模糊查詢,查詢的應該是數據庫中的某一數據表,在“text1中輸入 關鍵字 點擊 查找”沒有問題,但是輸出在一個“text3中”就有問題了,因為數據表中你查詢的可能不是一個字段,哪么數據顯示就非常亂,尤其是字段中數據大小不一時,你查看是非常不便的。但是根據你的要求,還是給你代碼,但是你的Text3必須是多行文本框。
* "Select * From 數據表名 Where 字段名 Like '%" & * & "%'"
Do While Not *
* = * & "字段1名:" & RS!字段1 & "字段2名:" & RS!字段2 & 。.. & "字段n名:" & RS!字段n & vbCrlf
*xt
Loop