脚本编写出问题了！大侠帮忙

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="test.aspx.vb" Inherits="_Default" %><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script language="vbscript" runat="server">
    Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs)
        Dim NowTime As Date = Now()
        Dim DayOfWeek As Integer = Date.Today.DayOfWeek
        body1.InnerHtml = "现在的时间是" & NowTime & "今天是星期" & DayOfWeek
        
    End Sub
    </script>
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">   
    <title>使用HTML控件 </title>
</head>
<body id="body1" runat="server">
    <form id="form1" runat="server">
    <div>
    
    </div>
    </form>
</body>
</html>
网页中没有出现这样的效果，网页中是空白页，没有出现预想中的报时，请问是什么原因？

解决方案 »

  1.   

    body1.InnerHtml = "现在的时间是" & NowTime & "今天是星期" & DayOfWeek 这样写有问题吧
    你可以在form  添加一个控件
    然后控件的值= "现在的时间是" & NowTime & "今天是星期" & DayOfWeek 
      

  2.   

    2楼说的我知道，不过我是新手，我想不直接在form中添加控件，而是通过代码实现，不知道这样行不行
      

  3.   

    <script language="vbscript" runat="server"> 
        Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) 
            Dim NowTime As Date = Now() 
            Dim DayOfWeek As Integer = Date.Today.DayOfWeek 
            body1.InnerHtml = "现在的时间是" & NowTime & "今天是星期" & DayOfWeek 
            
        End Sub 
        </script>楼主这是你写的js代码？runat="server" 这是什么？后台js代码？脚本？
      

  4.   

    vb我不太会，不知道是不是你表达的不对，如果
    <script language="vbscript" runat="server"> 
        Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs) 
            Dim NowTime As Date = Now() 
            Dim DayOfWeek As Integer = Date.Today.DayOfWeek 
            body1.InnerHtml = "现在的时间是" & NowTime & "今天是星期" & DayOfWeek 
            
        End Sub 
        </script> 
    这些你想说是服务器端代码的话，那么你看看cs文件中是不是也有page_load方法，如果有的话，请删掉，因为如有cs中page_Load方法，aspx页面的中的page_load方法就执行不了
      

  5.   

    恩，cs文件中没有，我知道了。谢谢大虾，我调试出来了，不过我有个地方不是很明白， 
       Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
            Ancho1.InnerText = "点击这里将在新窗口中打开暨南大学的网页"
            Ancho1.HRef = "http://www.jnu.edu.cn"
            Ancho1.Target = "_blank"
            Ancho1.Title = "访问暨南大学"    End Sub
    这是我在cs文件中添加的函数，这个就根本没用到脚本，请问脚本到底是什么用的啊
      

  6.   

    这位小虾，你在Javascript 里面写的脚本是一个加载脚本，你在那个CS文件中调用那个脚本了。