agent.asp

功能最强大的ASP网站

<!--#include file="../inc/conn.asp"-->
<!--#include file="../inc/func.asp"-->
<%
FunCode="F302"
session("title")="实时开通API设置"
session("headline")="首页 -> 注册系统 -> 实时开通API设置"
%>
<!--#include file="../inc/head2.asp"-->
<br><br>
<%
sql = "select * from [user] where username='" & session("username") & "' "
'on error resume next
set rs=server.createobject("adodb.recordset")
rs.open sql ,conn,1,3

if request("act")="update" then
rs("web") = request("web")
rs.update
rs.close
set rs = nothing

session("mesg")="实时开通API设置成功"
Response.Redirect "../result.asp"
else
	 %>

	 
<br><br><br>
<img src='../images/dotdb.gif' width='10' height='10'> 
<font color='#FF0000'>实时开通API允许您通过API规定的格式提交订单到本系统并进行实时开通。</font><br>
<img src='../images/dotdb.gif' width='10' height='10'> 
<font color='#FF0000'>为了你的帐务安全，请选择输入您的实时开通认证IP列表，若有多个IP用逗号隔开</font>
   　<form method='POST' action='agent.asp?act=update' >
			<table border=1 bordercolor=#3770A9 bordercolordark=#ffffff cellpadding=8 
      cellspacing=0 width=50% class="size09" align="center" bgcolor="#efefef">
              <tbody> 
              <tr valign="middle"> 
                <td height="80"> 
                    <div align="left"> 
 请输入IP列表：<input type="Text" class="form" name="web" size="20" value="<%=rs("web")%>">&nbsp;&nbsp;<input type="Submit" value="确定" class="form"></form>
                     
                  </div>
                  <div align="center"> </div>
                </td>
              </tr>
              </tbody> 
            </table>
			




<% 
rs.close
set rs = nothing                                                                             
end if

%>
<!--#include file="../inc/bottom2.asp"-->