例項與舉一反三之比較(五)

2021-08-25 07:41:26 字數 1931 閱讀 7271

例項五:資料查詢

原例:用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 ...