才学asp.net,前两天编了一个简单的在线考试小程序,其中粗陋之极,,希望大家给点意见,我也好改正一下
代码如下:
代码如下:
1
<script language="vb" runat="server">
2
sub page_load(sender as object,e as eventargs)
3
response.cookies("mycookie").values("username")=name.text
4
response.cookies("mycookie").values("usernumber")=number.text
5
response.cookies("mycookie").values("yuan")=yuan.selecteditem.text
6
response.cookies("mycookie").values("lastvisited")=datetime.now.tolongtimestring()
7
response.cookies("mycookie").expires=datetime.now.adddays(7)
8
end sub
9
sub button_click(sender as object,e as eventargs)
10
dim mycookie as HttpCookie=request.cookies("mycookie")
11
message2.text="<h2>您登陆的时间为:" & mycookie.values("lastvisited") & "</h2>"
12
if number.text mod 2=0 then
13
juan2.visible="true"
14
juan1.visible="false"
15
message1.text="<h2>您的姓名为:" & name.text & "<br>" & "您的学号为:" & number.text & "<br>" & "您是" & yuan.selecteditem.text & "的学生,您的学号为偶数,做B卷</h2>"
16
else
17
juan1.visible="true"
18
juan2.visible="false"
19
message1.text="<h2>您的姓名为:" & name.text & "<br>" & "您的学号为:" & number.text & "<br>" & "您是" & yuan.selecteditem.text & "的学生,您的学号为奇数,做A卷</h2>"
20
end if
21
end sub
22
sub button2_click(sender as object,e as eventargs)
23
dim msg as string=""
24
if radiobuttonlist.items(2).selected
25
msg=msg & "<br>" & "<h3>您做对了,恭喜您得100分</h3>"
26
else
27
msg=msg & "<br>" & "<h3>您做错了,继续努力把</h3>"
28
end if
29
if page.isvalid then
30
message.text=msg
31
end if
32
end sub
33
sub button3_click(sender as object,e as eventargs)
34
dim msg as string=""
35
if today.items(2).selected or today.items(3).selected then
36
msg=msg & "<br>" & "<h3>您做错了,继续努力把</h3>"
37
else
38
msg=msg & "<br>" & "<h3>您做对了,恭喜您得100分</h3>"
39
end if
40
if page.isvalid then
41
message0.text=msg
42
end if
43
end sub
44
sub button1_click(sender as object,e as eventargs)
45
page.response.redirect("\index.aspx")
46
end sub
47
</script>
48
<head>
49
<style type="text/css">
50
<!--
51
body {background-color: #98AB6F }
52
h1 {font: 16pt/18pt "Arial"; font-weight: bold; color: maroon}
53
h2 {font: 13pt/15pt "Arial"}
54
h3 {font: 14pt/16pt "Arial"; font-weight: bold; color:crimson}
55
-->
56
</style>
57
</head>
58
<body>
59
<form runat="server">
60
<asp:panel runat="server" id="ziliao">
61
<fieldset>
62
<legend><h1>个人资料<h1></legend>
63
姓名:
64
<asp:textbox runat="server" id="name" columns="7"/>
65
<asp:requiredfieldvalidator runat="server" controltovalidate="name" errormessage="请输入姓名"/>
66
<br>
67
学号:
68
<asp:textbox runat="server" id="number" columns="7"/>
69
<asp:regularexpressionvalidator runat="server" enableclientscript="false" controltovalidate="number" validationexpression="[0-9]{7}" errormessage="学号输入有误"/>
70
<asp:requiredfieldvalidator runat="server" controltovalidate="number" errormessage="请输入学号"/>
71
<br>
72
学院:
73
<asp:dropdownlist runat="server" id="yuan">
74
<asp:listitem>海洋学院</asp:listitem>
75
<asp:listitem>信息学院</asp:listitem>
76
<asp:listitem>人文学院</asp:listitem>
77
<asp:listitem>食品学院</asp:listitem>
78
</asp:dropdownlist>
79
</fieldset>
80
<asp:button runat="server" text="提交资料" id="button" onclick="button_click"/>
81
<asp:button runat="server" text="重新填写" id="button1" onclick="button1_click"/>
82
</asp:panel>
83
<asp:label runat="server" id="message1"/>
84
<span id=applelew>
85![](/Images/OutliningIndicators/None.gif)
86
<script>
87
function show2(){
88
if (!document.all)
89
return
90
var Digital=new Date()
91
var hours=Digital.getHours()
92
var minutes=Digital.getMinutes()
93
var seconds=Digital.getSeconds()
94
if (minutes<=9)
95
minutes="0"+minutes
96
if (seconds<=9)
97
seconds="0"+seconds
98
var ctime=hours+":"+minutes+":"+seconds+" "
99
applelew.innerHTML="<h2 style='color:blue;'>现在的时间是:"+ctime+"</h2>"
100
setTimeout("show2()",1000)
101
}
102
window.onload=show2
103
</script>
104
</span>
105
<asp:label runat="server" id="message2"/>
106
<asp:panel runat="server" id="juan1" visible="false">
107
<fieldset>
108
<legend><h1>A卷题目:</h1></legend>
109
明末引清兵进关的是:<br>
110
<asp:radiobuttonlist runat="server" id="radiobuttonlist" repeatdirection="horizontal">
111
<asp:listitem>吴一桂</asp:listitem>
112
<asp:listitem>吴二桂</asp:listitem>
113
<asp:listitem>吴三桂</asp:listitem>
114
<asp:listitem>吴四桂</asp:listitem>
115
</asp:radiobuttonlist>
116
<br>
117
<asp:button runat="server" text="提交" id="button2" onclick="button2_click"/>
118
<br>
119
<asp:label runat="server" id="message"/>
120
</fieldset>
121
</asp:panel>
122
<asp:panel runat="server" id="juan2" visible="false">
123
<fieldset>
124
<legend><h1>B卷题目:</h1></legend>
125
中国的政治和经济中心分别是:<br>
126
<asp:checkboxlist runat="server" id="today" repeatdirection="horizontal">
127
<asp:listitem>北京</asp:listitem>
128
<asp:listitem>上海</asp:listitem>
129
<asp:listitem>西藏</asp:listitem>
130
<asp:listitem>山东</asp:listitem>
131
</asp:checkboxlist>
132
<br>
133
<asp:button runat="server" text="提交" id="button3" onclick="button3_click"/>
134
<br>
135
<asp:label runat="server" id="message0"/>
136
</fieldset>
137
</asp:panel>
138
</form>
139
</body>
140
</html>
![](/Images/OutliningIndicators/None.gif)
2
![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
3
![](/Images/OutliningIndicators/InBlock.gif)
4
![](/Images/OutliningIndicators/InBlock.gif)
5
![](/Images/OutliningIndicators/InBlock.gif)
6
![](/Images/OutliningIndicators/InBlock.gif)
7
![](/Images/OutliningIndicators/InBlock.gif)
8
![](/Images/OutliningIndicators/ExpandedBlockEnd.gif)
9
![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
10
![](/Images/OutliningIndicators/InBlock.gif)
11
![](/Images/OutliningIndicators/InBlock.gif)
12
![](/Images/OutliningIndicators/InBlock.gif)
13
![](/Images/OutliningIndicators/InBlock.gif)
14
![](/Images/OutliningIndicators/InBlock.gif)
15
![](/Images/OutliningIndicators/InBlock.gif)
16
![](/Images/OutliningIndicators/InBlock.gif)
17
![](/Images/OutliningIndicators/InBlock.gif)
18
![](/Images/OutliningIndicators/InBlock.gif)
19
![](/Images/OutliningIndicators/InBlock.gif)
20
![](/Images/OutliningIndicators/InBlock.gif)
21
![](/Images/OutliningIndicators/ExpandedBlockEnd.gif)
22
![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
23
![](/Images/OutliningIndicators/InBlock.gif)
24
![](/Images/OutliningIndicators/InBlock.gif)
25
![](/Images/OutliningIndicators/InBlock.gif)
26
![](/Images/OutliningIndicators/InBlock.gif)
27
![](/Images/OutliningIndicators/InBlock.gif)
28
![](/Images/OutliningIndicators/InBlock.gif)
29
![](/Images/OutliningIndicators/InBlock.gif)
30
![](/Images/OutliningIndicators/InBlock.gif)
31
![](/Images/OutliningIndicators/InBlock.gif)
32
![](/Images/OutliningIndicators/ExpandedBlockEnd.gif)
33
![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
34
![](/Images/OutliningIndicators/InBlock.gif)
35
![](/Images/OutliningIndicators/InBlock.gif)
36
![](/Images/OutliningIndicators/InBlock.gif)
37
![](/Images/OutliningIndicators/InBlock.gif)
38
![](/Images/OutliningIndicators/InBlock.gif)
39
![](/Images/OutliningIndicators/InBlock.gif)
40
![](/Images/OutliningIndicators/InBlock.gif)
41
![](/Images/OutliningIndicators/InBlock.gif)
42
![](/Images/OutliningIndicators/InBlock.gif)
43
![](/Images/OutliningIndicators/ExpandedBlockEnd.gif)
44
![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
45
![](/Images/OutliningIndicators/InBlock.gif)
46
![](/Images/OutliningIndicators/ExpandedBlockEnd.gif)
47
![](/Images/OutliningIndicators/None.gif)
48
![](/Images/OutliningIndicators/None.gif)
49
![](/Images/OutliningIndicators/None.gif)
50
![](/Images/OutliningIndicators/None.gif)
51
![](/Images/OutliningIndicators/None.gif)
52
![](/Images/OutliningIndicators/None.gif)
53
![](/Images/OutliningIndicators/None.gif)
54
![](/Images/OutliningIndicators/None.gif)
55
![](/Images/OutliningIndicators/None.gif)
56
![](/Images/OutliningIndicators/None.gif)
57
![](/Images/OutliningIndicators/None.gif)
58
![](/Images/OutliningIndicators/None.gif)
59
![](/Images/OutliningIndicators/None.gif)
60
![](/Images/OutliningIndicators/None.gif)
61
![](/Images/OutliningIndicators/None.gif)
62
![](/Images/OutliningIndicators/None.gif)
63
![](/Images/OutliningIndicators/None.gif)
64
![](/Images/OutliningIndicators/None.gif)
65
![](/Images/OutliningIndicators/None.gif)
66
![](/Images/OutliningIndicators/None.gif)
67
![](/Images/OutliningIndicators/None.gif)
68
![](/Images/OutliningIndicators/None.gif)
69
![](/Images/OutliningIndicators/None.gif)
70
![](/Images/OutliningIndicators/None.gif)
71
![](/Images/OutliningIndicators/None.gif)
72
![](/Images/OutliningIndicators/None.gif)
73
![](/Images/OutliningIndicators/None.gif)
74
![](/Images/OutliningIndicators/None.gif)
75
![](/Images/OutliningIndicators/None.gif)
76
![](/Images/OutliningIndicators/None.gif)
77
![](/Images/OutliningIndicators/None.gif)
78
![](/Images/OutliningIndicators/None.gif)
79
![](/Images/OutliningIndicators/None.gif)
80
![](/Images/OutliningIndicators/None.gif)
81
![](/Images/OutliningIndicators/None.gif)
82
![](/Images/OutliningIndicators/None.gif)
83
![](/Images/OutliningIndicators/None.gif)
84
![](/Images/OutliningIndicators/None.gif)
85
![](/Images/OutliningIndicators/None.gif)
86
![](/Images/OutliningIndicators/None.gif)
87
![](/Images/OutliningIndicators/ExpandedBlockStart.gif)
88
![](/Images/OutliningIndicators/InBlock.gif)
89
![](/Images/OutliningIndicators/InBlock.gif)
90
![](/Images/OutliningIndicators/InBlock.gif)
91
![](/Images/OutliningIndicators/InBlock.gif)
92
![](/Images/OutliningIndicators/InBlock.gif)
93
![](/Images/OutliningIndicators/InBlock.gif)
94
![](/Images/OutliningIndicators/InBlock.gif)
95
![](/Images/OutliningIndicators/InBlock.gif)
96
![](/Images/OutliningIndicators/InBlock.gif)
97
![](/Images/OutliningIndicators/InBlock.gif)
98
![](/Images/OutliningIndicators/InBlock.gif)
99
![](/Images/OutliningIndicators/InBlock.gif)
100
![](/Images/OutliningIndicators/InBlock.gif)
101
![](/Images/OutliningIndicators/InBlock.gif)
102
![](/Images/OutliningIndicators/InBlock.gif)
103
![](/Images/OutliningIndicators/InBlock.gif)
104
![](/Images/OutliningIndicators/InBlock.gif)
105
![](/Images/OutliningIndicators/InBlock.gif)
106
![](/Images/OutliningIndicators/InBlock.gif)
107
![](/Images/OutliningIndicators/InBlock.gif)
108
![](/Images/OutliningIndicators/InBlock.gif)
109
![](/Images/OutliningIndicators/InBlock.gif)
110
![](/Images/OutliningIndicators/InBlock.gif)
111
![](/Images/OutliningIndicators/InBlock.gif)
112
![](/Images/OutliningIndicators/InBlock.gif)
113
![](/Images/OutliningIndicators/InBlock.gif)
114
![](/Images/OutliningIndicators/InBlock.gif)
115
![](/Images/OutliningIndicators/InBlock.gif)
116
![](/Images/OutliningIndicators/InBlock.gif)
117
![](/Images/OutliningIndicators/InBlock.gif)
118
![](/Images/OutliningIndicators/InBlock.gif)
119
![](/Images/OutliningIndicators/InBlock.gif)
120
![](/Images/OutliningIndicators/InBlock.gif)
121
![](/Images/OutliningIndicators/InBlock.gif)
122
![](/Images/OutliningIndicators/InBlock.gif)
123
![](/Images/OutliningIndicators/InBlock.gif)
124
![](/Images/OutliningIndicators/InBlock.gif)
125
![](/Images/OutliningIndicators/InBlock.gif)
126
![](/Images/OutliningIndicators/InBlock.gif)
127
![](/Images/OutliningIndicators/InBlock.gif)
128
![](/Images/OutliningIndicators/InBlock.gif)
129
![](/Images/OutliningIndicators/InBlock.gif)
130
![](/Images/OutliningIndicators/InBlock.gif)
131
![](/Images/OutliningIndicators/InBlock.gif)
132
![](/Images/OutliningIndicators/InBlock.gif)
133
![](/Images/OutliningIndicators/InBlock.gif)
134
![](/Images/OutliningIndicators/InBlock.gif)
135
![](/Images/OutliningIndicators/InBlock.gif)
136
![](/Images/OutliningIndicators/InBlock.gif)
137
![](/Images/OutliningIndicators/InBlock.gif)
138
![](/Images/OutliningIndicators/InBlock.gif)
139
![](/Images/OutliningIndicators/InBlock.gif)
140
![](/Images/OutliningIndicators/InBlock.gif)