<%@ Language=VBScript %>
<!--#include virtual="/inc-freehost-function/FreeHostFunctionMain.asp"-->
<%
If session("admau")="" Then
	ef=True
	ec="授权非法，有可能是超时造成的。"
elseIf session("canshowpro")="" Then
	ef=True
	ec="您没有此操作的权限。"
end if
if not ef then%>
<!--#include virtual="/inc-freehost-function/htmlwrite.asp"--><%=htmlwrite("html8")%>
<%=htmlwrite("html9")%>
<TABLE width="100%" border=0 cellPadding=0 cellSpacing=0 background="img/midtop4.gif">
  <TBODY>
    <TR>
      <TD width=53 align="left" background="img/midtop1.gif"><strong> 　 </strong><font color="#FFFFFF">─<strong>&gt;</strong></font> </TD>
      <TD width="151"><table height="59"  border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td width="7" background="img/midtop.gif">&nbsp;</td>
            <td width="120" align="center" valign="middle" background="img/r3.jpg" id="tableTop1" style="Cursor:hand"><a href="product-vps.asp"><font color="#FFFFFF">云服务器产品定义</font></a></td>
            <td width="5" background="img/midtop2.gif">&nbsp;</td>
          </tr>
      </table></TD>
      <TD width="15">&nbsp;</TD>
      <TD align="left">&nbsp;</TD>
      <TD align="left">&nbsp;</TD>
      <TD width=23 align="right"><IMG height=59 
                  src="img/rtop4.jpg" 
                  width=19></TD>
    </TR>
  </TBODY>
</TABLE>
<TABLE width="100%" border=0 cellPadding=0 cellSpacing=0>
  <TBODY>
    <TR>
      <TD width=19 background="img/midlef.gif" id=rightid>&nbsp;</TD>
      <TD height="300" align="center" vAlign=top bgcolor="#FFFFFF">
	  
	  
<%
PAY_Day="0.0028"
PAY_WeeK="0.0192"
PAY_Month="0.084"
PAY_Season="0.25"
PAY_halfyear="0.5"
PAY_Nextyear="1"
PAY_2year="2"
PAY_3year="3"
PAY_4year="4"
PAY_5year="5"

MaxBandwidth="4294967295"
Set conn=Server.CreateObject("ADODB.Connection")
	conn.Open Application("FreeHostDBlink")
	Set ds = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_VPSProductlist order by orderbyid desc"
		ds.Open Sql,conn,1,1
If ds.Eof Then%>
产品列表为空.
<%
canbyenduser="y"
canbyagnenduser="y"
canbyagn="y"
orderbyid=0
typeid=0
subweb=0
allowdomain=15



else%>
<DIV class="tableborder">
<table width="100%"  border="0" cellspacing="1">
  <tr >
    <td width="24%" height="24" align="center" background="img/tablebg.gif"><font color="#FFFFFF">编号</font></td>
    <td width="63%" align="center" background="img/tablebg.gif"><font color="#FFFFFF">产品参数</font></td>
    <td height="24" colspan="2" align="center" background="img/tablebg.gif"><font color="#FFFFFF">操作</font></td>
    </tr><%
while not ds.Eof
if  Request.QueryString ("id")=Cstr(ds("id")) then
VPStype=ds("VPStype")
usermoney=ds("usermoney")

ServerlistID=ds("ServerlistID")
ServerlistID2=ds("ServerlistID2")
ServerlistID3=ds("ServerlistID3")
ServerlistID4=ds("ServerlistID4")
ServerlistID5=ds("ServerlistID5")

info=ds("info")
infomore=ds("infomore")

cantest=ds("cantest")
canmonth=ds("canmonth")
canseason=ds("canseason")
canhalfyear=ds("canhalfyear")

canday=ds("canday")
canweek=ds("canweek")

canbyenduser=ds("canbyenduser")
canbyagnenduser=ds("canbyagnenduser")
canbyagn=ds("canbyagn")
orderbyid=ds("orderbyid")
typeid=ds("typeid")
allowupdate=ds("allowupdate")
allowupdatetoother=ds("allowupdatetoother")

