国产探花免费观看_亚洲丰满少妇自慰呻吟_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ā)表
主站蜘蛛池模板： 姚安县| 和田县| 盐源县| 金平| 吉木乃县| 阿合奇县| 富平县| 扎囊县| 翁源县| 宁城县| 富顺县| 兴海县| 开鲁县| 广河县| 黑龙江省| 双城市| 静海县| 静乐县| 乐东| 什邡市| 依兰县| 衡南县| 台东市| 崇明县| 苍梧县| 原平市| 泌阳县| 深水埗区| 宁都县| 农安县| 阿城市| 繁峙县| 体育| 阳泉市| 定西市| 屏山县| 沿河| 包头市| 象山县| 岑溪市| 德昌县|