简单的ASP问题，大家来看看撒！在线等！ (50分)

看看下面的程序，这是一个会员注册的小程序，我点了提交后，他显示源代码，不显示结果不知道是程序的问题，还是ISS的问题，我觉得ISS都配置好了，其他的ASp程序都好好的，没出错,就这个老是出错！不知道那位能帮帮我撒！
<%@ language=VbScrip%>
<%option explicit
dim username,password,sex,tel,menu1,address,youbian,Email
dim founderr,errmsg
founderr=false
username=request.form("username")
if username="" then
founderr=true
errmsg=errmsg &amp;"姓名不能为空！"
end if
password=request.form("password")
if password="" then
founderr=true
errmsg=errmsg &amp;"密码不能为空！"
end if
address=request.form("address")
if address="" then
founderr=true
errmsg=errmsg &amp;"请填写你的联系地址！"
end if
youbian=request.form("youbian")
if youbian="" then
founderr=true
errmsg=errmsg &amp;"请填写邮政编码！"
end if
Email=request.form("Email")
if Email="" then
founderr=true
errmsg=errmsg &amp;"请填写你的Emai地址！"
end if
if founderr then
response.write errmsg
%>
。。。。。
中间是超文本程序
。。。。。
<%else

dim connstr,rs,sql
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "provider=microsoft.jet.oledb.4.0;data source="&amp;server.mappath("Data.mdb")
set rs= Server.CreateObject("ADODB.Recordset")
rs.open "select * from Reg",oConn
if rs.eof =true then

rs.movelast
end if
rs.addnew
rs("姓名")=userName
rs("密码")=password
rs("性别")=sex
rs("省份")=address
rs("邮编")=youbian
rs("Email")=Email
rs.update
rs.close
conn.close
set conn=nothing
set rs=nothing
%>
<script language="javascript">
alert("你的用户注册成功！谢谢！")
do
cument.loction="index.html"
</script>
<%end if%>

提交谁执行?
提交谁执行?
提交谁执行?

你的
<form method="POST" action="....asp">
...
</form>
呢？

这个是提交处理过程，和
<form method="POST" action="....asp">
...
</form＞
无关，我想可能是IIS的问题，还有你查一下这个目录下面是否生成了BAK文件，不行的话，重装一下IIS

生成了Bak文件

<%@ language=VbScrip%>---这里少个t

跟那里少了个t没有关系。
如果你是在设计阶段，直接在IE里面运行会那样。（所以你要把哪个文件放到你的web目录下）
如果你放到了IIS的WEB目录下，如果IIS正常的话，它会解析执行你的ASP文件，如果不执行
，说明是你的IIS出了问题。

谢谢大家的帮助！以后我会有很多问题要向大家请教的！

多人接受答案了。