CpuNum=ds("CpuNum")
MaxCPU=ds("MaxCPU")
Maxspace=ds("Maxspace")
MaxRam=ds("MaxRam")

caninstallos=ds("caninstallos")
canbackupvhd=ds("canbackupvhd")
updatebytypeid=ds("updatebytypeid")


PAY_Day=ds("PAY_Day")
PAY_WeeK=ds("PAY_WeeK")

PAY_Month=ds("PAY_Month")
PAY_Season=ds("PAY_Season")
PAY_halfyear=ds("PAY_halfyear")
PAY_Nextyear=ds("PAY_Nextyear")
PAY_2year=ds("PAY_2year")
PAY_3year=ds("PAY_3year")
PAY_4year=ds("PAY_4year")
PAY_5year=ds("PAY_5year")

onlyusebyagn=ds("onlyusebyagn")
allowdomain=ds("allowdomain")
CDNMaxMb=ds("CDNMaxMb")
StartRam=ds("StartRam")
Maxmbps8=ds("Maxmbps8")


isagentpd=ds("isagentpd")
VPSComName=ds("VPSComName")
VPSApiName=ds("VPSApiName")
VPScpdomain=ds("VPScpdomain")
Agnuserid=ds("Agnuserid")
Domain_Agent_nonemd5_6=ds("Domain_Agent_nonemd5_6")
Agnidc=ds("Agnidc")
Agnproductid=ds("Agnproductid")
Agnattach=ds("Agnattach")

MaxIOPS=ds("MaxIOPS")
MaxIOPS2=ds("MaxIOPS2")
cancloud=ds("cancloud")
OSLimbyRam=ds("OSLimbyRam")
OSLimbyCPU=ds("OSLimbyCPU")
OSlim=ds("OSlim")
addCpuNum=ds("addCpuNum")
addCpuCost=ds("addCpuCost")
addCpuLim=ds("addCpuLim")
addRamNum=ds("addRamNum")
addRamCost=ds("addRamCost")
addRamLim=ds("addRamLim")
addVHDNum=ds("addVHDNum")
addVHDCost=ds("addVHDCost")
addVHDLim=ds("addVHDLim")
addMbpsNum=ds("addMbpsNum")
addMbpsCost=ds("addMbpsCost")
addMbpsLim=ds("addMbpsLim")
addNGBNum=ds("addNGBNum")
addNGBCost=ds("addNGBCost")
addNGBLim=ds("addNGBLim")
addIPNum=ds("addIPNum")
addIPCost=ds("addIPCost")
addIPLim=ds("addIPLim")
addSNANum=ds("addSNANum")
addSNACost=ds("addSNACost")
addSNALim=ds("addSNALim")
addBakNum=ds("addBakNum")
addBakCost=ds("addBakCost")
addBakLim=ds("addBakLim")
addIopsNum=ds("addIopsNum")
addIopsCost=ds("addIopsCost")
addIopsLim=ds("addIopsLim")

MaxSNA=ds("MaxSNA")
MaxBak=ds("MaxBak")
MaxIP=ds("MaxIP")
canSNAST=ds("canSNAST")
canSNAEN=ds("canSNAEN")

canUseISO=ds("canUseISO")
canUseConsol=ds("canUseConsol")
canUseTool=ds("canUseTool")

ISOlim=ds("ISOlim")
canADSL=ds("canADSL")
VLANid=ds("VLANid")
NetCardlimtype=ds("NetCardlimtype")

autoselect=ds("autoselect")
Servertypeid=ds("Servertypeid")

end if
%>

  <tr bgcolor="#E4EAF2" onmouseover=this.bgColor='#cccccc'; onmouseout=this.bgColor='#E4EAF2';>
    <td height="30" align="center"><%=ds("id")%>.<%=ds("VPStype")%><%if ds("isagentpd")=true then%>(代理上级的)<%end if%> </td>
    <td align="left">　<%if ds("cancloud")=true then%>[弹性]<%end if%>价格:<%=ds("usermoney")%>元　<%if ds("isagentpd")=false then%><%
	Set dsserver = Server.CreateObject("ADODB.Recordset")	
	Sql="Select * from FreeHost.FreeHost_ServerVPSlist where id='"&ds ("ServerlistID")&"'"
	dsserver.Open Sql,conn,1,1
	if not dsserver.eof  then
