脚本编写出有关问题了！大侠帮忙
日期：2014-05-18 浏览次数：20444 次
脚本编写出问题了！大侠帮忙
<%@ 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>
网页中没有出现这样的效果，网页中是空白页，没有出现预想中的报时，请问是什么原因？
------解决方案--------------------
body1.InnerHtml = "现在的时间是" & NowTime & "今天是星期" & DayOfWeek
这样写有问题吧
你可以在form 添加一个控件
然后控件的值= "现在的时间是" & NowTime & "今天是星期" & DayOfWeek
------解决方案--------------------
<%@ 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>
网页中没有出现这样的效果，网页中是空白页，没有出现预想中的报时，请问是什么原因？
------解决方案--------------------
body1.InnerHtml = "现在的时间是" & NowTime & "今天是星期" & DayOfWeek
这样写有问题吧
你可以在form 添加一个控件
然后控件的值= "现在的时间是" & NowTime & "今天是星期" & DayOfWeek
------解决方案--------------------
免责声明： 本文仅代表作者个人观点，与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实，对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺，请读者仅作参考，并请自行核实相关内容。
