時計.asp
----------------------------------
< %
応答.有効期限 = -1
薄暗い
a=今()
Response.Write formatdatetime(a,2) & " " & formatdatetime(a,3)% >
------------------------ --- ---
私の時間.htm
----------------------------------
<html>
<body topmargin="0" leftmargin="0" style="background-color:#e0d0c0">
<テーブル幅="98%"><tr>
<td align="center" width="50%" style="font-size:16;font-weight:bold;">長春鉄道バス株式会社の商品プラン価格計算プログラム</td>
<td width="50%" align="right">
<input type="text" style="font-size:12px;border:none;background:;" size="18" id="myTime" />
</td>
</tr>
</テーブル>
</body>
</html>
<スクリプト言語="javascript">
//最も単純なコードで実装された単純なメソッドですが、潜在的なエラーが多数あります
/*
関数getClock()
{
var XmlHttp = new ActiveXObject("Msxml2.XMLHTTP")
XmlHttp.Open( "POST", "クロック.asp", false );
XmlHttp.Send();
if (XmlHttp.status == 200) myTime.value=XmlHttp.responseText;
window.setTimeout("getClock()","1000")
}
setInterval("getClock()",1000);
*/
</script>
プログラムの互換性と堅牢性を高めたい場合は、mytime.htm を次のように変更できます
。 ------------------------- -- ------
私の時間.htm
----------------------------------
<html>
<body topmargin="0" leftmargin="0" style="background-color:#e0d0c0">
<テーブル幅="98%"><tr>
<td align="center" width="50%" style="font-size:16;font-weight:bold;">長春鉄道バス株式会社の商品プラン価格計算プログラム</td>
<td width="50%" align="right">
<input type="text" style="font-size:12px;border:none;background:;" size="18" id="myTime" />
</td>
</tr>
</テーブル>
</body>
</html>
<スクリプト>
// 複雑なメソッド。多くの検出とエラー処理が追加されます。
var xmlhttp、アラートあり
試す {
xmlhttp=new ActiveXObject("Msxml2.XMLHTTP")
} キャッチ (e) {
試す {
xmlhttp=new ActiveXObject("Microsoft.XMLHTTP")
} キャッチ (E) {
alert("Microsoft XML パーサーをインストールしてください")
}
}
if (!xmlhttp && !alerted) {
試す {
xmlhttp = 新しい XMLHttpRequest();
} キャッチ (e) {
alert("お使いのブラウザは XMLHttpRequest オブジェクトをサポートしていません。アップグレードしてください");
}
}
関数getClock()
{
if (xmlhttp) {
xmlhttp.Open("Get","クロック.asp",true);
xmlhttp.onreadystatechange=RSchange;
xmlhttp.send();
}
}
setInterval( "getClock()", 1000 );
functionRSchange()
{
if (xmlhttp.readyState==4) {
myTime.value = xmlhttp.responseText;
}
}
</script>