꿈속나라

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

입국하기 | 영주권 신청

몸부림 골라골라

착각한아이

숫자맞추기

흔적남기기

친구집 놀러가기

모두드림님의 홈

在祐님의 홈

현우님의 홈

별아해님의 홈

햇살님의 홈

이나니님의 홈

유리알님의 홈

냠냠이님의 홈

꼭지님의 홈

대성님의 홈

등록하실때는 필수항목을 모두 입력하셔야 합니다.

이름 *	HTML 사용
제목 *
내용 *	> > 다이어리 로직으로 아래와 같이 출력하려 하는데 > > 일월화수목금토일일월화수목금토일... > > 1 2 3 4 5 6 7 8 9 10 11... > > 처리 부분이 맘데로 안되는군요 > > > > <table border='1' bordercolor='white' width='100%' cellpadding='1' cellspacing='1' background='img/dot1.gif'> > > <% > > Stop_Flag=0 > > intFirstWeekday=Weekday(datFirstDay, vbSunday) '넘겨받은 날짜의 주초기값 파악 > > intPrintDay=1 > > for intLoopWeek=1 to 6 '주단위 루프 시작, 최대 6주 > > Response.write "<tr> <td align=center bgcolor=#EBEBEB><font face=굴림 size=2 color=#5B98FF><b>일</b></font></td> <td align=center bgcolor=#EBEBEB><font face=굴림 size=2 color=#5B98FF><b>월</b></font></td> <td align=center bgcolor=#EBEBEB><font face=굴림 size=2 color=#5B98FF><b>화</b></font></td> <td align=center bgcolor=#EBEBEB><font face=굴림 size=2 color=#5B98FF><b>수</b></font></td> <td align=center bgcolor=#EBEBEB><font face=굴림 size=2 color=#5B98FF><b>목</b></font></td> <td align=center bgcolor=#EBEBEB><font face=굴림 size=2 color=#5B98FF><b>금</b></font></td> <td align=center bgcolor=#EBEBEB><font face=굴림 size=2 color=#5B98FF><b>토</b></font></td> "&vbCR > > Response.Write "</tr><tr>"&vbCR > > for intLoopDay=1 to 7 '요일단위 루프 시작, 일요일부터 > > > > if intFirstWeekDay > 1 then '첫주시작일이 1보다 크면 > > > > Response.Write "<td bgcolor=#FFFFEE align=center valign=top><font face=굴림 size=2 color=white>.</font>"&vbCR > > intFirstWeekDay=intFirstWeekDay-1 > > else ' > > if intPrintDay > intLastDay then '입력날짜가 월말보다 크다면 > > Response.Write "<td bgcolor=#FFFFEE align=center valign=top><font face=굴림 size=2 color=white>.</font>"&vbCR > > else '입력날짜가 현재월에 해당되면 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++// > > if intThisYear-NowThisYear=0 and intThisMonth-NowThisMonth=0 and intPrintDay-intThisDay=0 then > > '//오늘 날짜일 경우 배경색을 다르게 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++// > > Response.Write "<td align=center valign=top bgcolor=#EEEEEE><b><a href=diary.asp?d=d&F_Year="&intThisYear&"&F_Month="&intThisMonth&"&F_Day="&intPrintDay&" title=오늘일정보기><font face=굴림 size=2 color=black>"&intPrintDay&"</font></a></b><br>"&vbCR > > elseif intLoopDay=1 then '일요일이면 빨간 색으로 > > Response.Write "<td bgcolor=#FFFFEE align=center valign=top><a href=diary.asp?d=d&F_Year="&intThisYear&"&F_Month="&intThisMonth&"&F_Day="&intPrintDay&" ><font face=굴림 size=2 color=red>"&intPrintDay&"</font></a><br>"&vbCR > > elseif intLoopDay=7 then '토요일이면 #FF9999 색으로 > > Response.Write "<td bgcolor=#FFFFEE align=center valign=top><a href=diary.asp?d=d&F_Year="&intThisYear&"&F_Month="&intThisMonth&"&F_Day="&intPrintDay&" ><font face=굴림 size=2 color=#FF9999>"&intPrintDay&"</font></a><br>"&vbCR > > else ' 그외의 경우 검정색으로 처리하였으나,스타일로 인해 코딩이 먹지 않는군....쩝^^ > > Response.Write "<td bgcolor=#FFFFEE align=center valign=top><font face=굴림 size=2 color=Black><a href=diary.asp?d=d&F_Year="&intThisYear&"&F_Month="&intThisMonth&"&F_Day="&intPrintDay&" >"&intPrintDay&"</a></font><br>"&vbCR > > end if > > end if > > intPrintDay=intPrintDay+1 '날짜값을 1 증가 > > if intPrintDay > intLastDay then '만약 날짜값이 월말값보다 크면 루프문 탈출 > > Stop_Flag=1 > > end if > > end if > > Response.Write "</td>" > > next > > Response.Write "</tr>" > > if Stop_Flag=1 then > > exit for > > end if > > next > > Set rslink=Nothing > > %> > ----------------------------------------------------------- > > 질문내용과 아래소스가 무슨 관계가 있는지 알수가 없군요... > > 질문내용대로 차례대로 출력하시고자 하시면 > > 먼저 그 달의 첫번째 일이 무슨 요일인지 구하신 다음 > > 그 달의 마지막 날을 구해서 그기까지 루프를 돌리면 되겠죠. > > <table> > <tr> > <% > intWeekday=Weekday(datFirstDay, vbSunday) > > for i=1 to Max_Day%> > <td> > <% > select case intWeekday > case 1 > Response.Write "일" > case 2 > Response.Write "월" > case 3 > Response.Write "화" > case 4 > Response.Write "수" > case 5 > Response.Write "목" > case 6 > Response.Write "금" > case 7 > Response.Write "토" > end select > > Response.Write "<br>"&i > > intWeekday=intWeekday+1 > > if intWeekday=8 then > intWeekday=1 > end if%> > </td> > <%next%> > </tr> > </table> > > 아니면 해당 날짜를 입력하여 그 날이 무슨 요일인지 알 수 있는 > > WeekdayName 함수를 이용하여 출력하는 방법도 있습니다. > > 그럼..... > > -----------------------------------------------------------

추가할 이미지를 입력하세요.

이미지 1
이미지설명 1

추가할 자료를 입력하세요.

자료 1
자료설명 1

추가할 싸이트를 입력하세요.

관련싸이트 1
싸이트설명 1

Password *