꿈속나라

당신에게로 떠나는 꿈속여행 - 꿈속나라(http://www.inyourdream.net)

입국하기 | 영주권 신청

몸부림 골라골라

소근소근

도란도란

낙서마당

착각한아이

숫자맞추기

소원빌기

흔적남기기

꿈속여행

친구집 놀러가기

모두드림님의 홈

在祐님의 홈

현우님의 홈

별아해님의 홈

햇살님의 홈

이나니님의 홈

유리알님의 홈

냠냠이님의 홈

꼭지님의 홈

대성님의 홈

반야 / 2000-06-29 / 오후 6:52:02 / 210.207.238.52
조회수 : 159

[질문] 채영님 질문한가지더~~ rs() 문제

저번에 한 번 질문드렸던건데,
레코드 필드들을 끌어오는 부분입니다.end if가 없다는 에러 였죠. 이번에 조금 바꾸어 봤는데, 안되네요.
에러 메세지는

Microsoft VBScript 컴파일 오류 error '800a03ea'

구문 오류

/finaltest/Adclick/win_ratio/test1.asp, line 44 >elseif !=isNull(rs2(0)) then ratio=rs2(0).Fields("ratio") ^ >

<%
set db=server.CreateObject("ADODB.connection")

db.Open ("dsn=xx;uid=xx;pwd=xx;)

SQL2 = "SELECT * from ratio_ratio "

SQL2 = SQL2&" where league_num="& Request.QueryString("league_num")

SQL2 = SQL2&" AND item_num="& request("item_num")

Set Rs2 = Server.CreateObject("ADODB.Recordset")

Rs2.Open SQL2,db,1,2

%>

1 위 팀 예 상 승 률

0.7%미만

<%if isnull(rs2(0)) then ratio=0%><%=ratio%><%elseif !=isNull(rs2(0)) then ratio=rs2(0).Fields("ratio") %><%=ratio%>
0.7% ~ 0.75%

<%elseif isnull(rs2(1)) then ratio=0%><%=ratio%><%elseif <>isnull(rs2(1)) then ratio=rs2(1).Fields("ratio") f%><%=ratio%>

0.75% ~ 0.8%

<%elseif isnull(rs2(2)) then ratio=0%><%=ratio%><%elseif <>isnull(rs2(2)) then ratio=rs2(2).Fields("ratio") %><%=ratio%>
0.8% ~ 0.85%

<%elseif isnull(rs2(3)) then ratio=0%><%=ratio%><%elseif <>isnull(rs2(3)) then ratio=rs2(3).Fields("ratio") %><%=ratio%>

0.85% ~ 0.9%

<%elseif isnull(rs2(4)) then ratio=0%><%=ratio%><%elseif <> isnull(rs2(4)) then ratio=rs2(4).Fields("ratio")f%><%=ratio%>
0.9% ~ 0.95%

<%elseif isnull(rs2(5)) then ratio=0%><%=ratio%><%elseif <>isnull(rs2(5)) then ratio=rs2(5).Fields("ratio") %><%=ratio%>

0.95%이상

<%elseif isnull(rs2(6)) then ratio=0%><%=ratio%><%elseif <>isnull(rs2(6)) then ratio=rs2(6).Fields("ratio") end if%><%=ratio%>

총 참여인원 : <%=total_person%> 명

총 합계금액 : <%=total_point%> point

<%
Rs.Close
db.Close
Set Rs = Nothing
Set db = Nothing
%>

등록한 Password와 일치해야 삭제가 됩니다.
Password

Password를 입력하세요.