%><%=dsserver("ip")%><%dsserver.close%><%else%><font color="red">没有分配可用服务器</font><%end if
end if%> 
      CPU上限:<%=ds("MaxCPU")%>% CPU数量:<%=ds("CPUNum")%>个  内存上限:<%=ds("MaxRAM")%>M 初始大小:<%=ds("StartRam")%>M 空间:<%=ds("MAXspace")%>G
      <%if ds("cantest")="y" then%>
      可以试用
      <%else%>
      不可以试用
      <%end if%> 排队:<%=ds("orderbyid")%><br></td>
    <td width="6%" align="center"><a href="/style/info/<%if ds("cancloud")=true then%>cloud.asp<%else%>vps.asp<%end if%>" target="_blank"><font color="#618ECF"><strong>浏览</strong></font></a> </td>
    <td width="7%" align="center"><a href="product-vps.asp?id=<%=ds("id")%>#m"><font color="#618ECF"><strong>修改</strong></font></a> </td>
  </tr>
<%
ds.movenext
wend%>
</table>
</div>
<%end if%>	  


<%if  Request.QueryString ("id")="" then
canbyenduser="y"
canbyagnenduser="y"
canbyagn="y"
asp="y"
aspx="y"
php="y"
orderbyid=0
typeid=0
subweb=0
allowdomain=15
MaxRam=256
Maxspace=10
MaxCPU=60
CpuNum=1
updatebytypeid="n"
cangetlog="y"
cantwodb=0
canrar="y"
caninstallos="y"
canUseISO=true
canUseTool=true
canUseConsol=true

allowdomain=10
CDNMaxMb=0
StartRam=200
Maxmbps8=2

MaxIOPS=0
MaxIOPS2=0
cancloud=true
OSLimbyRam=384
OSLimbyCPU=1
OSlim=""
addCpuNum=1
addCpuCost=5
addCpuLim=16
addRamNum=10
addRamCost=1
addRamLim=4192
addVHDNum=1
addVHDCost=10
addVHDLim=4028
addMbpsNum=1
addMbpsCost=20
addMbpsLim=100
addNGBNum=1
addNGBCost=5
addNGBLim=4192
addIPNum=1
addIPCost=20
addIPLim=10
addSNANum=1
addSNACost=6
addSNALim=5
addBakNum=1
addBakCost=8
addBakLim=4
addIopsNum=10
addIopsCost=40
addIopsLim=1000

MaxSNA=1
MaxBak=1
MaxIP=1

canSNAST=0
canSNAEN=7

canADSL=0
VLANid=0
NetCardlimtype=0

autoselect=0
Servertypeid=0

end if

%><a name="m">
              <form action="product-vpslist-sub.asp" method="post" name="form1">  
	<DIV class="tableborder">
<table width="100%"  border="0" cellspacing="1">
  <tr >
    <td height="24" colspan="2" align="center" background="img/tablebg.gif"><font color="#FFFFFF">添加/修改产品类型</font></td>
  </tr>
  <tr bgcolor="#E4EAF2">
    <td width="9%" align="right">&nbsp;</td>
    <td width="91%" align="left"><p><br>
          <br>
        产品名： 
        <input name="VPStype" type="text" id="VPStype" value="<%=VPStype%>" size="20" maxlength="50" <%if VPStype<>"" then%>readonly<%end if%>>
      排队顺序：
      <input name="orderbyid" type="text" id="orderbyid" size="4" maxlength="6" value="<%=orderbyid%>">
      (数值大排前面)<br>
      价格：
      <input name="usermoney" type="text" id="usermoney" size="4" maxlength="6" value="<%=usermoney%>">
元一年<br>
日付费率：
<input name="PAY_Day" type="text" size="6" maxlength="8" value="<%=PAY_Day%>">
(如果一个产品是120元/年，每日支付的价格就是120X费率，默认费率是0.0028=1/365)<br>
周付费率：
<input name="PAY_WeeK" type="text" size="6" maxlength="8" value="<%=PAY_WeeK%>">
(如果一个产品是120元/年，每周支付的价格就是120X费率，默认费率是0.0192=1/52)<br>
月付费率：
<input name="PAY_Month" type="text" size="4" maxlength="6" value="<%=PAY_Month%>">
 (如果一个产品是120元/年，每月支付的价格就是120X费率，默认费率是0.084=1/12)<br>
 季付费率：
 <input name="PAY_Season" type="text" size="4" maxlength="6" value="<%=PAY_Season%>">
  (如果一个产品是120元/年，每季支付的价格就是120X费率，默认费率是0.25=1/4)<br>
 半年付费率：
 <input name="PAY_halfyear" type="text" size="4" maxlength="6" value="<%=PAY_halfyear%>">
 (如果一个产品是120元/年，每半年支付的价格就是120X费率，默认费率是0.5=1/2)<br>
一次购买两年费率：
<input name="PAY_2year" type="text" size="4" maxlength="6" value="<%=PAY_2year%>">
　三年费率
<input name="PAY_3year" type="text" size="4" maxlength="6" value="<%=PAY_3year%>">
　四年费率
<input name="PAY_4year" type="text" size="4" maxlength="6" value="<%=PAY_4year%>">
　五年费率
<input name="PAY_5year" type="text" size="4" maxlength="6" value="<%=PAY_5year%>">
<br>
续费一年费率：
<input name="PAY_Nextyear" type="text" size="4" maxlength="6" value="<%=PAY_Nextyear%>">
(续费二,三,四,五年的费率和一次性购买二,三,四,五年是一样的)<br>
(如果是代理上级的产品，费率应该和上级一致)
<br>
<br>      
CPU个数：
            <input name="CpuNum" type="text"size="3" maxlength="3" value="<%=CpuNum%>">
个 (不能超过服务器上真实CPU数量的一半,<font color="#FF0000">Win2008最多只能设置为4,win2012可以超过4</font>)<br>
CPU限制：
            <input name="MaxCPU" type="text"  size="3" maxlength="3" value="<%=MaxCPU%>">
% (0表示不限制，不要小于50%)<br>
      内存硬限制(单位是M,不能小于256M)：
      <input name="MAXRAM" type="text" size="4" value="<%=MAXRAM%>">
      (一台服务器中所有VPS的分配的内存总和不应该超过总的物理内存的两倍)<br>
      动态内存初始大小(单位是M,不能小于200M)：
      <input name="StartRam" type="text" size="4" value="<%=StartRam%>">
(VPS刚启动时启用的内存数,如果你不想使用动态内存,请设置为0)      <br>
      <b><font color="#FF0000">(内存必须为2的倍数,就是说255M,257M等单数是不允许的!)
      </font></b><br>
      <br>
      带宽限制(Mbps为单位,不能小于1)：
      <input name="Maxmbps8" type="text" id="Maxmbps8" value="<%=Maxmbps8%>" size="3" maxlength="3">
(不要输入单位) 双网卡时的带宽限制设置 
<select name="NetCardlimtype" id="NetCardlimtype">
              <option value="0" <%if NetCardlimtype=0 then%>selected<%end if%>>只限制第一网卡(默认)</option>
              <option value="1" <%if NetCardlimtype=1 then%>selected<%end if%>>只限制第二网卡</option>
              <option value="2" <%if NetCardlimtype=2 then%>selected<%end if%>>两个网卡都限制</option>			  			  
            </select>
            <br>
