📄 language.asp
字号:
<%
Dim arr_Gender()'性别定义
Dim arr_National()'民族学历定义,下拉
Dim arr_Estab()'编制
Dim arr_Jobs()'职称
Dim arr_Political()'政治面貌定义,下拉
Dim arr_Entry()'入学学历定义,下拉
Dim colnum
Dim arr_lq()'录取状态
Dim arr_Sem(6)'定义学期
Dim arr_Opens()'选课状态
Dim arr_couweeks(7) '课时安排
Dim weeksinfo()
Dim infotit(3)
infotit(0)="信息管理"
infotit(1)="信息添加"
infotit(2)="信息修改"
infotit(3)="信息查看"
Sub dimarr(arrtypes)
Select Case arrtypes
Case "Sem"
Dim arr_Sem_i
arr_Sem(0)="error"
For arr_Sem_i=1 To UBound(arr_Sem)
arr_Sem(arr_Sem_i)="第"&arr_Sem_i&"学期"
Next
Case "lq"
ReDim arr_lq(1)
arr_lq(0)="处理中"
arr_lq(1)="正式录取"
Case "Gender"
ReDim arr_Gender(2)'性别定义
arr_Gender(0)="--"
arr_Gender(1)="男"
arr_Gender(2)="女"
Case "Opens"
ReDim arr_Opens(2)
arr_Opens(0)="--"
arr_Opens(1)="正常"
arr_Opens(2)="关闭"
Case "weeksinfo"
ReDim weeksinfo(7)
weeksinfo(1)="一"
weeksinfo(2)="二"
weeksinfo(3)="三"
weeksinfo(4)="四"
weeksinfo(5)="五"
weeksinfo(6)="六"
weeksinfo(7)="日"
Case "Political"
ReDim arr_Political(3)
arr_Political(0)="其它"
arr_Political(1)="群众"
arr_Political(2)="团员"
arr_Political(3)="党员"
Case "Jobs"
ReDim arr_Jobs(3)'职称
arr_Jobs(0)="教授"
arr_Jobs(1)="副教授"
arr_Jobs(2)="讲师"
arr_Jobs(3)="助教"
Case "Estab"
ReDim arr_Estab(3)'编制
arr_Estab(0)="无"
arr_Estab(1)="干部"
arr_Estab(2)="工人"
arr_Estab(3)="其他"
Case "Entry"
ReDim arr_Entry(9)
arr_Entry(0)="小学"
arr_Entry(1)="初中"
arr_Entry(2)="高中"
arr_Entry(3)="职高"
arr_Entry(4)="中专"
arr_Entry(5)="大专"
arr_Entry(6)="本科"
arr_Entry(7)="硕士"
arr_Entry(8)="博士"
arr_Entry(9)="其它"
Case "National"
ReDim arr_National(56)'民族学历定义,下拉
arr_National(0)="其它"
arr_National(1)="汉族"
arr_National(2)="壮族"
arr_National(3)="毛南族"
arr_National(4)="乌孜别克族"
arr_National(5)="塔塔尔族"
arr_National(6)="布依族"
arr_National(7)="土家族"
arr_National(8)="白族"
arr_National(9)="蒙古族"
arr_National(10)="畲族"
arr_National(11)="哈尼族"
arr_National(12)="高山族"
arr_National(13)="土族"
arr_National(14)="仡佬族"
arr_National(15)="俄罗斯族"
arr_National(16)="独龙族"
arr_National(17)="回族"
arr_National(18)="朝鲜族"
arr_National(19)="哈萨克族"
arr_National(20)="拉祜族"
arr_National(21)="达斡尔族"
arr_National(22)="锡伯族"
arr_National(23)="鄂伦春族"
arr_National(24)="鄂温克族"
arr_National(25)="藏族"
arr_National(26)="满族"
arr_National(27)="傣族"
arr_National(28)="水族"
arr_National(29)="仫佬族"
arr_National(30)="阿昌族"
arr_National(31)="德昂族"
arr_National(32)="赫哲族"
arr_National(33)="维吾尔族"
arr_National(34)="侗族"
arr_National(35)="黎族"
arr_National(36)="东乡族"
arr_National(37)="羌族"
arr_National(38)="普米族"
arr_National(39)="保安族"
arr_National(40)="门巴族"
arr_National(41)="苗族"
arr_National(42)="瑶族 "
arr_National(43)="傈僳族"
arr_National(44)="纳西族"
arr_National(45)="布朗族"
arr_National(46)="塔吉克族"
arr_National(47)="裕固族"
arr_National(48)="珞巴族"
arr_National(49)="彝族"
arr_National(50)="柯尔克孜族"
arr_National(51)="佤族"
arr_National(52)="景颇族"
arr_National(53)="撒拉族"
arr_National(54)="怒族"
arr_National(55)="京族"
arr_National(56)="基诺族"
Case Else
End select
End Sub
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -