主题:  问题:关于网代码 unicode 的问题

在海水中游泳

职务:普通成员
等级:5
金币:0.0
发贴:76
注册:2005/8/11 2:01:20
#12005/8/17 0:34:39
我用delphi 按我要求生成了对应的网页:看代码正常,但是不能还常显示。我用frontpage打开时,得示图片:
图片如下:
生成的代码如下:<Html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style>
#s1 {display:none;font-size:20px;CURSOR:hand;color:Blue;}
#s2 {display:none;font-size:20px;CURSOR:hand;color:Blue;}
#s3 {display:none;font-size:20px;CURSOR:hand;color:Blue;}
</style>
<Script language=javascript type="text/javascript">
function DisplayText1(obj) { var Str1="主标题一中的子标题一"; if (obj.innerHTML=="" obj.innerHTML=Str1; else obj.innerHTML=""; }
function DisplayText2(obj) { var Str2="主标题二中的子标题一"; if (obj.innerHTML=="" obj.innerHTML=Str2; else obj.innerHTML=""; }
function DisplayText3(obj) { var Str3="标题三的下属1"; if (obj.innerHTML=="" obj.innerHTML=Str3; else obj.innerHTML=""; }
</script>
<title>帮助测试</title>
</head>
<body >
<li><a id=s1 onClick="return DisplayText1(ss1);" >主标题一</a>
<p>
<a Id=ss1></a>
</p>
<li><a id=s2 onClick="return DisplayText2(ss2);" >主标题二</a>
<p>
<a Id=ss2></a>
主标题二中的子标题一
</p>
<li><a id=s3 onClick="return DisplayText3(ss3);" >主标题三</a>
<p>
<a Id=ss3></a>
</p>
</body></Html>


我有一对翅膀,不是用来飞翔,而是用来煮汤。

在海水中游泳

职务:普通成员
等级:5
金币:0.0
发贴:76
注册:2005/8/11 2:01:20
#22005/8/17 0:40:47
<Html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style>
#s1 {display:none;font-size:20px;CURSOR:hand;color:Blue;}
#s2 {display:none;font-size:20px;CURSOR:hand;color:Blue;}
#s3 {display:none;font-size:20px;CURSOR:hand;color:Blue;}
</style>
<Script language=javascript type="text/javascript">
function DisplayText1(obj) { var Str1="主标题一中的子标题一"; if (obj.innerHTML=="") obj.innerHTML=Str1; else obj.innerHTML=""; }
function DisplayText2(obj) { var Str2="主标题二中的子标题一"; if (obj.innerHTML=="") obj.innerHTML=Str2; else obj.innerHTML=""; }
function DisplayText3(obj) { var Str3="标题三的下属1"; if (obj.innerHTML=="") obj.innerHTML=Str3; else obj.innerHTML=""; }
</script>
<title>帮助测试</title>
</head>
<body >
<li><a id=s1 onClick="return DisplayText1(ss1);" >主标题一</a>
<p>
<a Id=ss1></a>
</p>
<li><a id=s2 onClick="return DisplayText2(ss2);" >主标题二</a>
<p>
<a Id=ss2></a>
主标题二中的子标题一
</p>
<li><a id=s3 onClick="return DisplayText3(ss3);" >主标题三</a>
<p>
<a Id=ss3></a>
</p>
</body></Html> 以上代码是自动生成的,怎么能加上一句什么能让他正常显示。千万不要说:要手工重写呀? 以下是我用到的一些常量: stylebegin = ' <style>';
styleend = ' </style>';
scbegin = ' <Script language=javascript type="text/javascript">';
scend = ' </script>';

CssMlink = ' {display:none;font-size:20px;CURSOR:hand;color:Blue;} ';
CssMnlink = ' {display:none;font-size:20px;CURSOR:hand;color:Green;} ';
CssMulink = ' {display:none;font-size:20px;CURSOR:hand;color:black;} ';

FunNTxt = ' function DisplayNone(obj) { obj.innerHTML=""; } ';
FunNfun = ' onClick="return DisplayNone(this);"';

FunFTxt = ' function DisplayText%d(obj)'+
     ' {'+
' var Str%d="%s";'+
     ' if (obj.innerHTML=="")'+
     ' obj.innerHTML=Str%d;'+
' else '+
     ' obj.innerHTML=""; '+
' } ';
FunFfun = ' onClick="return DisplayText%d(%s);" ';

HtmlDw =' <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" '+
' "http://www.w3.org/TR/html4/loose.dtd">';

HtmlBegin =' <Html>';
HtmlHeads =' <head>';
HtmlMeta =' <meta http-equiv="Content-Type" content="text/html; charset=gb2312">';
HtmlHeade =' </head>';
HtmlTitle =' <title>%s</title>';
HtmlBody =' <body %s>';
HtmlEnd =' </body></Html>';


我有一对翅膀,不是用来飞翔,而是用来煮汤。

{ 在指尖上绽放的花朵 }

职务:普通成员
等级:5
金币:14.0
发贴:3209
注册:2002/7/25 21:24:11
#32005/8/17 12:10:39
转没有 BOM 标记的 UTF-8 。。。