如何实现 从身份证号中提取出生日期并判断性别 ，并显示在网页中

18位的身份证第17为数字表征性别,15位的身份证第15位表征性别   
   
  奇数为男性，偶数为女性   
   
  知道了这些，难道还有什么难的吗?   
   
  用Select   Case   就好了(If   ...   Then   ...   Else   ...   也可以)     
   
  Case   X   Mod   2   =1     
  男性   
  Case   X   Mod   2   =0     
  女性

15位提取前6位为地区编号，从第6位后6位为日期
<%
abc="342601800912461"  '15位的
aaa=mid(abc,6,6)
bbb=right(abc,1)
response.write "日期为："&mid(aaa,1,2)&"年"&mid(aaa,3,4)&"月"&mid(aaa,5,6)&"日"
if cint(bbb) mod 2=0 then
response.write "女性"
else
response.write "男性"
end if
%>

18位提取前6位为地区编号，从第6位后8位为日期
<%
abc="342601198009124617"  '18位的
aaa=mid(abc,6,8)
bbb=right(abc,2)
response.write "日期为："&mid(aaa,1,4)&"年"&mid(aaa,5,6)&"月"&mid(aaa,7,8)&"日"
if cint(left(bbb,1)) mod 2=0 then
response.write "女性"
else
response.write "男性"
end if
%>

[[it] 本帖最后由 hmhz 于 2008-4-5 18:21 编辑 [/it]]

谢谢二位了

我都看不懂

用正则表达式