例項五:資料查詢
原例:用ado command物件建立引數查詢,用msflexgrid顯示資料。
舉一反三(1):
不同點:使用查詢引數構造sql sever語句,(where條件中有引數,故command物件不用設定引數)使用ado command物件執行查詢語句。
原例:objcmd.commandtext = "select * from 系統使用者 where 使用者名稱 like ? " & "and 身份 like ?"
objcmd("使用者名稱") = "%" & txtuser & "%" '獲得查詢引數
objcmd("身份") = "%" & txtstatus & "%"
set objrs = objcmd.execute() '執行查詢,獲得查詢結果記錄集
本例:objcmd .commandtext = "select * from 系統使用者 where 使用者名稱 like '%" & trim(txtuser) & "%'" & "and 身份 like '%" & trim(txtstatus) & "%'"
set objrs = objcmd.execute() '執行查詢,獲得查詢結果記錄集
舉一反三(2):
不同點:使用查詢引數構造sql sever語句,(where條件中有引數,故recordset物件不用設定引數)使用ado recordset物件執行查詢語句。用datagrid控制項顯示資料。
本例:strsql = "select * from 系統使用者 where 使用者名稱 like '%" & trim(txtuser) & "%'" & "and 身份 like '%" & trim(txtstatus) & "%'"
set objrs.activeconnection = objcn
objrs.cursorlocation = aduseclient
objrs.cursortype = adopenstatic
objrs.open strsql
set datagrid1.datasource = objrs
舉一反三(3):
不同點:先執行select語句獲取資料庫資料,將其存放到recordset物件中,然後設定recordset物件的filter屬性篩選符合條件的記錄。用datagrid控制項顯示資料。
本例:strsql = "select * from 系統使用者 "
set objrs.activeconnection = objcn
objrs.cursorlocation = aduseclient
objrs.cursortype = adopenstatic
objrs.open strsql
if trim(txtuser) = "" then
strfilter = ""
else
strfilter = "使用者名稱 like '" & trim(txtuser) & "%' "
end if
if trim(txtstatus) <> "" then
if strfilter <> "" then
strfilter = strfilter & "and 身份 like '" & trim(txtstatus) & "%'"
else
strfilter = "身份 like '" & trim(txtstatus) & "%'"
end if
end if
objrs.filter = strfilter
set datagrid1.datasource = objrs
替換空格 舉一反三
思路 在替換空格時,從後向前開始進行搬移,因為把乙個字元替換為了3個字元,所以陣列的長度會變長,替換後陣列的長度 空格的數量 2 替換之前陣列的長度,要注意記憶體覆蓋。給兩個標記,tailoldlength標記原陣列 替換之前的陣列 的最後乙個元素,tailnewlength標記新陣列 替換之後的陣...
模型實現舉一反三
在很長一段時間裡,大家都對深度學習模型有所誤解,認為模型需要非常大量的資料訓練,且只能過訓練過的模式起作用 用貓的資料訓練就只能識別貓,只有在訓練資料中多次出現的模式才能被模型學習和應用,稍有變化,模型就無法正常工作。實際上隨著深度學習模型的發展,這些問題都在逐步改善。現在很多模型學習的不僅是解決具...
php上傳思路很重要 舉一反三
1 form標籤enctype屬性 表單中enctype multipart form data 的意思,是設定表單的mime編碼。預設情況,只有使用了multipart form data,才能完整的傳遞檔案資料 input標籤 type 屬性中的 file 2 files 系統函式 files ...