機房收費系統 登入 二

2021-08-17 15:04:54 字數 794 閱讀 5793

之前把登入窗體的的思路捋了一下,機房收費系統-登入(一),那會兒的思路還是不是很清晰,現在簡單的說一下,對於使用者的登入,級別對於使用系統中的功能有限制的作用

一般使用者:一級使用者,就是一般的操作使用者,可以用來上機和下機,對於個人賬戶的查詢等

操作員:二級使用者,可以管理一般使用者

管理員:**使用者,可以管理一般使用者和操作員和結賬。如圖所示三者的關係

【**展示】

txt框中限制特殊字元(防止sql注入)

private

sub txtusername_keypress(keyascii as

integer)

select

case keyascii

case

48to

57'只能輸入數字

case

65to

90'只能輸入大寫字母

case

97to

122'只能輸入小寫字母

case

8'只能輸入退格

case

else

keyascii = 0

'使輸入的特殊字元為空

msgbox "不能輸入特殊字元,請輸入數字或字母!", vbokonly + vbexclamation, "警告"

endselect

endsub

機房收費系統(二)

目錄 機房收費系統敲了一部分,發現了很多之前沒有注意的地方,以前也是態度不夠嚴謹吧 也收穫了一些技巧和經驗。拿來給大家分享一下 發現的問題 sql server 轉換varchar值 6000000001 時溢位整數列。超過了其最大整數值。解決方法 將int型別,轉換為bigint 或 numeri...

機房收費系統之使用者登入

機房敲了乙個半月了,之前總是一直修改,需要好好的總結一下,首先是登陸窗體。登陸窗體 問題及重點 1.問題1實時錯誤 3704 物件關閉時,不允許操作 出現這個問題是因為前面寫了 mrc.close導致後面mrc1呼叫mrc資料集裡面的內容時無法呼叫。trim函式用來刪除乙個字串的字頭或字尾,刪除字串...

機房收費系統之登入窗體

private sub cmdok click dim txtsql as string dim txtsql1 as string dim mrc as adodb.recordset dim mrc1 as adodb.recordset dim msgtext as string dim fr...