<HTML>
<HEAD>
<TITLE>test.asp</TITLE>
<script language="javascript">
</script>
</HEAD>
<BODY>
*성적구하기*<BR>
<!-- <form method=제출유형 action=목적지파일> -->
<FORM method=post action="testok.asp">
이름: <INPUT TYPE=TEXT name=uname size=10 maxlength=20><BR>
국어: <INPUT TYPE="'text" NAME="kor" size=3 maxlength=3><br>
수학: <INPUT TYPE="'text" NAME="mat" size=3 maxlength=3><br>
영어: <INPUT TYPE="'text" NAME="eng" size=3 maxlength=3><br>
<input type=submit value="전송">
</FORM>
</BODY>
</HTML>
====================================================================
testok.asp
<%
Option Explicit '반드시 변수선언해라 p86
'testok.asp 저장하시오
Dim nm,k,m,e,avg
'nm=Request.QueryString("uname")
'k=CInt(Request.QueryString("kor"))
'm=CInt(Request.QueryString("mat"))
'e=CInt(Request.QueryString("eng"))
'nm=Request.Form("uname")
'k=CInt(Request.Form("kor"))
'm=CInt(Request.Form("mat"))
'e=CInt(Request.Form("eng"))
nm=Request("uname")
k=CInt(Request("kor"))
m=CInt(Request("mat"))
e=CInt(Request("eng")) '컬렉션 생략가능
avg=(k+m+e)/3
Response.write nm
Response.write "<br>"
Response.write k
Response.write "<br>"
Response.write m
Response.write "<br>"
Response.write e
Response.write "<br>"
Response.write avg
Response.write "<br>"
'평균이 95점이상이면 장학생 출력하시오
If (avg>=95) Then
Response.write "장학생"
End If
'평균이 70점이상이면 합격, 그렇지 않으면 불합격 출력하시오
If (avg>=70) Then
Response.write "합격"
Else
Response.write "불합격"
End If
'평균90이상 수, 80이상 우, 70이상 미, 60이상 양, 나머지 가 출력하시오
If (avg>=90) then
response.write "수"
ElseIf (avg>=80) then
response.write "우"
ElseIf (avg>=70) then
response.write "미"
ElseIf (avg>=60) then
response.write "양"
Else
response.write "가"
End If
'위 if문을 select문의 바꾸시오
Select Case CInt(avg/10)
Case 10
response.write "수"
Case 9
response.write "수"
Case 8
response.write "우"
Case 7
response.write "미"
Case 6
response.write "양"
Case else
response.write "가"
End Select
'평균10점당 ★한개씩 출력하시오
Dim su
For su=1 To CInt(avg/10)
response.write "★"
next
Dim n
for n=1 to 10 step 1
response.write ("사과")
response.write n
next
for n=1 to 10 step -2
response.write ("수박")
next
'Request객체 p230
'ASP객체
'객체=멤버변수+멤버함수(method)+컬렉션
'Request객체:사용자의 정보를 보관하는 객체
'Response객체:사용자에게 정보를 되돌려 줄때 사용
'Server객체
'Session객체
'Application객체
'ASP의 명령어는 대소문자 구분이 없다.
'Window.open()
'Window.status='lkjlkjklj'
'ASP주석
'ASP변수선언시 자료형 없음. dim 변수선언
'변수선언과 함께 초기값 설정 못함.
'Int a=3
'Dim a=3 틀린문법
'Dim b
'b=3
'Dim c : c=5
%>
'..열심히 공부하세.. > ASP' 카테고리의 다른 글
| 프로시저 연습 (0) | 2009.07.16 |
|---|---|
| 배열연습 (0) | 2009.07.16 |
| ASP 준비 (0) | 2009.07.07 |
| 요일 구하기 (0) | 2009.07.07 |
| 배열 과 등수구하기 (0) | 2009.07.07 |