Re: [VB6 ] 關於資料庫查詢
現在還有另外一個問題 是不能查詢
我想要用我輸入的名稱去查詢
書上寫按鍵的程式碼是
Private Sub Command8_Click()
Dim strID As String
On Error GoTo FindErr
strID = Text1.Text
adoEnp.Recordset.Find " 供應商編號 =" & Val(strID)
Exit Sub
FindErr:
MsgBox Err.Description
End Sub
而且Val 應該是變數 如果我現在希望搜尋的是供應商
也就是 Text1.Text裡是中文字 我應該要更改哪個部份阿
我試過 Str Chr 都不行..
--
╭╮ ○ * ✽ ○ ╭╮ ✽ ╭╮*╮ ○ ✽
║╣ ✽╭╦═╮╭╮ ╮╭╦═╮║╣ ○ ║╣ ║ ● ╭╮ ╮ ●
║╣ ║╣ ║║╣✽║║╣*║║╣╭ ╭╮║╣✽║╭╮║╣ ║╭╮
║╣* ║╣○║║╣*║║╬═╯║╣║✽║╣║╣ ║║╣║╣*║║╣
╰╩═╯╰╩═╯╰╩═╯╰╩═╯╰╯╰═╣╣╰╩═╯╰╯╰╩═╯╰╯
http://www.wretch.cc/album/LovelyVivi╰═╩╯ *
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 211.22.72.250
※ 編輯: LovelyVivi 來自: 211.22.72.250 (03/07 23:58)
※ 編輯: LovelyVivi 來自: 211.22.72.250 (03/07 23:58)
→
03/09 20:00, , 1F
03/09 20:00, 1F