第一硬盘IOPS限制(0为不限制)：
<input name="MaxIOPS" type="text" id="MaxIOPS" value="<%=MaxIOPS%>" size="4" maxlength="5">
IOPS (此功能需要Windows Server 2012R2以上版本才能支持)<br>
第二硬盘IOPS限制(0为不限制)：
<input name="MaxIOPS2" type="text" id="MaxIOPS2" value="<%=MaxIOPS2%>" size="4" maxlength="5">
IOPS (一个普通机械硬盘总的在100以内，一个SSD总可用在5000左右)<br>
快照限制：
<input name="MaxSNA" type="text" id="MaxSNA" value="<%=MaxSNA%>" size="3" maxlength="3">
个　（不能超过8个）允许生成快照的时间段：
<input name="canSNAST" type="text" value="<%=canSNAST%>" size="2">
点到
<input name="canSNAEN" type="text" value="<%=canSNAEN%>" size="2">
点<br>
备份限制：
<input name="MaxBak" type="text" id="MaxBak" value="<%=MaxBak%>" size="3" maxlength="3">
个　（默认为每周一早上1-5点自动备份，不能超过8个）<br>
IP限制：
<input name="MaxIP" type="text" id="MaxIP" value="<%=MaxIP%>" size="3" maxlength="3">
个<br>
      <br>
      空间大小限制(G为单位,不能小于11G)：
      <input name="Maxspace" type="text" size="5" maxlength="8" value="<%=Maxspace%>">
      (不要输入单位) 
      <br>
      允许绑定的域名数量
      <input name="allowdomain" type="text" size="2" maxlength="3" value="<%=allowdomain%>">
个 (不能超过99个)(共享IP类VPS本功能才有效)      <br>
流量限制
      <input name="CDNMaxMb" type="text" id="CDNMaxMb" value="<%=CDNMaxMb%>" size="5" maxlength="8">
      M/月 (0代表不限制流量)      <br>
      分类编号：
      <input name="typeid" type="text" id="orderbyid" size="4" maxlength="6" value="<%=typeid%>">
      　限制只允许同一类型之间才能升级:
      <input name="updatebytypeid" type="checkbox" id="updatebytypeid" value="y" <%if updatebytypeid="y"  then%>checked<%end if%>>
      <br>
      <br>
      <font color="#999999">          </font>            允许在线重装系统:
            <input name="caninstallos" type="checkbox" id="caninstallos" value="y" <%if caninstallos="y"  then%>checked<%end if%>>
            (必须选中,不然用户无法在购买后马上使用)
            　允许备份VPS的虚拟硬盘数据:
            <input name="canbackupvhd" type="checkbox" id="canbackupvhd" value="y" <%if canbackupvhd="y"  then%>checked<%end if%>>
            <br>
            <br>
            是否允许试用:
            <input name="cantest" type="checkbox" id="cantest" value="y" <%if cantest="y" then%>checked<%end if%>>
            是否允许日付:
            <input name="canday" type="checkbox" id="canday" value="y"   <%if canday="y" then%>checked<%end if%>>
            是否允许周付:
            <input name="canweek" type="checkbox" id="canweek" value="y"   <%if canweek="y" then%>checked<%end if%>>			
            是否允许月付:
            <input name="canmonth" type="checkbox" id="canmonth" value="y"   <%if canmonth="y" then%>checked<%end if%>>
            是否允许季付:
            <input name="canseason" type="checkbox" id="canseason" value="y"   <%if canseason="y" then%>checked<%end if%>>
            是否允许半年付:
            <input name="canhalfyear" type="checkbox" id="canhalfyear" value="y"   <%if canhalfyear="y" then%>checked<%end if%>>
            <br>
            此产品主站的最终用户可以看到:
            <input name="canbyenduser" type="checkbox" id="canbyenduser" value="y" <%if canbyenduser="y" then%>checked<%end if%>>
            代理的最终用户可以看到:
            <input name="canbyagnenduser" type="checkbox" id="canbyagnenduser" value="y"   <%if canbyagnenduser="y" then%>checked<%end if%>>
            代理可以看到:
            <input name="canbyagn" type="checkbox" id="canbyagn" value="y"   <%if canbyagn="y" then%>checked<%end if%>>
            <br>
            此产品不允许从别的产品升级:
            <input name="allowupdate" type="checkbox" id="allowupdate" value="y"   <%if allowupdate="y" then%>checked<%end if%>>
            　此产品不允许升级到别的产品:
            <input name="allowupdatetoother" type="checkbox" id="allowupdatetoother" value="y"   <%if allowupdatetoother="y" then%>checked<%end if%>>
            　<br>
            <br>
            如果是代理别人的产品，服务器可以不选<br>
            用户可选的服务器一：
            <%
	Set dsX = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_ServerVPSlist order by id asc"
		dsX.Open Sql,conn,1,1
