标题:求助!望各位大虾小侠帮忙。
取消只看楼主
yupv
Rank: 1
等 级:新手上路
帖 子:2
专家分:0
注 册:2011-3-30
 问题点数:0 回复次数:0 
求助!望各位大虾小侠帮忙。
先说问题。以下代码为一个开通账号的代码。里面有一个选项域名绑定。会自动生成一个二级域名。例如。填入系统默认的域名是。。那么生成的账号是根据FTP的账号来生成二级域名。 xxx.。我想要把这个去掉。直接只有一个。或者填入是什么就是什么。不会和自动把FTP的账号生成到前面 。最简单的来说就是填入的域名是什么。然后就是什么。
剪图样式如下:
[local]1[/local]
<!--#include file="sessioncolck.asp" -->
<!--#include file="pagesession/CS1.asp" -->
<!--#include file="../inc/conn.asp" -->
<!--#include file="../inc/char.asp" -->
<!--#include file="../inc/function.asp" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta http-equiv="X-UA-Compatible" content="IE=EmulateIE7" />
<title>Powered By npoint</title>
<link href="../css/style.css" rel="stylesheet" type="text/css" />
<script src="../js/ajax_x.js" type="text/javascript"></script>
<script src="../js/alt.js" type="text/javascript"></script>
</head>
<body>
<%
rs.open "Select * from hostcs",conn,1,1
hostip=rs("hostip")
ftpsoft=rs("ftpsoft")  'FTP软件
hostdomain=rs("hostdomain") '赠送域名
diskpe=rs("diskpe") '磁盘配额
ftpid=rs("ftpid") 'IISFTP标识符
doc=rs("doc") '默认文档
servupath=rs("servupath")  'Serv-u/Gene6 安装路径
servuid=rs("servuid")     'Serv-U 7.X ID号
servudomain=rs("servudomain") 'Serv-u7.x/Gene6 域名称
webpage=rs("webpage") '开设欢迎页
appsitenum=rs("appsitenum") '超过多少网站 自动创建程序池
yncreateapploop=rs("yncreateapploop") '是否自动创建程序池
dcapppool=rs("dcapppool") '当前自动创建完的程序池
appbtitle=rs("appbtitle") '自动创建程序池标头
iisport=rs("iisport") 'IIS TCP端口
rs.close
set iishost=server.createobject("npoint.host") '加载组件
if request.QueryString("action")="kshost" then
'叛断输入的域名是否合法或有带WWW
if trim(request.form("domain"))<>"" then
   if ubound(split(trim(request.form("domain")),"."))<1 then
   call ErrMsgBox("操作失败.\n\n1.绑定的域名不合法,请更换")
   response.End()
   else
     if LCase(split(trim(request.form("domain")),".")(0))="www" then
     call ErrMsgBox("操作失败.\n\n1.绑定的域名不包括www,请更换")
     response.End()
     end if
   end if
end if
'叛断FTP账号是否合法
chkftp=chk_ftpuser(trim(request.form("FTPuser")))
if chkftp<>"1" then
call ErrMsgBox(chkftp)
response.End()
end if
'叛断域名是否存在
if trim(request.form("domain"))<>"" then
rs.open "Select host_domain,todomain from sitehost",conn,1,1
if rs.bof and rs.eof then
rs.close
else
for i=1 to rs.recordcount
if rs("host_domain")="" then
H_D=""
else
H_D=rs("host_domain") & "|"
end if
if rs("todomain")="" then
T_D=""
else
T_D=rs("todomain") & "|"
end if
All_domain=T_D
rs.movenext
next
rs.close
if All_domain<>"" then
Fall_domain=split(mid(All_domain,1,len(All_domain)-1),"|")
for s=0 to ubound(Fall_domain)
if Fall_domain(s)=trim(request.form("domain")) or Fall_domain(s)="www."&trim(request.form("domain")) then
call ErrMsgBox("操作失败.\n\n1.绑定域名已存在,请更换.")
response.End()
end if
next
end if
end if
end if
'叛断FTP账号是否存在
rs.open "Select FTPuser from sitehost where FTPuser='"&trim(request.form("FTPuser"))&"'",conn,1,1
if rs.bof and rs.eof then
rs.close
'设置站点标识符ID号
rs.open "Select * from sitehost order by id desc",conn,1,1
if rs.bof and rs.eof then
ifid=2  '站点标识符
else
ifid=rs("ID")+1
end if
rs.close
'计算到期时间
sdate=date() '开设时间
if ubound(split(sdate,"-"))>1 then
d_fgh="-"
elseif ubound(split(sdate,"/"))>1 then
d_fgh="/"
elseif ubound(split(sdate,"."))>1 then
d_fgh="."
end if
Fjdate=split(sdate,d_fgh)
Tyear=int(Fjdate(0))+int(request.form("Eyear"))
Tmone=int(Fjdate(1))+int(request.form("Emone"))
if int(Fjdate(2))=31 then
dayx=int(Fjdate(2))-1
else
dayx=int(Fjdate(2))
end if
if Tmone>12 then
  if Tmone-12=2 and dayx=29 then
