당신에게로 떠나는 꿈속여행 - 꿈속나라(http://www.inyourdream.net) 입국하기 | 영주권 신청
  • 몸부림 골라골라
  • 소근소근
  • 도란도란
  • 낙서마당
  • 착각한아이
  • 숫자맞추기
  • 소원빌기
  • 흔적남기기
  • 꿈속여행
  • 친구집 놀러가기
  • 모두드림님의 홈
  • 在祐님의 홈
  • 현우님의 홈
  • 별아해님의 홈
  • 햇살님의 홈
  • 이나니님의 홈
  • 유리알님의 홈
  • 냠냠이님의 홈
  • 꼭지님의 홈
  • 대성님의 홈
    • 반야 / 2000-06-21 / 오후 1:07:20 / 210.207.238.52
    조회수 : 112
    [질문] 루프돌리는거 대신, 하나씩 오픈하기
    채영님 ~ 밑에 루프돌리는하다가, 뭔가 잘 안맞아서여 . 하나씩 오픈하려고 해봤는데, 밑에와 같이 에러가 나네요. 흑~ ratio를 뿌려는 주는 뷰가 애를 먹이는군요.
    라디오버튼 포함해서 처음부터 루프도리면 문제 없겠는데, ,,암튼, 밑에 난 에러좀 봐주세요. 흑흑~
    언제나 채영님의 성실한 답변에 감사하게 생각합니다.



    ---- 에러 메시지 ----
    Microsoft VBScript 컴파일 오류 error '800a03f6'

    'End'가 필요합니다

    /finaltest/betlist/rouge/test1.asp, line 156 >else ratio=rs2.Fields("ratio")
    end if ^ >


    ---- 에러라인의 코드 ----


    -----------------------------
    소스 중략.........
    <%
    set db = Server.CreateObject("ADODB.Connection")
    db.Open ("Dsn=xx;uid=xx;pwd=xx")

    SQL2 = "SELECT * from score_ratio"

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

    SQL2 = SQL2&" AND score_index_num=1"

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

    Rs2.Open SQL2,db

    %>


    <%

    SQL3 = "SELECT ratio from score_ratio"

    SQL3 = SQL3&" where league_num="& Request.QueryString
    ("idx3")

    SQL3 = SQL3&" AND score_index_num=2"

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

    Rs3.Open SQL3,db

    %>

    <%

    SQL4 = "SELECT ratio from score_ratio"

    SQL4 = SQL4&" where league_num="& Request.QueryString
    ("idx3")

    SQL4 = SQL4&" AND score_index_num=3"

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

    Rs4.Open SQL4,db

    %>



























    <%

    if Rs2.BOF and rs3.BOF and rs4.BOF then

    score_part_point=0
    score_part_person=0
    ratio=0

    %>



    KGL 레인보우 6 단식
    스코어 맞추기








    width="300">




















    valign="center">

    color="blue">스코어

    		 valign="center">

    color="blue">배당률
    type="radio" name="score_index_num" value="1">3:0
    <%=ratio%>
    type="radio" name="score_index_num" value="2">3:1
    <%=ratio%>
    type="radio" name="score_index_num" value="3">3:2
    <%=ratio%>







    총 참가인
    원 : <%=score_part_person%>
    총 배팅금
    액 : <%=score_part_point%>





    <%
    else

    score_part_point=rs2.Fields("score_part_point")
    score_part_person=rs2.Fields("score_part_person")



    %>





    KGL 레인보우 6 단식
    스코어 맞추기









    width="300">




















    valign="center">

    color="blue">스코어

    		 valign="center">

    color="blue">배당률
    type="radio" name="score_index_num" value="1">3:0
    <%if rs2.bof then ratio=0%> <%=ratio%><% else ratio=rs2.Fields("ratio")
    end if%><%=ratio%>
    type="radio" name="score_index_num" value="2">3:1
    <%if rs3.bof then ratio=0%> <%=ratio%><% else ratio=rs3.Fields("ratio")
    end if%><%=ratio%>
    type="radio" name="score_index_num" value="3">3:2
    <%if rs4.bof then ratio=0%> <%=ratio%><% else ratio=rs4.Fields("ratio")
    end if%><%=ratio%>







    총 참가인
    원 : <%=score_part_person%>
    총 배팅금
    액 : <%=score_part_point%>















    <% end if %>

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

    %>






    ---- 질문 내용 ----

    레코드셋을 하나씩 해당 score_num에 대해서 열었는데,
    에러가 나서요.
    밑에 해당 끌어 오는 뷰입니다.

    score_index_num , score_name , ratio ,
    1 3:0 1
    2 3:1 0.5
    3 3:2 2


    물론 맨처음 끌어오게 되면 레코드셋이 bof 이고요

    브라우저에서 처음 score_index_num 이 1 인 곳에 클릭하고, 넘어가고
    다시 실행시키면, 뷰에는 score_index_num이 1번인 ratio만
    나오게 되고, 나머지 는 레코드셋이 없으므로, ratio=0으로 찍어주어야합
    니다.
    이런씩으로 클릭할때마다, 뷰의 필드는 계속 증가는하는 형식입니다.

    흑흑~~~ 실력이 없다보니,,,,이리저리 공부해가면서 하고는 있는데, 잘
    안되네요.
    Byte * 200 Byte 이내로 입력하세요 이름 : 패스워드 :