最新數(shù)據(jù)庫(kù)課程設(shè)計(jì)員工信息管理系統(tǒng)免費(fèi)下載-文庫(kù)吧在線文庫(kù)
【正文】 ON FOR INSERT,UpdateAS IF EXISTS ( SELECT * FROM employee WHERE emp_name like 39。uid=ZFS。 在“系統(tǒng)DSN”選項(xiàng)卡下，單擊“添加”按鈕，彈出如圖（）所示對(duì)話框，在該對(duì)話框中選擇SQL Server選項(xiàng)。 amp。 amp。 amp。 amp。 amp。 amp。性別 男 女 = 0 39。設(shè)置各列的對(duì)齊方式 For i = 0 To 7 (i) = 0 Next i 39。按姓名查詢 If Len(Trim(Text1)) = 0 Then strName = Else strName = and =39。 39。 39。 amp。 39。 cboCheckYear amp。,39。 03 amp。 amp。 39。 cboCheckYear amp。 ) Else 39。 strCheck amp。填寫數(shù)據(jù) Do While Not = + 1 ( 1, 0) = (0).Value For i = 2 To ( 1, i) = (i 1).Value Next i Loop End If Label8 = 找到 amp。表頭項(xiàng)居中 = flexFillRepeat = 0 = 0 = 1 = 1 = 4 39。錯(cuò)誤！姓名中不可出現(xiàn)數(shù)字39。同時(shí)，我們逐漸掌握了對(duì)VB與SQL軟件的應(yīng)用，讓我們進(jìn)一步的提升了自己的知識(shí)。但通過(guò)查閱資料等方法，我們最終克服了這些困難。例如，圖（）中生日年份越界會(huì)出現(xiàn)警告： 2）系統(tǒng)設(shè)置了部分主要信息的錯(cuò)誤提示（輸入不能為空、姓名中不能出現(xiàn)數(shù)字、工號(hào)中只能出現(xiàn)數(shù)字、生日必須合法輸入、出勤次數(shù)必須大于缺勤、請(qǐng)假次數(shù)總和）：例一：flag1 = False flag2 = False For i = 1 To Len(Trim()) If Mid(Trim(), i, 1) = 0 And Mid(Trim(), i, 1) = 9 Then flag1 = True End If Next For i = 1 To Len(Trim()) If Mid(Trim(), i, 1) 0 Or Mid(Trim(), i, 1) 9 Then flag2 = True End IfNextIf Trim() = Then MsgBox 姓名不能為空，請(qǐng)重新輸入！, vbOKOnly + vbExclamation, 警告 = Exit Sub End If If flag1 = True Then MsgBox 姓名不能含有數(shù)字！, vbOKOnly + vbExclamation, 警告 = Exit Sub End If If flag2 = True Then MsgBox 工號(hào)只能含有數(shù)字！, vbOKOnly + vbExclamation, 警告 = Exit Sub End If If Not IsDate(Trim()) Then MsgBox 生日必須為合法日期，請(qǐng)重新輸入！, vbOKOnly + vbExclamation, 警告 = Exit Sub End If例二：If CInt(Trim()) CInt(Trim()) + CInt(Trim()) Then MsgBox 出勤次數(shù)過(guò)少！, vbOKOnly + vbExclamation, 警告 = Exit Sub End If例三：strSql = Select , from employee a,department b where = strSql, dbConn, adOpenForwardOnly, adLockReadOnly If Then MsgBox 沒(méi)有員工資料，請(qǐng)先輸入資料！, vbOKOnly + vbExclamation, 警告 = False Exit Sub End If3）使用觸發(fā)器，在底層保證數(shù)據(jù)安全性功能：使姓名中不能出現(xiàn)數(shù)字。 設(shè)置列數(shù) = 10 39。 strName amp。 cboCheckMonth amp。 amp。 10 amp。,39。 cboCheckYear amp。 39。 amp。 03 amp。,39。 cboCheckMonth amp。任意年份的指定月 strCheck = and in (39。 End If 39。 amp。職稱 strSql = Select title_id,title_name from title Order By title_id strSql, dbConn, adOpenForwardOnly, adLockReadOnly Do While Not ((title_name).Value) () = (title_id).Value Loop = 0 39。 order by strSql, dbConn, adOpenForwardOnly, adLockReadOnly If Then Label9 = 找到0條記錄 = 1 Else 39。 amp。打開一個(gè)數(shù)據(jù)集 strSql = select , from employee a,education b,department c,duty d,title e where = and = and = and = amp。 amp。 amp。 amp。其功能結(jié)構(gòu)如圖（）：：系統(tǒng)功能結(jié)構(gòu)圖員工信息管理系統(tǒng)主要包含用戶登錄、新增、編輯、查詢功能模塊。server=puter。,16,1) ROLLBACK RETURN END 建立索引create cluster index pk_duty on duty_idcreate cluster index pk_department on dept_idcreate cluster index pk_title on title_idcreate cluster index pk_education on edu_idcreate cluster index pk_sysuser on user_idcreate cluster index pk_employee on emp_idcreate cluster index p
公司管理相關(guān)推薦
鄂ICP備17016276號(hào)-1