Edate=Tyear+1 & d_fgh & Tmone-12 & d_fgh & "28" '到期时间
  else
Edate=Tyear+1 & d_fgh & Tmone-12 & d_fgh & dayx '到期时间   
  end if
else
   if Tmone=2 and dayx=29 then
Edate=Tyear & d_fgh & Tmone & d_fgh & "28" '到期时间
   else
Edate=Tyear & d_fgh & Tmone & d_fgh & dayx '到期时间
   end if
end if
'自动创建程序池或独立程序池
 if yncreateapploop=1 then
   if request.Form("autocreateapp")=0 then
        Appstate=iishost.appstateyn(appbtitle&"_"&dcapppool)'叛断进程池是否存在 1为存在   0为不存在
        if Appstate=1 then
         uidapple=appbtitle&"_"&dcapppool
         rs.open "Select apppool from sitehost where RID=1 and apppool='"&uidapple&"'",conn,1,1
            if rs.bof and rs.eof then
            rs.close
            iisapppool_B=uidapple
            else
              if int(rs.recordcount)>int(appsitenum-1) then
                 R=iishost.creatiisapp(appbtitle&"_"&dcapppool+1, "", "", "",1,"","")
                 if R=1 then
                 rs.close
                 conn.Execute("Update hostcs Set dcapppool='"&dcapppool+1&"'")
                 iisapppool_B=appbtitle&"_"&dcapppool+1
                 else
                  rs.close
                   rs.open "Select * from errorlist where errora='"&R&"'",conn,1,1
                   if rs.bof and rs.eof then
                   call SucBox("操作失败.\n\n错误代码:"&R,"sitehost.asp")
                   else
                   call SucBox("操作失败.\n\n错误代码:"&R&"\n\n错误提示:"&rs("errorlist"),"sitehost.asp")
                   end if
                   rs.close
                   response.End()
                 end if
              else
              iisapppool_B=uidapple
              end if
            end if
        elseif Appstate=0 then
        R=iishost.creatiisapp(appbtitle&"_"&dcapppool, "", "", "",1,"","")
         if R=1 then
           iisapppool_B=appbtitle&"_"&dcapppool
           else
           rs.open "Select * from errorlist where errora='"&R&"'",conn,1,1
           if rs.bof and rs.eof then
           call SucBox("操作失败.\n\n错误代码:"&R,"sitehost.asp")
           else
           call SucBox("操作失败.\n\n错误代码:"&R&"\n\n错误提示:"&rs("errorlist"),"sitehost.asp")
           end if
           rs.close
           response.End()
           end if
        end if
   elseif request.Form("autocreateapp")=1 then
   R=iishost.creatiisapp(""&trim(request.form("FTPuser"))&"", "", "", "",1,"","")
      if R=1 then
       iisapppool_B=trim(request.form("FTPuser"))
      else
       rs.open "Select * from errorlist where errora='"&R&"'",conn,1,1
       if rs.bof and rs.eof then
       call SucBox("操作失败.\n\n错误代码:"&R,"sitehost.asp")
       else
       call SucBox("操作失败.\n\n错误代码:"&R&"\n\n错误提示:"&rs("errorlist"),"sitehost.asp")
       end if
       rs.close
        response.End()
      end if
   end if
 elseif yncreateapploop=0 then
   iisapppool_B=trim(request.form("apppool"))
 end if
