|
復(fù)制代碼 代碼如下:
dim objRs as New Recordset
dim objCn as New connection
dim strSql as string
objCn.ConnectionString="fileDsn=student.dsn;User_Id=sa;PassWord=123"
objcn.open
strSql="SELECT * FROM Student_info"
objRs.Open strSql ,objCn,adOpenKeyset, adLockOptimistic
'在這判斷,若為空則告知用戶并退出該模塊操作就行了
if objRS.RecordsetCount=0 then
msgbox "學(xué)籍信息不存在,請(qǐng)補(bǔ)充后在操作!"
objRs.Close
Set objRs=Nothing
exit sub '這一步可別忘了,要不然還得報(bào)錯(cuò),原因是依舊執(zhí)行了以后的操作
end if (){
}
這樣就可以解決了這個(gè)問(wèn)題,然后繼續(xù)以后的操作即可,如果我們事先編寫(xiě)了鏈接數(shù)據(jù)庫(kù)并將記錄返回給Recordset的函數(shù),則步驟可以省略點(diǎn)了!
AspNet技術(shù):asp.net BOF或EOF有一個(gè)是真,或者當(dāng)前記錄已被刪除,轉(zhuǎn)載需保留來(lái)源!
鄭重聲明:本文版權(quán)歸原作者所有,轉(zhuǎn)載文章僅為傳播更多信息之目的,如作者信息標(biāo)記有誤,請(qǐng)第一時(shí)間聯(lián)系我們修改或刪除,多謝。