国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 學(xué)院 > 開發(fā)設(shè)計(jì) > 正文

多用戶應(yīng)用程序中應(yīng)注意問題3

2019-11-18 17:53:18
字體：大 中 小
供稿：網(wǎng)友
問題三用戶標(biāo)識


在多用戶應(yīng)用程序中，可以以編程方式標(biāo)識當(dāng)前登錄到系統(tǒng)上的用戶，這對于管理功能是有用的。比如用編輯好的記錄來存儲用戶名字，從而建立一個(gè)核查線索。實(shí)現(xiàn)一個(gè)安全的數(shù)據(jù)庫，可以迫使用戶必須用預(yù)先定義的用戶名和密碼來登錄應(yīng)用程序，這樣，應(yīng)用程序就可以通過Workspace對象的UserNane屬性來使用用戶名。下面這個(gè)過程，把用戶名、當(dāng)前日期和時(shí)間寫到指定的記錄集中。


過程如下：


FunctionWriteAuditTrail(rstAsRecordset)AsInteger

OnErrorGoToErrorHandler

注釋：編輯記錄集中的當(dāng)前記錄

注釋：假定Recordset(rst)包括a

注釋：和b兩個(gè)字段

rst.Edit

rst!a＝Workspaces(0).UserName

rst!b＝Now

rst.Update

ErrorHandler：

SelectCaseErr

Case0

WriteAuditTrail＝O

EXitFunction

CaseElse

MsgBox"Error"&Err&":"&Error，vbOKOnlv

WriteAuditTrail＝Err

EXitFunction

EndSelect

EndFunction


上述過程把用戶、系統(tǒng)當(dāng)前日期和時(shí)間寫入一個(gè)記錄集中。如果寫入成功，則過程返回0，否則返回相應(yīng)的錯(cuò)誤代碼。為了調(diào)用上述過程，首先建立一個(gè)包含兩個(gè)字段(a和b)的表，然后在窗體上畫一個(gè)命令按鈕，并編寫下面的事件過程：



Endlf

EndSub


新建立的表放在數(shù)據(jù)庫dbl.mdb中，名為Tabel4。程序運(yùn)行后，單擊命令按鈕，將調(diào)用上面的過程，把用戶名、日期和時(shí)間寫入表Tabel4中。可以通過“可視化數(shù)據(jù)管理器”來查看表Tabel4的內(nèi)容，如圖所示。


ab

admin98-3-2020:13:23


如果不想實(shí)現(xiàn)安全性，只需要用戶名功能，則可以在運(yùn)行應(yīng)用程序時(shí)提示用戶輸入名字和密碼，并把輸入的值存儲到代碼變量或臨時(shí)表中。使用這種方法，可以訪問用戶名，但不能實(shí)現(xiàn)安全的數(shù)據(jù)庫。->

發(fā)表評論 共有條評論
用戶名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板： 岑巩县| 孟村| 大冶市| 淮阳县| 临潭县| 敦化市| 大安市| 新安县| 新河县| 武穴市| 常州市| 盐亭县| 澎湖县| 阿拉善右旗| 无极县| 石楼县| 锦州市| 朝阳县| 长顺县| 玉溪市| 宁安市| 辽宁省| 大悟县| 泸定县| 临安市| 罗田县| 民乐县| 罗平县| 嵩明县| 北碚区| 桑日县| 蓬安县| 阿拉尔市| 金山区| 平阴县| 怀宁县| 天门市| 天门市| 鄄城县| 城市| 白城市|