我把上面的脚本嵌到了主页面
<!--#include file="conn.asp"-->
<HTML>
<HEAD>
<title>会议订购</title>
<link href="css/text.css" rel="stylesheet" type="text/css">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"></HEAD>
<BODY leftmargin="0" topmargin="0" >
<body background="../images/bg1.gif">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width='100%' height="18"> </td>
</tr>
</table>
<table width="775" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="15" bgcolor="#999999"></td>
</tr>
</table>
<table width="775" cellpadding="0" cellspacing="0" style="border:1px solid #C7AA83">
<tr>
<td valign="top" align="center"><BR>
<table width="90%" cellpadding="5" cellspacing="0">
<tr>
<td><BR>
<B> <span class="hotel">填写预订单《会议预定》</span></B>
<form name="frmOrder" method="post" action="savehuiyi.asp" ><!-- onsubmit="return CheckForm()"-->
<!-- <form name="frmOrder" method="post" action="addHotelOrder.asp?ID=&roomID=" onsubmit="return CheckForm()">-->
<table width="100%" cellpadding="2" cellspacing="0" style="border:1px solid #C7AA83">
<tr bgcolor="#CCCCCC">
<td align="center" height="26" colspan="4"><B>请填写入住信息</B>(*为必须填写项)</td>
</tr>
<tr bgcolor="#CCCCCC">
<td align="center" height="1" colspan="4" bgcolor="#990704"></td>
</tr>
<tr>
<td height="6" colspan="4"></td>
</tr>
<%
dim rs1
dim sql1
set rs1=server.CreateObject ("ADODB.RecordSet")
sql1="select * from sheng"
rs1.open sql1,conn,1,1
%>
<% '------------------------结束 %>
<% '==================================================取出行业小类%>
<%
dim rs2
dim sql2
dim count
set rs2=server.createobject("ADODB.RecordSet")
sql2 = "select * from city"
rs2.open sql2,conn,1,1
%>
<script language="JavaScript">
var onecount;
onecount=0;
subcat = new Array();
<%
count = 0
do while not rs2.eof
%>
subcat[<%=count%>] = new Array("<%= trim(rs2("sort2_name"))%>","<%= trim(rs2("sort_ID"))%>","<%= trim(rs2("sort2_ID"))%>");
<%
count = count + 1
rs2.movenext
loop
rs2.close
%>
onecount=<%=count%>;
function changelocation(locationid)
{
document.frmorder.city.length = 0;
document.frmorder.city.options[document.frmorder.city.length] = new Option("请选择城市", "");
var locationid=locationid;
var i;
for (i=0;i < onecount; i++)
{
if (subcat[i][1] == locationid)
{
document.frmorder.city.options[document.frmorder.city.length] = new Option(subcat[i][0], subcat[i][2]);
}
}
}
</script>
<script language="JavaScript">
<!--
function na_select_form (fname, type_name)
{
document.frmorder[fname].elements[type_name].select()
document.frmorder[fname].elements[type_name].focus()
}
// -->
</script>
<% '============================================结束 %>
<tr height="26">
<td align="right" width="100">所在城市 </td>
<td><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td> <table border="0" width="98%" cellpadding="1" cellspacing=0 align="center">
<tr>
<td height="-2" colspan="2">选择省份
<select name="shengfen" style="WIDTH:100px" onChange="changelocation(document.frmorder.shengfen.options[document.frmorder.shengfen.selectedIndex].value)">
<option selected value="">省份</option>
<%
do while not rs1.eof
%>
<option value="<%=trim(rs1("sort_ID"))%>"><%=trim(rs1("sort_name"))%></option>
<%
rs1.movenext
loop
rs1.close
%>
</select>
</td>
</tr>
<tr>
<td height="20" colspan="2">选择城市
<select name="city" style="WIDTH:100px">
<option selected value="">城市</option>
</select>
</td>
</tr>
<td width="19%"></td>
</tr>
</table></td>
</tr>
</table></td>
<td width="130" align="right">星级选择 </td>
<td><select name="star" class="login" style="width:110px;" width="100%">
<option value="0">星级</option>
<option value="5">五星</option>
<option value="准五星">准五星</option>
<option value="4">四星</option>
<option value="准四星">准四星</option>
<option value="3">三星</option>
<option value="准三星">准三星</option>
<option value="2">二星</option>
<option value="准二星">准二星</option>
</select></td>
</tr>
<tr height="26">
<td align="right">酒店名称</td>
<td colspan="3"><input name="h_Name" type="text" class="login" id="hotelName" size="30" width="100%">
<如不填写本公司将推荐酒店></td>
</tr>
<tr height="26">
<td align="right">会员卡号</td>
<td><input name="txtAccounts" type="text" class="login" maxlength=16 width="100%">
(无卡号可不填)<font color="#FF0000"><b></b></font></td>
<td width="130" align="right">会议人数 </td>
<td><input name="txtPeopleNO" type="text" class="login" maxlength="4" width="100%">
<font color="#FF0000"><b></b></font></td>
</tr>
<tr height="26">
<td align="right">负责人</td>
<td><INPUT NAME="fuze_name" TYPE="text" class="login" width="100%" > <font color="#FF0000"><B></B></font></td>
<td align="right">性别 </td>
<td> <select name="Sex" class="login" style="font-size:12px;width:152">
<option value="男" selected>先生</option>
<option value="女">女士</option>
</select> </td>
</tr>
<tr height="26">
<td align="right" width="100"> </td>
<td>(根据入住房间数,填写多位客人姓名!)</td>
<td align="right" width="130">客人类型 </td>
<td> <select name="txtCategory" class="login" style="font-size:12px;width:152">
<option value="内宾" selected>内宾</option>
<option value="外宾">外宾</option>
</select> </td>
</tr>
