我的。NET 为什么会出现原代码，原来测试的时候还是正常的，现在怎么成这了。

<%@Page Language="vb" ContentType="text/html" ResponseEncoding="gb2312"%>
<%
    Dim mybir AS date
    Dim last AS date
    Dim lastl AS date
    Dim st AS date
    Dim nf AS date
    Dim yf AS date
    Dim rq AS date
    mybir=#01/24/1985#
    st=CStr(Year(mybir)
    lastl=#18:00:00#
    last=CStr(second(lastl))
    nf=CStr(year(now()))
    yf=CStr(month(now()))
    rq=CStr(day(now()))
    Response.Write("我的生日是:" & mybir)
    Response.Write("<br>")
    Response.Write("今天是:" & nf & "/" & yf & "/" & rq )
    Response.Write("<br>")
    Response.Write("你今年:" & nf-st & "岁")
    Response.Write("<br>")
    Response.Write("现在是一年的第:" & datetime.now.dayofyear() & "年")
    Response.Write("<br>")
    Response.Write("离大年30还有" & 365-datetime.now.dayofyear() & "天")
    Response.Write("<br>")
    Response.Write("离下班时间还有" & last-datetime.now.second() & "秒")
    Response.Write("<br>")
%>