|
|
 |
|
한스 / 2001-02-07 / 오후 1:30:28 / 203.228.58.137
조회수 : 131
|
| [질문] 생일일을 구현할려구 하는데..... |
> > ============================================
> >
> > Set DbCon = Server.CreateObject("ADODB.Connection")
> > DbCon.Open "ABC", "sa", ""
> >
> > SQLstmt2 = "SELECT id,userid,username,sex,idnumber FROM member order by id desc "
> > Set DbRec=Server.CreateObject("ADODB.RecordSet")
> > DbRec.Open SQLstmt2, DbCon,1
> >
> >
> > strMonth = cint(Month(now))
> > strDay = cint(Day(now))
> >
> > if cint(strMonth) < 10 then
> > strMonth = "0" & strMonth
> > end if
> >
> > if cint(strDay) < 10 then
> > strDay = "0" & strDay
> > end if
> >
> > today = strMonth & strDay
> >
> > if not DbRec.eof then
> >
> > for j=1 to ucount
> >
> > if j MOD 2 = 0 then
> > Response.Write ""
> > Response.Write ""
> >
> > else
> >
> > Response.Write ""
> > Response.Write ""
> >
> > end if
> >
> > aaa=left(DbRec(4),6)
> > bbb=right(aaa,4)
> >
> >
> > Response.Write " "
> > Response.Write ""&DbRec(2)&""
> > Response.Write "("&DbRec(3)&")"
> >
> > DbRec.MoveNext
> >
> > next
> > else
> > Response.Write ""
> > Response.Write "오늘 생일인사람이 없군요!"
> >
> > end if
> > DbRec.Close
> >
> > ================================================
> > 별아해님의 사이트에보이는 생일일을 구현할려구하는데요~
> > 주민번호를 채킹해서 생년월일을 구할려구요.
> >
> > 근데 문제가여 주민번호 앞자리가 6자리 잖아요
> > 뒤에 4자리만은(위의 bbb) 구할수있는데....
> >
> > 이 구한4자리를 현재 날짜와 같다면, 보여주고
> > 아니면 안보여주게 만들려는데....
> >
> > 잘 안돼네요^^
> > if문을 for문 안에 넣으니깐 next가 필요하다고 에러나데요....
> > 어케하면 돼죠,,,,????
> > 쩝,,, 어제 묻고 오늘 또 묻고,,, 맨날 묻는맨임다,,,
> > 머리는 나쁘고,어려픈,,,ASP를 할려니... 미치겠어요!
> > 왕ASP의 채영이님... 부탁드립니다,,,
> >
> > 그래도 여기저기 타 사이트 보다,,,
> > 여기 꿈속나라가 최고로 답변이빠르고,,,잘해결되는것 같아요.저같이 왕초보에겐 이런사이트가 얼마나
> > 큰 도움이 되는지...
> >
> > 어떻게 보답을하지....
> >
> > 아참 저,,, PC방 차릴지 몰라요,,,,
> > 포항에 살거든요,,,
> > 포항오시면,,, 겜비 무료,,,,^^ (채영이님만여) ㅋㅋ
> >
> >
> -----------------------------------------------------------
>
> 소스가 어찌 된건지 정확히 모르겠어요... ^^;
>
> 회원들을 전부 뽑아서 주민등록번호랑 오늘날짜랑 비교해서
>
> 생일인 사람을 2줄로 뿌려주시려고 하시는 건가요?
>
> 이렇게 SQL 구문을 고쳐보면 어떨까요?
>
> 주민등록번호에 오늘날짜가 들어가 있는 사람만을 SELECT 하도록 말이지요...
>
> strMonth = cint(Month(now))
> strDay = cint(Day(now))
>
> if cint(strMonth) < 10 then
> strMonth = "0" & strMonth
> end if
>
> if cint(strDay) < 10 then
> strDay = "0" & strDay
> end if
>
> today = strMonth & strDay
>
> SQLstmt2 = "SELECT id, userid, username, sex, idnumber FROM member WHERE idnumber LIKE '__"&today&"%' ORDER BY id DESC"
>
> LIKE 구문을 응용해서요...
>
> 주민번호의 앞의 2자리는 아무거나 오고 그다음에 오는
>
> 4자리가 오늘날짜와 같고
>
> 그리고 뒤의 자리는 아무거라도 상관이 없게없구요...
>
> 이렇게 하면 만약에 오늘이 02월 05일에
>
> 주민번호가 710412-2020512같은 경우 같이
>
> 뒤에 7자리에는 오늘 날짜가 들어 있더라도 SELECT 되지 않고...
>
> 바로 되겠지요... 그럼....
>
> 혹... 포항에 가서 할일이 없으면 시간 때울곳은 생겼네요.... 후후...
>
>
--------------------------------------------------
ㅋ 저도 생각은 해봤는데... 방법을 몰라서리...
셀렉트문에서 제어하면 아주 쉽게 해결되는군요^^
1차는 해결 됬네요^^
근데여,,, 또 문제가 있어요,,,
제가 만든건 30명만 찾아서 뿌려주는건데요
이렇게....
====================================
<%if DbRec.Eof then %>
회원중 오늘생일이신 분이 없군요!
<%Else%>
<%
i = 0
Do while NOT DbRec.EOF or DbRec.BOF
if i = 30 Then
Exit do
end if
Response.Write ""&DbRec(2)&""
Response.Write "("&DbRec(3)&")"
i = i + 1
DbRec.MoveNext
Loop
DbRec.Close
Set DbRec = Nothing
end if
%>
===========================================
모두 찾게 할려면 위 소스중 뭘 고쳐야 하나요???
이건 완전 ASP기초중 기초일것 같은데....
해결 못하겠네요,,,,역시 난 왕초보야~~~~~~~
---------------------------------------------
포항을 아시나요?
ㅋ,,, 잘됐다,,,,
함 놀러오세요,,,,,
메일주시구여,,,,,
잘해드려야쥐....ㅋㅋㅋ
저두 겜방하면서여,,, 오프라인 매장을 할려구요
인터넷 온라인 쇼핑몰을 하면서,,,,
샘플을 저희 겜방에 진열할려구해여,,,
온라인 과 오프라인이 서로 협력해서,,,,
쇼핑몰을 운영할려구여...............
어떤분이 쇼핑몰소스를 주길래....덥석 받아서,,,,
조금 고쳐서 쓰고 있는데....
입점이 좀 시언찮아서,,,,
오프라인 매장을 겜방으로 만들어 할려구해여,,,,
잘될지는 몰지만,,,ㅋㅋㅋ
|
|
|
|