借用 USER3000 的 程式碼
#Include <GuiListView.au3>
#include <SQLite.au3>
#include <SQLite.dll.au3>
_SQLite_Startup ()
$SQLite_Data_Path = "SQLite.db"
$Tablekj = "kaojuan"
#Region ### START Koda GUI section ### Form=
Global $Form1 = GUICreate("从数据库里获取姓名示例", 478, 412, 481, 210)
GUISetFont(11, 400, 0, "宋体")
Global $ListView1 = GUICtrlCreateListView("序号|姓名|语文", 8, 8, 458, 358)
KC_lvdraw()
Global $Button1 = GUICtrlCreateButton("查看分数", 293, 376, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case -3
Exit
Case $Button1
msgbox(0,"70多分者", _get_N(7, 1))
msgbox(0,"分数个位数是5者", _get_N(5, 0))
EndSwitch
WEnd
Func _get_N($iNum, $iCode = 1)
Local $aRow, $hQuery, $sMsg = ''
Local $sQuery
If $iCode Then
$sQuery = "'" & $iNum & "%'"
Else
$sQuery = "'%" & $iNum & "'"
EndIf
_SQLite_Open ($SQLite_Data_Path)
_SQLite_Query(-1, "SELECT * FROM kaojuan WHEREQty LIKE " & $sQuery & ";", $hQuery)
While _SQLite_FetchData($hQuery, $aRow) = $sqlite_ok
$sMsg &= $aRow & @TAB & $aRow & @CRLF
WEnd
Return $sMsg
EndFunc
Func KC_lvdraw()
_GUICtrlListView_DeleteAllItems(GUICtrlGetHandle($ListView1))
Local $Irval, $Aresult, $Irows, $Icolumns
$Irval = _SQLite_GetTable2d( _SQLite_Open ($SQLite_Data_Path), "select rowid,* from kaojuan;", $Aresult, $Irows, $Icolumns)
_ArrayDelete($aresult, 0)
_GUICtrlListView_AddArray($ListView1, $Aresult)
EndFunc
然後搭配我改過的資料庫
本帖最后由 qsy666888 于 2014-8-4 01:45 编辑
回复 16# kk_lee69
谢谢kk_lee69大侠，又学了点东西，数据库是原来我的，只是改了一下 回复 17# qsy666888
非也~~ 列名称 當然 可以 用中文~ 但是你確定 這樣的狀況會不會因為 資料庫版本 或者 哪個DLL 或哪個更新程式的影響導致 中文在判斷的過程中 出現亂碼??
譬如 我用你的資料庫 你的資料庫 是簡體版我用繁體系統我要幫你 就必須要把 上面的程式碼都轉換成繁體中文 我的邊才 不會是亂碼但是我用Where 語文 like .....請問語文哪兩個字 是繁體編碼吧但是你的資料庫是簡體的編碼 所以怎麼測試 也測試不出
所以我只好把 語文 改成 QTY 就不會有編碼上的問題.....所以建議 除非必要 不然資料庫盡量使用英文 这个是我08年前写的 SQLDB操作！你可以参考一下！你想的功能基本都有！
回复 19# f4李文杨
赞一个~~
页:
1
[2]