If dsX.Eof Then%>
            服务器列表为空.
            <%else%>
            <select name="ServerlistID" id="ServerlistID">
          <%while not dsX.Eof%>
          <option value="<%=dsX("id")%>" <%if ServerlistID=dsX("id") then%>selected<%end if%>><%=dsX("id")%>.<%=dsX("servername")%>
          <%if dsX("agent1")<>"n" then%> 
          代理名：<%=dsX("agent1")%>
          <%end if%> 
          [<%=dsX("netby")%>]</option>
		  
          <%
dsX.movenext
wend%><option value="0">无</option>
            </select>
            <%end if%>
            <br>
            用户可选的服务器二：
            <%
	Set dsX = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_ServerVPSlist order by id asc"
		dsX.Open Sql,conn,1,1
If dsX.Eof Then%>
            服务器列表为空.
            <%else%>
            <select name="ServerlistID2" id="ServerlistID2">
          <option value="0" selected>无</option>
          <%while not dsX.Eof%>
          <option value="<%=dsX("id")%>" <%if ServerlistID2=dsX("id") then%>selected<%end if%>><%=dsX("id")%>.<%=dsX("servername")%>
          <%if dsX("agent1")<>"n" then%> 
          代理名：<%=dsX("agent1")%>
          <%end if%> 
          [<%=dsX("netby")%>]</option>
          <%
dsX.movenext
wend%>
            </select>
            <%end if%>
    
          <br>
            用户可选的服务器三：
            <%
	Set dsX = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_ServerVPSlist order by id asc"
		dsX.Open Sql,conn,1,1
If dsX.Eof Then%>
            服务器列表为空.
            <%else%>
            <select name="ServerlistID3" id="ServerlistID3">
          <option value="0" selected>无</option>
          <%while not dsX.Eof%>
          <option value="<%=dsX("id")%>" <%if ServerlistID3=dsX("id") then%>selected<%end if%>><%=dsX("id")%>.<%=dsX("servername")%>
          <%if dsX("agent1")<>"n" then%> 
          代理名：<%=dsX("agent1")%>
          <%end if%> 
          [<%=dsX("netby")%>]</option>
          <%
dsX.movenext
wend%>
            </select>
            <%end if%>
    

            <br>
            用户可选的服务器四：
            <%
	Set dsX = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_ServerVPSlist order by id asc"
		dsX.Open Sql,conn,1,1
If dsX.Eof Then%>
            服务器列表为空.
            <%else%>
            <select name="ServerlistID4" id="ServerlistID4">
          <option value="0" selected>无</option>
          <%while not dsX.Eof%>
          <option value="<%=dsX("id")%>" <%if ServerlistID4=dsX("id") then%>selected<%end if%>><%=dsX("id")%>.<%=dsX("servername")%>
          <%if dsX("agent1")<>"n" then%> 
          代理名：<%=dsX("agent1")%>
          <%end if%> 
          [<%=dsX("netby")%>]</option>
          <%
dsX.movenext
wend%>
            </select>
            <%end if%>
    

            <br>
            用户可选的服务器五：
            <%
	Set dsX = Server.CreateObject("ADODB.Recordset")	
		Sql="Select * from FreeHost.FreeHost_ServerVPSlist order by id asc"
		dsX.Open Sql,conn,1,1
If dsX.Eof Then%>
            服务器列表为空.
            <%else%>
            <select name="ServerlistID5" id="ServerlistID5">
          <option value="0" selected>无</option>
          <%while not dsX.Eof%>
          <option value="<%=dsX("id")%>" <%if ServerlistID5=dsX("id") then%>selected<%end if%>><%=dsX("id")%>.<%=dsX("servername")%>
          <%if dsX("agent1")<>"n" then%> 
          代理名：<%=dsX("agent1")%>
          <%end if%> 
          [<%=dsX("netby")%>]</option>
          <%