'开设主机
R=iishost.createsite(ifid,ftpid,trim(request.form("FTPuser")),trim(request.form("FTPpass")),trim(request.form("domain")),hostdomain,iisport,trim(request.form("iisip")),trim(request.form("aspnet")),doc,trim(request.form("IISnum")),trim(request.form("MAxnum")),trim(request.form("spanum")),trim(request.form("sitepath")),iisapppool_B,"","","",trim(request.form("rznum")),ftpsoft,servupath,trim(request.form("csnum")),servuid,servudomain,trim(request.form("userGroup")),diskpe,webpage)
if int(R)>1 then
todomain=""
if trim(request.form("domain"))<>"" then
host_domain=trim(request.form("domain"))&"|www."&trim(request.form("domain"))
else
host_domain=""
end if
'添加主机记录
ftppassword=iishost.Eduserpassword(trim(request.form("FTPpass")),1) '加密FTP密码
if yncreateapploop=1 then
conn.Execute("insert into sitehost(RID,Ifid,FTPuser,FTPpass,fupath,host_domain,todomain,sitedoc,spanum,IISnum,MAxnum,tfordnum,sitepath,apppool,rznum,csnum,userGroup,Azip,Azipnum,Xzip,Xzipnum,sitestate,Sdate,Edate,appdlnum,appautocreat,aspnet,iisip) values(1,'"&R&"','"&trim(request.form("FTPuser"))&"','"&ftppassword&"',1,'"&host_domain&"','"&todomain&"','"&doc&"',"&trim(request.form("spanum"))&","&trim(request.form("IISnum"))&","&trim(request.form("MAxnum"))&","&trim(request.form("tfordnum"))&",'"&trim(request.form("sitepath"))&"','"&iisapppool_B&"',"&trim(request.form("rznum"))&","&trim(request.form("csnum"))&",'"&trim(request.form("userGroup"))&"',"&trim(request.form("Azip"))&","&trim(request.form("Azipnum"))&","&trim(request.form("Xzip"))&","&trim(request.form("Xzipnum"))&",1,'"&sdate&"','"&Edate&"',"&trim(request.Form("autocreateapp"))&","&yncreateapploop&","&trim(request.form("aspnet"))&",'"&trim(request.form("iisip"))&"')")
else
conn.Execute("insert into sitehost(RID,Ifid,FTPuser,FTPpass,fupath,host_domain,todomain,sitedoc,spanum,IISnum,MAxnum,tfordnum,sitepath,apppool,rznum,csnum,userGroup,Azip,Azipnum,Xzip,Xzipnum,sitestate,Sdate,Edate,appdlnum,appautocreat,aspnet,iisip) values(1,'"&R&"','"&trim(request.form("FTPuser"))&"','"&ftppassword&"',1,'"&host_domain&"','"&todomain&"','"&doc&"',"&trim(request.form("spanum"))&","&trim(request.form("IISnum"))&","&trim(request.form("MAxnum"))&","&trim(request.form("tfordnum"))&",'"&trim(request.form("sitepath"))&"','"&iisapppool_B&"',"&trim(request.form("rznum"))&","&trim(request.form("csnum"))&",'"&trim(request.form("userGroup"))&"',"&trim(request.form("Azip"))&","&trim(request.form("Azipnum"))&","&trim(request.form("Xzip"))&","&trim(request.form("Xzipnum"))&",1,'"&sdate&"','"&Edate&"',0,"&yncreateapploop&","&trim(request.form("aspnet"))&",'"&trim(request.form("iisip"))&"')")
end if
'更新站点数量
conn.Execute("Update sitepath Set sitenum=sitenum+1 Where sitepath='"&trim(request.form("sitepath"))&"\"&"'")
call SucBox("操作成功.","adminsitehost.asp")
else
  if yncreateapploop=1 and trim(request.Form("autocreateapp"))=1 then
  X=iishost.deliisapp(""&trim(request.form("FTPuser"))&"")  '发生错误 - 删除独立程序池
  end if
rs.open "Select * from errorlist where errora='"&R&"'",conn,1,1
if rs.bof and rs.eof then
call SucBox("操作失败.\n\n错误代码:"&R,"sitehost.asp")
else
call SucBox("操作失败.\n\n错误代码:"&R&"\n\n错误提示:"&rs("errorlist"),"sitehost.asp")
end if
rs.close
end if
else
rs.close
call ErrMsgBox("操作失败.\n\n1.FTP账号已存在,请更换.")
end if
end if
%><table width="100%" border="0" cellpadding="0" cellspacing="1" class="site_bg_site">
  <tr>
    <td width="100%" height="28" align="left" class="site_top_bg" scope="col">&nbsp;&middot;站点虚拟主机开设</td>
  </tr>
</table>
<table width="100%" border="0" cellpadding="0" cellspacing="1" class="site_bg_site">
<script language="JavaScript" type="text/javascript">
function len(s) {
var l = 0;
var a = s.split("");
for (var i=0;i<a.length;i++) {
if (a[i].charCodeAt(0)<299) {
l++;
} else {
l+=2;
}
}
return l;
}
function checkform(theForm){
 if (theForm.FTPuser.value=="") {
    window.alert("请输入FTP账号");
  theForm.FTPuser.focus();
    return false;
 }
 if (len(theForm.FTPuser.value)<3) {
      window.alert("FTP账号必须为3-20位的字符");
      theForm.FTPuser.focus();
      return false;
 }
 if (theForm.FTPpass.value=="") {
      window.alert("请输入FTP密码");
      theForm.FTPpass.focus();
      return false;
 }
 if (len(theForm.FTPpass.value)<6) {
      window.alert("FTP密码必须为6-20位的字符");
      theForm.FTPpass.focus();
      return false;
 }
 if (theForm.toFTPpass.value=="") {
      window.alert("请输入FTP确认密码");
      theForm.toFTPpass.focus();
      return false;
 }
  if (theForm.toFTPpass.value!=theForm.FTPpass.value) {
      window.alert("两次FTP密码不一致");
      theForm.toFTPpass.focus();
      return false;
 }
  if (theForm.spanum.value=="") {
      window.alert("请输入空间大小");
      theForm.spanum.focus();
      return false;
 }
   if (theForm.IISnum.value=="") {
      window.alert("请输入IIS连接数");
      theForm.IISnum.focus();
      return false;
 }
   if (theForm.MAxnum.value=="") {
      window.alert("请输入带宽限制");
      theForm.MAxnum.focus();
      return false;
 }
   if (theForm.tfordnum.value=="") {
      window.alert("请输入子目录绑定个数");
      theForm.tfordnum.focus();
      return false;
 }
   if (theForm.sitepath.value=="") {
      window.alert("请选择存放路径");
      theForm.sitepath.focus();
      return false;
 }
 <%if yncreateapploop=0 then %>
   if (theForm.apppool.value=="") {
      window.alert("请选择应用程序池");
      theForm.apppool.focus();
      return false;
 }
 <%end if%>
   if (theForm.Azipnum.value=="") {
      window.alert("请选择可解压大小");
      theForm.Azipnum.focus();
      return false;
 }
   if (theForm.Xzipnum.value=="") {
      window.alert("请选择可压缩大小");
      theForm.Xzipnum.focus();
      return false;
 }
 sAlert('正在开设虚拟主机...请稍等!');
 theForm.button.disabled=true;
 return true;
 }
 function exchange_App()
 {
  if (document.form1.autocreateapp.value =='0')
  {
   apppool_S.innerHTML ="由系统自动选择&nbsp;&nbsp;每 <%=appsitenum%> 个站 自动创建 一个应用程序池";
  }
  if(document.form1.autocreateapp.value =='1')
  {
   apppool_S.innerHTML ="使用FTP账号创建一个独立应用程序池";
   }
 }
</script>

<form action="?action=kshost" method="post" id="from1" name="form1" onSubmit="return checkform(this)">
  <tr>
    <td height="22" class="site_bg_bs" scope="col">&nbsp;&nbsp;网站IP地址:</td>
    <td class="site_bg_bs" scope="col"><select name="iisip" class="input_to_to" id="iisip">
      <option value="">(全部未分配)</option><%for i=0 to ubound(split(hostip,chr(10)))%>
      <option value="<%= replace(split(hostip,chr(10))(i),chr(13),"") %>"><%= replace(split(hostip,chr(10))(i),chr(13),"") %></option><%next%>
    </select></td>
  </tr>
  <tr>
    <td width="13%" height="22" class="site_bg_bs" scope="col">&nbsp;&nbsp;域名绑定:WWW.</td>
    <td width="87%" class="site_bg_bs" scope="col"><input name="domain" type="text" class="input_to_to" id="domain" size="30" title="请输入域名(可留空) 如:(不包含www) ">
      &nbsp;<span class="syt_1">可留空&nbsp;如:</span>
  </tr>
  <tr>
    <td height="22" class="site_bg_bs" scope="col">&nbsp;&nbsp;FTP账号:</td>
    <td class="site_bg_bs" scope="col"><input name="FTPuser" type="text" class="input_to_to" id="FTPuser" size="30" maxlength="20" title="请输入FTP账号(必填)">
      &nbsp;<span class="syt_1">* 请输入3-20位的字符</span></td>
  </tr>
  <tr>
    <td height="22" class="site_bg_bs" scope="col">&nbsp;&nbsp;FTP密码:</td>
    <td class="site_bg_bs" scope="col"><input name="FTPpass" type="password" class="input_to_to" id="FTPpass" size="30" maxlength="20" title="请输入FTP密码(必填)">
      &nbsp;<span class="syt_1">* 请输入6-20位的字符</span></td>
  </tr>
  <tr>
    <td height="22" class="site_bg_bs" scope="col">&nbsp;&nbsp;FTP确认密码:</td>
    <td class="site_bg_bs" scope="col"><input name="toFTPpass" type="password" class="input_to_to" id="toFTPpass" size="30" maxlength="20"></td>
  </tr>
  <tr>
    <td height="22" class="site_bg_bs" scope="col">&nbsp;&nbsp;空间大小:</td>
    <td class="site_bg_bs" scope="col"><input name="spanum" type="text" class="input_to_to" id="spanum" title="请输入空间大小(必填) 如: 100" onKeyUp="value=value.replace(/[^0-9,]/g,'')" size="5" maxlength="9" />
      M&nbsp;&nbsp;&nbsp;&nbsp;<span class="syt_1">必须0-9的数字</span></td>
  </tr>
  <tr>
    <td height="22" class="site_bg_bs" scope="col">&nbsp;&nbsp;IIS连接数:</td>
    <td class="site_bg_bs" scope="col"><input name="IISnum" type="text" class="input_to_to" id="IISnum" title="请输入IIS连接数(必填) 如: 100" onKeyUp="value=value.replace(/[^0-9,]/g,'')" size="5" maxlength="9" />
      个      &nbsp;&nbsp;<span class="syt_1">必须0-9的数字&nbsp;&nbsp;&nbsp;&nbsp;0</span>为不限制连接数</td>
  </tr>
  <tr>
    <td height="22" class="site_bg_bs" scope="col">&nbsp;&nbsp;带宽限制:</td>
    <td class="site_bg_bs" scope="col"><input name="MAxnum" type="text" class="input_to_to" id="MAxnum" title="请输入带宽限制(必填) 如: 1024" onKeyUp="value=value.replace(/[^0-9,]/g,'')" size="5" maxlength="9">
      KB/秒&nbsp;&nbsp;&nbsp;<span class="syt_1">必须0-9的数字&nbsp;&nbsp;&nbsp;&nbsp;0</span>为不限制带宽</td>
  </tr>
  <tr>
    <td height="22" class="site_bg_bs" scope="col">&nbsp;&nbsp;子目录绑定:</td>
    <td class="site_bg_bs" scope="col"><input name="tfordnum" type="text" class="input_to_to" id="tfordnum" title="请输入子目录绑定个数 如: 2" onKeyUp="value=value.replace(/[^0-9,]/g,'')" size="5" maxlength="9">
      个&nbsp;&nbsp;&nbsp;<span class="syt_1">必须0-9的数字&nbsp;&nbsp;&nbsp;&nbsp;0</span>为禁止使用</td>
  </tr>
  <tr>
    <td height="22" class="site_bg_bs" scope="col">&nbsp;&nbsp;存放路径:</td>
    <td class="site_bg_bs" scope="col"><select name="sitepath" class="input_to_to" id="sitepath" title="请选择存放路径(必选)">
      <option>请选择存放路径</option>
      <%rs.open "Select * from sitepath where pathclass=1 and pathyn=1",conn,1,1
      if rs.bof and rs.eof then
      else
      do while not rs.eof
      %>
      <option value="<%=mid(rs("sitepath"),1,len(rs("sitepath"))-1)%>"><%=rs("sitepath")%></option>
      <%
      rs.movenext
      loop
      end if
      rs.close
      %>
    </select></td>
  </tr>
  <tr>
    <td height="22" class="site_bg_bs" scope="col">&nbsp;&nbsp;应用程序池:</td>
    <td class="site_bg_bs" scope="col"><%
    if yncreateapploop=0 then%><select name="apppool" class="input_to_to" id="apppool">
    <option>请选择应用程序池</option>
          <%
  R=iishost.listapppool()
  listname=split(R,";")
  listappnum=ubound(listname)
  if listappnum<>0 then
  for i=1 to listappnum
    relist=split(listname(i),",")
            %>
          <option value="<%=relist(0) %>"><%=relist(0) %></option>
      <% next
   end if%></select><%elseif yncreateapploop=1 then
   %><select name="autocreateapp" class="input_to_to" id="autocreateapp" onChange="javascript:exchange_App()">
        <option value="0" selected>系统自动选择</option>
        <option value="1">使用独立程序池</option>
      </select>
      &nbsp;<span id="apppool_S">由系统自动选择&nbsp;&nbsp;每 <%=appsitenum%> 个站 自动创建 一个应用程序池</span><%end if%></td>
  </tr>
  <tr>
    <td height="22" class="site_bg_bs" scope="col">&nbsp;&nbsp;日志记录:</td>
    <td class="site_bg_bs" scope="col"><select name="rznum" class="input_to_to" id="rznum">
      <option value="0">禁用</option>
      <option value="1">启用</option>
    </select></td>
  </tr>
  <tr>
    <td height="22" class="site_bg_bs" scope="col">&nbsp;&nbsp;:</td>
    <td class="site_bg_bs" scope="col"><select name="aspnet" class="input_to_to" id="aspnet">
      <option value="1">支持
      <option value="0" selected>不支持
    </select></td>
  </tr>
  <tr>
    <td height="22" class="site_bg_bs" scope="col">&nbsp;&nbsp;用户权限:</td>
    <td class="site_bg_bs" scope="col"><input type="radio" name="csnum" id="radio" value="1"><span class="syt_1">读取</span> | <input type="radio" name="csnum" id="radio2" value="2"><span class="syt_1">读取/写入</span> | <input name="csnum" type="radio" id="radio3" value="3" checked><span class="syt_1">读取/写入/删除</span> | <input type="radio" name="csnum" id="radio4" value="4"><span class="syt_1">读取/写入/删除/运行</span></td>
  </tr>
  <tr>
    <td height="22" class="site_bg_bs" scope="col">&nbsp;&nbsp;用户组:</td>
    <td class="site_bg_bs" scope="col"><select name="userGroup" class="input_to_to" id="userGroup">
      <option value="" selected>无用户组</option>
      <option value="Guests">Guests</option>
    </select></td>
  </tr>
  <tr>
    <td height="22" class="site_bg_bs" scope="col">&nbsp;&nbsp;在线解压:</td>
    <td class="site_bg_bs" scope="col"><select name="Azip" class="input_to_to" id="Azip">
      <option value="0">禁用</option>
      <option value="1">启用</option>
    </select>      <input name="Azipnum" type="text" class="input_to_to" id="Azipnum" onKeyUp="value=value.replace(/[^0-9,]/g,'')" value="10" size="5" maxlength="9">
    M&nbsp;&nbsp;&nbsp;<span class="syt_1">0 </span>为不限制大小</td>
  </tr>
  <tr>
    <td height="22" class="site_bg_bs" scope="col">&nbsp;&nbsp;在线压缩:</td>
    <td class="site_bg_bs" scope="col"><select name="Xzip" class="input_to_to" id="Xzip">
      <option value="0">禁用</option>
      <option value="1">启用</option>
    </select>
      <input name="Xzipnum" type="text" class="input_to_to" id="Xzipnum" onKeyUp="value=value.replace(/[^0-9,]/g,'')" value="10" size="5" maxlength="9">
M&nbsp;&nbsp;&nbsp;<span class="syt_1">0 </span>为不限制大小</td>
  </tr>
  <tr>
    <td height="22" class="site_bg_bs" scope="col">&nbsp;&nbsp;主机期限:</td>
    <td class="site_bg_bs" scope="col"><select name="Eyear" class="input_to_to" id="Eyear">
        <option value="0">0年</option>
        <option value="1" selected>1年</option>
        <option value="2">2年</option>
        <option value="3">3年</option>
        <option value="4">4年</option>
        <option value="5">5年</option>
        <option value="6">6年</option>
        <option value="7">7年</option>
        <option value="8">8年</option>
        <option value="9">9年</option>
        <option value="10">10年</option>
        </select>
      
      <select name="Emone" class="input_to_to" id="Emone">
      <option value="0">0个月</option>
      <option value="1">1个月</option>
      <option value="2">2个月</option>
      <option value="3">3个月</option>
      <option value="4">4个月</option>
      <option value="5">5个月</option>
      <option value="6">6个月</option>
      <option value="7">7个月</option>
      <option value="8">8个月</option>
      <option value="9">9个月</option>
      <option value="10">10个月</option>
      <option value="11">11个月</option>
      </select></td>
  </tr>
  <tr>
    <td height="28" colspan="2" align="center" class="site_bg_bs" scope="col"><input name="button" type="submit" class="button_butt" id="button" value="开设主机"></td>
  </tr>
  </form>
</table>
</body>
</html>
搜索更多相关主题的帖子: 账号 
2011-03-30 08:59



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-335150-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.315900 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved