麻豆小视频在线观看_中文黄色一级片_久久久成人精品_成片免费观看视频大全_午夜精品久久久久久久99热浪潮_成人一区二区三区四区

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

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

2019-11-18 17:53:18
字體：大 中 小
來(lái)源：轉(zhuǎn)載
供稿：網(wǎng)友
問(wèn)題三用戶標(biāo)識(shí)


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


過(guò)程如下：


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


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



Endlf

EndSub


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


ab

admin98-3-2020:13:23


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

發(fā)表評(píng)論 共有條評(píng)論
用戶名: 密碼:
驗(yàn)證碼: 匿名發(fā)表
主站蜘蛛池模板： 国产99久久精品一区二区 | 色视频在线观看 | 欧美国产日韩在线 | 一本一本久久a久久精品综合小说 | a网站在线 | 久久久在线免费观看 | 亚洲二区三区在线 | 久久精品视频亚洲 | 日韩a毛片免费观看 | 2023av在线视频 | 中文字幕免费在线观看视频 | 蜜桃网站免费 | 久久久久免费电影 | 视屏一区 | 欧美在线成人影院 | 久久精品一区二区三区四区五区 | av电影在线观看网址 | 国产一级毛片av | 久久人人爽人人爽人人片av高清 | 新久久久久久 | 国产精品99久久久久久久女警 | 超碰97国产在线 | 亚洲国产精品二区 | 视频一区二区不卡 | av中文字幕免费在线观看 | 超碰97国产在线 | 羞羞网站视频 | 免费视频a | 久久99精品久久久久久园产越南 | 国产一级不卡毛片 | 毛片视频在线免费观看 | 国产一区二区在线观看视频 | 偿还电影免费看 | 成人午夜视频免费 | 成人毛片在线免费看 | 欧美毛片在线观看 | 中文字幕欧美一区二区三区 | 国产成人精品自拍视频 | 国产精品jk白丝蜜臀av软件 | 亚洲欧洲日产v特级毛片 | 牛牛热这里只有精品 |