产品类型 | 云服务器名 | IP 地址 | 开通日期 | 到期日期 | 操作 | 状态 | 操作 | |
<%=VPStype%> | <%=dsphVPS("vpsname")%> | <%
if dsphVPS("isagentpd")=true then%>
<%if not isnull(dsphVPS("AgnUpIP")) then%><%=replace(dsphVPS("AgnUpIP"),"|"," ")%><%end if%> <% else Set dsX = Server.CreateObject("ADODB.Recordset") Sql="Select * from FreeHost.FreeHost_Product_VPS_IP where VPSID="&dsphVPS("id") dsX.Open Sql,conn,1,1 while not dsX.eof %> <%=dsX("IP")%> <% if dsX("portstart")>0 then Set dsserver = Server.CreateObject("ADODB.Recordset") Sql="Select * from FreeHost.FreeHost_ServerVPSlist where id='"&dsphVPS ("ServerlistID")&"'" dsserver.Open Sql,conn,1,1 isONEip=dsserver("isONEip") if isONEip=true then Set dsPORTserver = Server.CreateObject("ADODB.Recordset") Sql="Select * from FreeHost.FreeHost_ServerPORTlist where id='"&dsserver("useportserver")&"'" dsPORTserver.Open Sql,conn,1,1%> <%=dsPORTserver("IP")%>(公网) <%end if end if dsX.movenext wend end if %> ">(管理>>)<% if not isnull(dsphVPS("ADSLName")) then %>拨号资源(手工录入):<%=dsphVPS("ADSLName")%>/<%=dsphVPS("ADSLpass")%> <%else Set dsADSL = Server.CreateObject("ADODB.Recordset") Sql="Select * from FreeHost.FreeHost_Product_VPS_ADSL where VPSID="&dsphVPS("id") dsADSL.Open Sql,conn,1,1 while not dsADSL.eof%> 拨号资源:<%=dsADSL("ADSLName")%>/<%=dsADSL("ADSLpass")%> <% dsADSL.movenext wend end if%> |
<%=formatdatetime(dsphVPS("starttime"),1)%> | <%if Application("VPStestHour")>0 then%><%=dsphVPS("endtime")%><%else%><%=formatdatetime(dsphVPS("endtime"),1)%><%end if%> | vpsadmrepay1.asp<%else%>vpsadm2.asp<%end if%>?id=<%=dsphVPS("id")%>&go=c">延期 | <%if dsphVPS("endtime")>NOW then%>
<%if dsphVPS("istest")="y" then%>
试用<%else%>
<%=dsphVPS("status")%>
<%end if%>
<%else%>
过期
<%if dsphVPS("status")="暂停" then%>
暂停 <%end if%> <%end if%> |
&go=a" target="_blank">管理 | |
&go=a">弹性云:内存<%=dsphVPS("MaXRam")%>M CPU个数:<%=dsphVPS("cpunum")%>
硬盘:<%=dsphVPS("maxspace")%>G 月流量上限:<%if dsphVPS("CDNMaxMb")=0 then%>不限流量<%else%><%=dsphVPS("CDNMaxMb")%>MB<%end if%> 带宽上限:<%if dsphVPS("MaxMbps8")=0 then%>不限<%else%><%=dsphVPS("MaxMbps8")%>Mbps<%end if%>
<%if not isnull(dsphVPS("corewhatuser")) then%> 备注:<%=dsphVPS("corewhatuser")%>&go=e">>>><%else%> 设置备注&go=e">>>> <%end if%> |