求助：.asp文件中能不能同是包含javascript和vbscript函数？？？

οしαУ′颴 · 发表于 2010-1-19 06:57:32

我的一个文件hetong.asp中，包含一个javascript和vbscript两个函数，但是只有javascript的能用，不知为什么？？请大家帮忙看一下：
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language=javascript>
//this.Hd.style.display='none';
function selCar_Change(txt)
{
if(txt=="汽运，运费供方负担")
{
this.Hd.style.display="inline";
}
else
{
this.Hd.style.display="none";
}
}
</script>
<SCRIPT LANGUAGE=vbscript>
function addfile()
dim str
str="<table WIDTH='750' BORDER='1' ALIGN='center' CELLPADDING='5' CELLSPACING='0' BORDERCOLOR='#111111' STYLE='BORDER-COLLAPSE: collapse' height='70'><TR> <TD> <p align='center'>编号</p></TD><TD><div align='center'>批号</div></TD><TD><div align='center'>质量标示</div></TD><TD><div align='center'>产品名称</div></TD><TD><div align='center'>包数</div></TD><TD><div align='center'>重量</div></TD></TR>"
if not IsNumeric (window.form1.filenum.value) then window.form1.filenum.value =1
for i=1 to window.form1.filenum.value
str=str&"<tr><td align='center'>"&i&"</td><td align='center'><input name='zbsh1' type='hidden' id='zbsh1' size='6'> <input name='bsh1' type='text' id='bsh1' size='6' ></td>"
str=str&"<td align='center'><input name='zhl1' type='text' id='zhl1' size='8'></td>"
str=str&"<td align='center'><input name='dj1' type='text' id='dj1' size='10'></td>"
str=str&"<td align='center'><input name='je1' type='text' id='je1' size='10'></td>"
str=str&"<td align='center'><input name='chqfd1' type='text' id='chqfd1' size='10'></td></tr>"
next
window.uptd.innerHTML =str&"</table>"
end function
</SCRIPT>
<form NAME="form1" method="post" action="?action=saveform">
<p align="center" class="style1">棉花购销合同</p>
<table width="500" border="0" align="center" cellpadding="0" cellspacing="0">
<tr class="ht">
<td width="39" height="25" nowrap>供方：</td>
<td width="221" height="25"><input name="gong" type="text" id="gong" value="淄博宏健棉麻有限责任公司" size="35"></td>
<td width="101" nowrap>合同编号：</td>
<td width="139"> 
</td>
</tr>
<tr class="ht">
<td height="25" nowrap>需方：</td>
<td height="25"><input name="xu" type="text" id="xu" size="35"></td>
<td nowrap>合同签订点：</td>
<td><input name="qdd" type="text" id="qdd" value="淄博" size="15"></td>
</tr>
<tr class="ht">
<td height="25" colspan="4">　<span class="ht">　根据《合同法》及国家有关法律规定，为明确双方权利义务，经双方协商一致，订立以下条款共同遵守：<br>
1、产品名称、质量标识、批号、包数、计量单位、重量、单价、金额、重量允许超欠幅度如下：</span></td>
</tr>
<tr class="ht">
<td height="25" colspan="4"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td><div align="center">上传
<input name="filenum" class="tx2" value="1" size="4">
个图片文件　　
<input type="button" name="Button" onClick="addfile" value="设定">
</div></td>
</tr>
<tr>
<td><DIV ID="uptd"></DIV></td>
</tr>
</table></td>
</tr>
<tr class="ht">
<td height="25" colspan="4">4、运输方式及费用负担：<br>
<select name=tk4 id="tk4" onChange=selCar_Change(this.options[this.selectedIndex].value) >
<option value=汽运，运费需方负担 selected>汽运，运费需方负担</option>
<option value=汽运，运费供方负担 >汽运，运费供方负担</option>
</select>
<div id=Hd style="display:none" >
，单价 <input type=text name=yunfei size=5> 元/吨。
</div>
</td>
</tr>
</table>
<p align="center">
<input type="submit" name="Submit" value="提　交">
</p>
</form>
应该怎么改呢？？？谢谢！！！

		自动登录	找回密码
密码			注册