dsX.movenext
wend%>
            </select>
            <%end if%>
            <br>
            本产品不限制于上述五个服务器，可以自动选优选资源列表中的服务器：
            <input name="autoselect" type="checkbox" id="autoselect" value="y" <%if autoselect=true then%>checked<%end if%>>
            <br> 　
            优选时只限制于指定的服务器分类编号：
            <input name="Servertypeid" type="text" id="Servertypeid" size="4" maxlength="6" value="<%=Servertypeid%>">
            (不指定请设置为0)<br>
            <br>
            简要说明：
            <textarea name="info" cols="30" rows="3" id="info"><%=info%></textarea>
            (可以用html语法)<br>
            <br>
            详细说明：
            <textarea name="infomore" cols="45" rows="6" id="infomore"><%=infomore%></textarea>
            (可以用html语法)<br>
            <br>
            <br>
            此产品是否是代理别人的产品：
            <input name="isagentpd" type="checkbox" id="isagentpd" value="1" <%if isagentpd=true then%>checked<%end if%>>
            <a href="http://7i24.com/freehostfull/cloudapi.htm" target="_blank"><font color="#FF0000">点这儿寻找云服务器运营商&gt;&gt;</font></a><br>
            　　　　上级公司名：
            <input name="VPSComName" type="text" id="orderbyid" size="20" maxlength="50" value="<%=VPSComName%>">
            <br>
            　　　　上级API域名：
            <input name="VPSApiName" type="text" id="orderbyid" size="30" maxlength="80" value="<%=VPSApiName%>">
            <br>
            　　　　上级云服务器面板域名：
            <input name="VPScpdomain" type="text" id="orderbyid" size="30" maxlength="80" value="<%=VPScpdomain%>">
            <br>
            　　　　上级代理名：
            <input name="Agnuserid" type="text" id="orderbyid" size="14" maxlength="14" value="<%=Agnuserid%>">
            <br>
            　　　　上级代理密码：
            <input name="Domain_Agent_nonemd5_6" type="password" id="orderbyid" size="14" maxlength="14" value="<%=Domain_Agent_nonemd5_6%>">
            <br>
            　　　　上级云服务器用的产品id：
            <input name="Agnproductid" type="text" id="orderbyid" size="4" maxlength="4" value="<%=Agnproductid%>">
(问上级公司了解)<br>
            　　　　上级云服务器用的服务器id：
            <input name="Agnidc" type="text" id="orderbyid" size="4" maxlength="4" value="<%=Agnidc%>">
