WEB开发网      濠电姷鏁告繛鈧繛浣冲洤纾瑰┑鐘宠壘閻ょ偓銇勯幇鍫曟闁稿鍠愰妵鍕冀閵娧佲偓鎺楁⒒閸曨偄顏柡宀嬬畱铻e〒姘煎灡绗戦梻浣筋嚙濮橈箓顢氳濠€浣糕攽閻樿宸ュΔ鐘叉啞缁傚秹宕滆绾惧ジ寮堕崼娑樺缂佹宀搁弻鐔风暋閻楀牆娈楅梺璇″枓閺呯姴鐣疯ぐ鎺濇晝闁靛牆妫欓蹇旂節閻㈤潧浠﹂柛銊ョ埣楠炴劙骞橀鑲╋紱闂佽宕樼粔顔裤亹閹烘挸浜归梺缁樺灦閿曗晛螞閸曨垱鈷戦柟鑲╁仜婵″ジ鎮楀☉鎺撴珖缂侇喖顑呴鍏煎緞濡粯娅囬梻浣瑰缁诲倿寮绘繝鍥ㄦ櫇闁稿本绋撻崢鐢告煟鎼淬垻鈯曢柨姘舵煟韫囥儳绋荤紒缁樼箖缁绘繈宕橀妸褌绱濋梻浣筋嚃閸ㄤ即宕弶鎴犳殾闁绘梻鈷堥弫鍌炴煕閳锯偓閺呮瑧妲愬Ο琛℃斀闁绘劕妯婇崵鐔封攽椤旇棄鍔ら摶鐐烘煕閺囥劌澧柛娆忕箻閺屽秹宕崟顒€娅g紓浣插亾濠㈣泛顑囩粻楣冩煙鐎涙ḿ绠橀柨娑樼У椤ㄣ儵鎮欓鍕紙闂佽鍠栫紞濠傜暦閹偊妲诲┑鈩冨絻椤兘寮诲☉銏犖╅柕澶堝労閸斿绱撴担绋库偓鍝ョ矓瑜版帒鏋侀柟鍓х帛閺呮悂鏌ㄩ悤鍌涘 ---闂傚倸鍊烽悞锔锯偓绗涘厾娲煛閸涱厾顔嗛梺璺ㄥ櫐閹凤拷
开发学院WEB开发综合 多用户应用程序中应注意的其它问题(3)--多客户环... 阅读

多用户应用程序中应注意的其它问题(3)--多客户环境下VB数据库编程之(10)

 2006-02-27 11:48:05 来源:WEB开发网 闂傚倸鍊风欢姘缚瑜嶈灋闁圭虎鍠栫粻顖炴煥閻曞倹瀚�闂傚倸鍊风粈渚€骞夐敓鐘插瀭闁汇垹鐏氬畷鏌ユ煙閹殿喖顣奸柛搴$У閵囧嫰骞掗幋婵冨亾閻㈢ǹ纾婚柟鐐灱濡插牊绻涢崱妤冃℃繛宀婁簽缁辨捇宕掑鎵佹瀸闂佺懓鍤栭幏锟�濠电姷鏁告慨顓㈠箯閸愵喖宸濇い鎾寸箘閹规洟姊绘笟鈧ḿ褍煤閵堝悿娲Ω閳轰胶鍔﹀銈嗗笂閼冲爼鍩婇弴銏$厪闁搞儮鏅涙禒褏绱掓潏鈺佷槐闁轰焦鎹囬弫鎾绘晸閿燂拷闂傚倸鍊风欢姘缚瑜嶈灋闁圭虎鍠栫粻顖炴煥閻曞倹瀚�  闂傚倸鍊烽懗鑸电仚缂備胶绮〃鍛村煝瀹ュ鍗抽柕蹇曞У閻庮剟姊虹紒妯哄闁圭⒈鍋嗛惀顏囶樄闁哄本娲樼换婵婄疀閺囩姷鐛ラ梻浣哄帶婢瑰﹥绂嶅⿰鍫氣偓鏃堝礃椤忎礁浜鹃柨婵嗛婢ь喖霉閻樻瑥瀚粻楣冩煕椤愩倕鏋庨柣蹇嬪劜閵囧嫰寮村Ο鍝勫Е濡炪們鍨洪悷鈺呭箖閳╁啯鍎熼柕鍥у簻閹凤拷
核心提示:问题三用户标识在多用户应用程序中,可以以编程方式标识当前登录到系统上的用户,多用户应用程序中应注意的其它问题(3)--多客户环境下VB数据库编程之(10),这对于管理功能是有用的,比如用编辑好的记录来存储用户名字,使用这种方法,可以访问用户名,从而建立一个核查线索,实现一个安全的数据库
问题三用户标识

在多用户应用程序中,可以以编程方式标识当前登录到系统上的用户,这对于管理功能是有用的。比如用编辑好的记录来存储用户名字,从而建立一个核查线索。实现一个安全的数据库,可以迫使用户必须用预先定义的用户名和密码来登录应用程序,这样,应用程序就可以通过Workspace对象的UserNane属性来使用用户名。下面这个过程,把用户名、当前日期和时间写到指定的记录集中。

过程如下:

FunctionWriteAuditTrail(rstAsRecordset)AsInteger
OnErrorGoToErrorHandler
'编辑记录集中的当前记录
'假定Recordset(rst)包括a
'和b两个字段
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

上述过程把用户、系统当前日期和时间写入一个记录集中。如果写入成功,则过程返回0,否则返回相应的错误代码。为了调用上述过程,首先建立一个包含两个字段(a和b)的表,然后在窗体上画一个命令按钮,并编写下面的事件过程:

PRivateSubCommand1_Click()
DimMvdbsAsDatabase
DimMvTabAsRecordset
SetMydbs=OpenDatabase("c:\dbdir\db1.mdb")
SetMyTab=Mydbs.OpenRecordset("Tabel4",dbOpenTable)
a=WriteAuditTrail(MyTab)
Ifa=0then
MsgBox"用户名、日期和时间已写入"
ElSe
MsgBox"写入失败"
Endlf
EndSub

新建立的表放在数据库dbl.mdb中,名为Tabel4。程序运行后,单击命令按钮,将调用上面的过程,把用户名、日期和时间写入表Tabel4中。可以通过“可视化数据管理器”来查看表Tabel4的内容,如图所示。

ab
admin98-3-2020:13:23

如果不想实现安全性,只需要用户名功能,则可以在运行应用程序时提示用户输入名字和密码,并把输入的值存储到代码变量或临时表中。使用这种方法,可以访问用户名,但不能实现安全的数据库。->

Tags:用户 应用程序 注意

编辑录入:爽爽 [复制链接] [打 印]
赞助商链接