============================================
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¹æ Â÷¸±Áö ¸ô¶ó¿ä,,,,
Æ÷Ç׿¡ »ì°Åµç¿ä,,,
Æ÷Ç׿À½Ã¸é,,, °×ºñ ¹«·á,,,,^^ (俵ÀÌ´Ô¸¸¿©) ¤»¤»
|