(设置为0或不填写就代表用默认服务器)<br>
<br>
弹性购买设置：是否允许弹性购买：
<input name="cancloud" type="checkbox" id="cancloud" value="1" <%if cancloud=true then%>checked<%end if%>>
(前台购买页在<a href="/style/info/cloud.asp" target="_blank">/style/info/cloud.asp</a>)<br> 
当内存小于
<input name="OSLimbyRam" type="text" id="orderbyid" size="4" maxlength="10" value="<%=OSLimbyRam%>">
M，或CPU数量小于
<input name="OSLimbyCPU" type="text" id="orderbyid" size="4" maxlength="10" value="<%=OSLimbyCPU%>">
时，不能安装以下操作系统：
<input name="OSlim" type="text" id="orderbyid" size="20" maxlength="50" value="<%=OSlim%>"> 
（请输入云服务器自检中的预装操作系统的ID用,号分开）
<br>
CPU：每增加
<input name="addCpuNum" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addCpuNum%>">
个CPU，需多付
<input name="addCpuCost" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addCpuCost%>"> 
元，本产品最多允许 
<input name="addCpuLim" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addCpuLim%>"> 
个CPU
(任何价格不能设置为0)<br>
内存：每增加
<input name="addRamNum" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addRamNum%>">
M内存，需多付
<input name="addRamCost" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addRamCost%>">
元，本产品最多允许
<input name="addRamLim" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addRamLim%>"> 
M内存
<br>
虚拟硬盘：每增加
<input name="addVHDNum" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addVHDNum%>">
G，需多付
<input name="addVHDCost" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addVHDCost%>">
元，本产品最多允许
<input name="addVHDLim" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addVHDLim%>"> 
G 
<br>
带宽：每增加
<input name="addMbpsNum" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addMbpsNum%>">
Mbps，需多付
<input name="addMbpsCost" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addMbpsCost%>">
元，本产品最多允许
<input name="addMbpsLim" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addMbpsLim%>"> 
Mbps
<br>
流量：每增加
<input name="addNGBNum" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addNGBNum%>">
G，需多付
<input name="addNGBCost" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addNGBCost%>">
元，本产品最多允许
<input name="addNGBLim" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addNGBLim%>"> 
G
<br>
IP：每增加
<input name="addIpNum" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addIPNum%>">
个，需多付
<input name="addIPCost" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addIPCost%>">
元，本产品最多允许
<input name="addIPLim" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addIPLim%>"> 
个<br>
快照：每增加
<input name="addSnaNum" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addSNaNum%>">
个，需多付
<input name="addSnaCost" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addSnaCost%>">
元，本产品最多允许
<input name="addSnaLim" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addSnaLim%>"> 
个
<br>
完整备份：每增加
<input name="addBakNum" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addBakNum%>">
个，需多付
<input name="addBakCost" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addBakCost%>">
元，本产品最多允许
<input name="addBakLim" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addBakLim%>">
个<br>
IOPS：每增加
<input name="addIOPSNum" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addIOPSNum%>">
个，需多付
<input name="addIOPSCost" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addIOPSCost%>">
元，本产品最多允许
<input name="addIOPSLim" type="text" id="orderbyid" size="4" maxlength="10" value="<%=addIOPSLim%>">
个<br>
<br>
<br>
允许在线用ISO安装原始操作系统：
<input name="canUseISO" type="checkbox" id="canUseISO" value=1 <%if canUseISO=true  then%>checked<%end if%>>
不能安装以下操作系统ISO：
<input name="ISOlim" type="text" id="orderbyid" size="20" maxlength="50" value="<%=ISOlim%>">
（请输入云服务器自检中的ISO的ID用,号分开） <br>
允许使用控制台连接工具功能：
<input name="canUseConsol" type="checkbox" id="canUseConsol" value=1 <%if canUseConsol=true  then%>checked<%end if%>>
　允许使用光盘工具功能：
<input name="canUseTool" type="checkbox" id="canUseTool" value=1 <%if canUseTool=true  then%>checked<%end if%>>
　VLAN id：
<input name="VLANid" type="text" id="VLANid" size="4" maxlength="6"  value="<%=VLANid%>">
(正常不用设置)　<br>
允许录入拨号信息：
<input name="canADSL" type="checkbox" id="canADSL" value=1 <%if canADSL=true  then%>checked<%end if%>>
<br>
<br>
　　　　　
<input name="Submit" type="submit" id="Submit" value="添加">
<input name="modify" type="submit" id="modify" value="修改">
　　　　　　
<input name="delit" type="submit" id="delit" value="删除">
<br>
            <br>
      </p>
      </td>
  </tr>
</table></div>
</form>


              <form name="form2" method="post" action="product-vps-modifyname.asp">           
<DIV class="tableborder">
<table width="100%"  border="0" cellspacing="1">
  <tr >
    <td height="24" colspan="2" align="center" background="img/tablebg.gif"><font color="#FFFFFF">修改产品名称：</font></td>
  </tr>
  <tr bgcolor="#E4EAF2">
    <td width="9%" height="40" align="right">&nbsp;</td>
    <td width="91%" align="left">	                  原产品名：
                  <input name="VPStype" type="text" id="VPStype" size="20" maxlength="50">
新产品名：
                <input name="newVPStype" type="text" id="newVPStype" size="20" maxlength="50">
                <input type="submit" name="Submit" value="提交"></td>
  </tr>
</table></div>
</form>

  
	  </TD>
      <TD width=18 background="img/midri.gif">&nbsp;</TD>
    </TR>
  </TBODY>
</TABLE>
<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
  <TBODY>
    <TR>
      <TD width=30><IMG height=19 
                  src="img/rb1.jpg" 
                  width=30></TD>
      <TD 
                background=img/rb2.jpg>&nbsp;</TD>
      <TD width=30><IMG height=19 
                  src="img/rb3.jpg" 
                  width=30></TD>
    </TR>
  </TBODY>
</TABLE>
<%=htmlwrite("html10")%>
<%end if
if ef then
Response.Redirect "e.asp?e="&ec
end if%>
