<!--#include file="conn.asp"-->
<!--#include file="inc/const.asp"-->
<!--#include file="inc/ex_stock/ex_sm_conn.asp"-->
<!--#include file="inc/ex_stock/ex_sm_const.asp"-->
<!--#include file="inc/ex_stock/ex_admin/ex_admin_index.asp"-->
<%
	if not exsm.stockadmin then
		exsm.errmess="您没有管理权限！请返回。"
		call exsm.endinfo("no")
	else
		select case request("action")
			case "tradesetting"
				call tradesetting()
			case "aisetting"
				call aisetting()
			case "pssetting"
				call pssetting()
			case "regsetting"
				call regsetting()
			case "usersetting"
				call usersetting()
			case "servesetting"
				call servesetting()
			case "sharebonus"
				call sharebonus()
			case "savesmsetting"
				call savesmsetting()
			case "savetradesetting"
				call savetradesetting()
			case "saveaisetting"
				call saveaisetting()
			case "savepssetting"
				call savepssetting()
			case "saveregsetting"
				call saveregsetting()
			case "saveusersetting"
				call saveusersetting()
			case "saveservesetting"
				call saveservesetting()
			case "savesharebonus"
				call savesharebonus()
			case "exconfig"
				call exconfig()
			case else
				call main()
		end select
	end if
	sub main()
		adminmenutop "基本设置"
		dim sm_setting
		session("ex_sm")=0
		set rs=stock_conn.execute("select top 1 sm_setting from ex_config order by id")
		sm_setting=split(rs(0),",")
%>

		<table class="tableborder1" cellspacing="1" cellpadding="3" align="center" border="0" style="width:100%">
			<form method="post" action="?action=savesmsetting">
			<tr>
				<th colspan="2" height="25" id="tabletitlelink"><a name="sm_setting"></a>-=> 基 本 设 置 <=-</th>
			</tr>
			<tr>
				<td class="tablebody1" width="50%"><u>股市名称</u></td>
				<td class="tablebody1" width="50%">&nbsp;<input type="text" size="35" name="sm_setting(0)" value="<%=sm_setting(0)%>"></td>
			</tr>
			<tr>
				<td class="tablebody2"><u>股票市场状态</u><br>股市是否开通</td>
				<td class="tablebody2">&nbsp;<input type="radio" name="sm_setting(1)" value="1" <%if sm_setting(1)=1 then%>checked<%end if%>>打开&nbsp;<input type="radio" name="sm_setting(1)" value="0" <%if sm_setting(1)=0 then%>checked<%end if%>>关闭</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>关闭说明</u><br>在股市关闭的情况下显示，支持html语法</td>
				<td class="tablebody1">&nbsp;<textarea name="stopreadme" cols="50" rows="3"><%=exsm.stockdata(15,0)%></textarea></td>
			</tr>
			<tr>
				<td class="tablebody2"><u>服务器时差</u></td>
				<td class="tablebody2">&nbsp;<select name="sm_setting(4)">
					<%for i=-23 to 23%>
						<option value="<%=i%>" <%if cint(i)=cint(sm_setting(4)) then%>selected<%end if%>><%=i%></option>
					<%next%>
					</select>&nbsp;*未使用功能
				</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>是否起用定时开关股市</u></td>
				<td class="tablebody1">&nbsp;<input type="radio" name="sm_setting(2)" value="1" <%if sm_setting(2)=1 then%>checked<%end if%>>是&nbsp;<input type="radio" name="sm_setting(2)" value="0" <%if sm_setting(2)=0 then%>checked<%end if%>>否</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>股市开放时间</u><br>请确认您已经设置起用定时开关功能<br>起止小时用符号“||”分开</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="sm_setting(3)" value="<%=sm_setting(3)%>"></td>
			</tr>
			<tr>
				<td class="tablebody1"><u>自动刷新时间</u><br>股市首页自动刷新的时间间隔</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="sm_setting(6)" value="<%=sm_setting(6)%>"> 秒&nbsp;建议选择120秒以上</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>首页股票默认指标升降序排列</u></td>
				<td class="tablebody2">&nbsp;<select name="sm_setting(20)">
						<option value="0|0" <%if sm_setting(20)="0|0" then%>selected<%end if%>>默认排列</option>
						<option value="1|0" <%if sm_setting(20)="1|0" then%>selected<%end if%>>昨收盘↓</option>
						<option value="1|1" <%if sm_setting(20)="1|1" then%>selected<%end if%>>昨收盘↑</option>
						<option value="2|0" <%if sm_setting(20)="2|0" then%>selected<%end if%>>当前价↓</option>
						<option value="2|1" <%if sm_setting(20)="2|1" then%>selected<%end if%>>当前价↑</option>
						<option value="3|0" <%if sm_setting(20)="3|0" then%>selected<%end if%>>涨跌↓</option>
						<option value="3|1" <%if sm_setting(20)="3|1" then%>selected<%end if%>>涨跌↑</option>
						<option value="4|0" <%if sm_setting(20)="4|0" then%>selected<%end if%>>买入↓</option>
						<option value="4|1" <%if sm_setting(20)="4|1" then%>selected<%end if%>>买入↑</option>
						<option value="5|0" <%if sm_setting(20)="5|0" then%>selected<%end if%>>卖出↓</option>
						<option value="5|1" <%if sm_setting(20)="5|1" then%>selected<%end if%>>卖出↑</option>
						<option value="6|0" <%if sm_setting(20)="6|0" then%>selected<%end if%>>今可交易↓</option>
						<option value="6|1" <%if sm_setting(20)="6|1" then%>selected<%end if%>>今可交易↑</option>
						<option value="7|0" <%if sm_setting(20)="7|0" then%>selected<%end if%>>今成交↓</option>
						<option value="7|1" <%if sm_setting(20)="7|1" then%>selected<%end if%>>今成交↑</option>	
						<option value="8|0" <%if sm_setting(20)="8|0" then%>selected<%end if%>>状态↓</option>
						<option value="8|1" <%if sm_setting(20)="8|1" then%>selected<%end if%>>状态↑</option>
					</select>
				</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>首页股票显示最多记录</u><br>用于股市首页股票数据每页最多显示条数</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="sm_setting(14)" value="<%=sm_setting(14)%>">&nbsp;条&nbsp;建议“20”条以内，以免影响美观</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>是否在股市首页显示股民持股信息</u><br>打开此项后将影响股市首页执行速度！</td>
				<td class="tablebody2">&nbsp;<input type="radio" name="sm_setting(19)" value="1" <%if sm_setting(19)=1 then%>checked<%end if%>>是&nbsp;<input type=radio name="sm_setting(19)" value="0" <%if sm_setting(19)=0 then%>checked<%end if%>>否</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>个人帐户股票数显示最多记录</u><br>用于个人帐户管理中股票页面每页最多显示条数</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="sm_setting(15)" value="<%=sm_setting(15)%>"> 条&nbsp;建议“15”条以内，以免影响速度</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>其他页显示最多记录</u><br>用于股票所有未归类页面和分页有关的项目</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="sm_setting(16)" value="<%=sm_setting(16)%>"> 条</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>是否允许游客访问</u><br>是否允许未注册用户访问股市</td>
				<td class="tablebody1">&nbsp;<input type="radio" name="sm_setting(5)" value="1" <%if sm_setting(5)=1 then%>checked<%end if%>>是&nbsp;<input type=radio name="sm_setting(5)" value="0" <%if sm_setting(5)=0 then%>checked<%end if%>>否</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>默认是否显示在线用户名单</u><br>为节省资源建议关闭</td>
				<td class="tablebody2">&nbsp;<input type="radio" name="sm_setting(11)" value="1" <%if sm_setting(11)=1 then%>checked<%end if%>>是&nbsp;<input type=radio name="sm_setting(11)" value="0" <%if sm_setting(11)=0 then%>checked<%end if%>>否</td>
			</tr>
			<tr>
				<td class="tablebody1"><a name=sm_setting1></a><u>是否启用防刷新机制</u><br>如选择打开请填写下面的限制刷新时间</td>
				<td class="tablebody1">&nbsp;<input type="radio" name="sm_setting(7)" value="1" <%if sm_setting(7)=1 then%>checked<%end if%>>是&nbsp;<input type=radio name="sm_setting(7)" value="0" <%if sm_setting(7)=0 then%>checked<%end if%>>否</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>浏览刷新时间间隔</u><br>填写该项目请确认您打开了防刷新机制</td>
				<td class="tablebody2">&nbsp;<input title="该值请不要过大建议小于[5]秒" type="text" size="10" name="sm_setting(8)" value="<%=sm_setting(8)%>">&nbsp;秒</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>防刷新功能有效的页面</u><br>请确认您打开了防刷新功能<br>您指定的页面将有防刷新作用，用户在限定的时间内不能重复打开该页面，具有一定减少资源消耗的作用<br>每个页面名请用“<font color="#ff0000">|</font>”符号隔开</td>
				<td class="tablebody1">&nbsp;<input type="text" size="35" name="sm_setting(9)" value="<%=sm_setting(9)%>"></td>
			</tr>
			<tr>
				<td class="tablebody2"><u>删除不活动用户时间</u><br>可设置删除多少分钟内不活动用户</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="sm_setting(10)" value="<%=sm_setting(10)%>">&nbsp;分钟</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>用户在线列表每页显示用户数</u></td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="sm_setting(12)" value="<%=sm_setting(12)%>"></td>
			</tr>
			<tr>
				<td class="tablebody2"><u>保留随机事件记录的条数</u><br>设置为0则保留所有随机事件记录</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="sm_setting(13)" value="<%=sm_setting(13)%>">&nbsp;条&nbsp;建议“<font color="#ff0000">500</font>”条以内，以免浪费资源</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>随机事件发生概率百分比</u></td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="sm_setting(17)" value="<%=sm_setting(17)%>">&nbsp;%</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>随机事件股价上涨的几率</u><br>发生随机事件时股价上涨的几率百分比</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="sm_setting(18)" value="<%=sm_setting(18)%>">&nbsp;%</td>
			</tr>
			<tr>
				<td colspan=2 align=center class="tablebody1"><input type="submit" name="submit" value="提 交"><a name="bottom"></a></td>
			</tr>
			</form>
		</table>
<%
		adminmenubottom
		exsm.rootshowa
	end sub
	sub tradesetting()
		adminmenutop "交易设置"
		dim trade_setting
		session("ex_sm")=0
		set rs=stock_conn.execute("select top 1 trade_setting from ex_config order by id")
		trade_setting=split(rs(0),",")
%>
		<table class="tableborder1" cellspacing="1" cellpadding="3" align="center" border="0" style="width:100%">
			<form method="post" action="?action=savetradesetting">
			<tr>
				<th colspan="2" height="25" id="tabletitlelink"><a name="trade_setting"></a>-=> 股 票 交 易 设 置 <=-</th>
			</tr>
			<tr>
				<td class="tablebody1" width="50%"><u>是否允许交易</u><br>只有本项打开时股民才能进行股票买卖操作</td>
				<td class="tablebody1" width="50%">&nbsp;<input type="radio" name="trade_setting(0)" value="1" <%if trade_setting(0)=1 then%>checked<%end if%>>是&nbsp;<input type=radio name="trade_setting(0)" value="0" <%if trade_setting(0)=0 then%>checked<%end if%>>否</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>买入时差限制</u><br>股民买入同一种股票的时间间隔，不做限制请设置为[0]</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="trade_setting(14)" value="<%=trade_setting(14)%>">&nbsp;分钟</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>卖出时差限制</u><br>股民卖出同一种股票的时间间隔，不做限制请设置为[0]</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="trade_setting(15)" value="<%=trade_setting(15)%>">&nbsp;分钟</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>T+0</u><br>买入某股票后再卖出的时间间隔，不做限制请设置为[0]</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="trade_setting(7)" value="<%=trade_setting(7)%>">&nbsp;分钟</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>买入次数限制</u><br>同一用户每天买入次数上限，不做限制请设置为[0]</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="trade_setting(16)" value="<%=trade_setting(16)%>">&nbsp;次</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>卖出次数限制</u><br>同一用户每天卖出次数上限，不做限制请设置为[0]</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="trade_setting(17)" value="<%=trade_setting(17)%>">&nbsp;次</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>成交量上限</u><br>当次买卖至多交易量，不做限制请设置为[0]</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="trade_setting(2)" value="<%=trade_setting(2)%>">&nbsp;股</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>手 续 费</u><br>每笔交易收取手续费的百分比</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="trade_setting(6)" value="<%=trade_setting(6)%>">&nbsp;%</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>手续费所得</u><br>经营者收取每笔交易手续费的百分比</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="trade_setting(1)" value="<%=trade_setting(1)%>">&nbsp;%</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>涨停上限</u><br>股票价格上涨率大于该百分比时出现涨停状态</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="trade_setting(3)" value="<%=trade_setting(3)%>">&nbsp;%</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>跌停下限</u><br>股票价格下滑率大于该百分比时出现跌停状态</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="trade_setting(4)" value="<%=trade_setting(4)%>">&nbsp;%</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>涨停规则</u><br>当股票出现涨停状态时是否允许买卖操作</td>
				<td class="tablebody2"><input type="radio" name="trade_setting(12)" value="0" <%if cint(trade_setting(12))=0 then%>checked<%end if%>>不限制&nbsp;<input type="radio" name="trade_setting(12)" value="1" <%if cint(trade_setting(12))=1 then%>checked<%end if%>>能买不能卖&nbsp;<input type="radio" name="trade_setting(12)" value="2" <%if cint(trade_setting(12))=2 then%>checked<%end if%>>能卖不能买&nbsp;<input type="radio" name="trade_setting(12)" value="3" <%if cint(trade_setting(12))=3 then%>checked<%end if%>>不能买卖</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>跌停规则</u><br>当股票出现跌停状态时是否允许买卖操作</td>
				<td class="tablebody1"><input type="radio" name="trade_setting(13)" value="0" <%if cint(trade_setting(13))=0 then%>checked<%end if%>>不限制&nbsp;<input type="radio" name="trade_setting(13)" value="1" <%if cint(trade_setting(13))=1 then%>checked<%end if%>>能买不能卖&nbsp;<input type="radio" name="trade_setting(13)" value="2" <%if cint(trade_setting(13))=2 then%>checked<%end if%>>能卖不能买&nbsp;<input type="radio" name="trade_setting(13)" value="3" <%if cint(trade_setting(13))=3 then%>checked<%end if%>>不能买卖</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>停牌条件</u><br>股票价格低于该值时出现停牌状态</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="trade_setting(5)" value="<%=trade_setting(5)%>"> 元</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>买入对股价的影响</u><br>购入股票时，股票价格上涨、下降、不变的百分比</td>
				<td class="tablebody1">&nbsp;<input type="text" size="5" name="trade_setting(8)" value="<%=trade_setting(8)%>">&nbsp;%&nbsp;：&nbsp;<input type="text" size="5" name="trade_setting(9)" value="<%=trade_setting(9)%>">&nbsp;%&nbsp;：&nbsp;<input disabled="true" type="text" size="5" value="<%=round(100-trade_setting(8)-trade_setting(9),2)%>">&nbsp;%</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>卖出对股价的影响</u><br>抛出股票时，股票价格下降、上涨、不变的百分比</td>
				<td class="tablebody2">&nbsp;<input type="text" size="5" name="trade_setting(10)" value="<%=trade_setting(10)%>">&nbsp;%&nbsp;：&nbsp;<input type="text" size="5" name="trade_setting(11)" value="<%=trade_setting(11)%>">&nbsp;%&nbsp;：&nbsp;<input disabled="true" type="text" size="5" value="<%=round(100-trade_setting(10)-trade_setting(11),2)%>">&nbsp;%</td>
			</tr>
			<tr>
				<td colspan="2" align="center" class="tablebody1"><input type="submit" name="submit" value="提 交"><a name="bottom"></a></td>
			</tr>
			</form>
		</table>
<%
		adminmenubottom
		exsm.rootshowa
	end sub
	sub aisetting()
		adminmenutop "ａｉ设置"
		dim ai_setting
		session("ex_sm")=0
		set rs=stock_conn.execute("select top 1 ai_setting from ex_config order by id")
		ai_setting=split(rs(0),"|")
%>
		<table class="tableborder1" cellspacing="1" cellpadding="3" align="center" border="0" style="width:100%">
			<form method="post" action="?action=saveaisetting">
			<tr>
				<th colspan="2" height="25" id="tabletitlelink"><a name="ai_setting"></a>-=> ai 机 器 人 设 置 <=-</th>
			</tr>
			<tr>
				<td class="tablebody1" width="50%"><u>是否开启ai功能</u></td>
				<td class="tablebody1" width="50%">&nbsp;<input type="radio" name="ai_setting(0)" value="1" <%if cint(ai_setting(0))=1 then%>checked<%end if%>>是&nbsp;<input type="radio" name="ai_setting(0)" value="0" <%if cint(ai_setting(0))=0 then%>checked<%end if%>>否</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>机器人交易是否影响价格变化</u></td>
				<td class="tablebody2">&nbsp;<input type="radio" name="ai_setting(3)" value="1" <%if cint(ai_setting(3))=1 then%>checked<%end if%>>是&nbsp;<input type="radio" name="ai_setting(3)" value="0" <%if cint(ai_setting(3))=0 then%>checked<%end if%>>否</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>ai买卖股票操作几率</u><br>机器人发生买卖股票操作概率百分比</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="ai_setting(2)" value="<%=ai_setting(2)%>">&nbsp;%</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>ai机器人名称</u><br>ai的名称，如果使用多机器人请使用“,”英文逗号隔开<br>资讯页等其它页面显示为第一个机器人名称。</td>
				<td class="tablebody2">&nbsp;<input type="text" size="35" name="ai_name" value="<%=ai_setting(1)%>"><input type="hidden" name="ai_setting(1)" value="<%=ai_setting(1)%>"></td>
			</tr>
			<tr>
				<td colspan="2" align="center" class="tablebody1"><input type="submit" name="submit" value="提 交"><a name="bottom"></a></td>
			</tr>
			</form>
		</table>
<%
		adminmenubottom
		exsm.rootshowa
	end sub
	sub pssetting()
		adminmenutop "上市设置"
		dim ps_setting
		session("ex_sm")=0
		set rs=stock_conn.execute("select top 1 ps_setting from ex_config order by id")
		ps_setting=split(rs(0),"|")
%>
		<table class="tableborder1" cellspacing="1" cellpadding="3" align="center" border="0" style="width:100%">
			<form method="post" action="?action=savepssetting">
			<tr>
				<th colspan="2" height="25" id="tabletitlelink"><a name="ps_setting"></a>-=> 新 股 上 市 设 置 <=-</th>
			</tr>
			<tr>
				<td class="tablebody1" width="50%"><u>是否开启个股上市申请</u></td>
				<td class="tablebody1" width="50%">&nbsp;<input type="radio" name="ps_setting(0)" value="1" <%if cint(ps_setting(0))=1 then%>checked<%end if%>>是&nbsp;<input type="radio" name="ps_setting(0)" value="0" <%if cint(ps_setting(0))=0 then%>checked<%end if%>>否</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>最少具备资金</u><br>申请者现有的资金必须达到这个值才能申请个股上市</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="ps_setting(1)" value="<%=ps_setting(1)%>">&nbsp;元&nbsp;建议[2000000]元以上</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>最少上市数目</u><br>最少上市股票数量</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="ps_setting(2)" value="<%=ps_setting(2)%>">&nbsp;股&nbsp;建议[1000000]股以上</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>是否允许股民对已上市股票进行编辑</u></td>
				<td class="tablebody2">&nbsp;<input type="radio" name="ps_setting(7)" value="1" <%if cint(ps_setting(7))=1 then%>checked<%end if%>>是&nbsp;<input type="radio" name="ps_setting(7)" value="0" <%if cint(ps_setting(7))=0 then%>checked<%end if%>>否</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>是否允许股民对未上市股票进行注销</u></td>
				<td class="tablebody1">&nbsp;<input type="radio" name="ps_setting(8)" value="1" <%if cint(ps_setting(8))=1 then%>checked<%end if%>>是&nbsp;<input type="radio" name="ps_setting(8)" value="0" <%if cint(ps_setting(8))=0 then%>checked<%end if%>>否</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>上市公司名称最小长度</u><br>填写数字，不能小于1大于50</td>
				<td class="tablebody2">&nbsp;<input type="text" name="ps_setting(3)" value="<%=ps_setting(3)%>" size="10"> byte</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>上市公司名称最大长度</u><br>填写数字，不能小于1大于50</td>
				<td class="tablebody1">&nbsp;<input type="text" name="ps_setting(4)" value="<%=ps_setting(4)%>" size="10"> byte</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>公司简介最大长度</u><br>填写数字，不能小于1大于255</td>
				<td class="tablebody2">&nbsp;<input type="text" name="ps_setting(5)" value="<%=ps_setting(5)%>" size="10"> byte</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>新股字符过滤</u><br>同步论坛版块信息时过滤的字符设置，<font color="#ff0000">请使用英文“,”逗号隔开</font><br>例如论坛版块名称为“『无限股票』”过滤“『,』”后股票名称为“无限股票”</td>
				<td class="tablebody1">&nbsp;<input type="text" size="35" name="ps_setting(6)" value="<%=ps_setting(6)%>"></td>
			</tr>
			<tr>
				<td colspan="2" align="center" class="tablebody2"><input type="submit" name="submit" value="提 交"><a name="bottom"></a></td>
			</tr>
			</form>
		</table>
<%
		adminmenubottom
		exsm.rootshowa
	end sub
	sub regsetting()
		adminmenutop "开户设置"
		dim reg_setting
		session("ex_sm")=0
		set rs=stock_conn.execute("select top 1 reg_setting from ex_config order by id")
		reg_setting=split(rs(0),",")
%>
		<table class="tableborder1" cellspacing="1" cellpadding="3" align="center" border="0" style="width:100%">
			<form method="post" action="?action=saveregsetting">
			<tr>
				<th colspan="2" height="25" id="tabletitlelink"><a name=reg_setting></a>-=> 股 市 开 户 设 置 <=-</th>
			</tr>
			<tr>
				<td class="tablebody1" width="50%"><u>是否允许开户</u></td> 
				<td class="tablebody1" width="50%">&nbsp;<input type="radio" name="reg_setting(0)" value="1" <%if reg_setting(0)=1 then%>checked<%end if%>>是&nbsp;<input type=radio name="reg_setting(0)" value="0" <%if reg_setting(0)=0 then%>checked<%end if%>>否</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>最少发帖数</u><br>限制必须达到这个数目才能在股市开户<br>不做限制请设置为[0]</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="reg_setting(1)" value="<%=reg_setting(1)%>"></td>
			</tr>
			<tr>
				<td class="tablebody1"><u>最少魅力值</u><br>限制必须达到这个数目才能在股市开户<br>不做限制请设置为[0]</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="reg_setting(2)" value="<%=reg_setting(2)%>"></td>
			</tr>
			<tr>
				<td class="tablebody2"><u>最少经验值</u><br>限制必须达到这个数目才能在股市开户<br>不做限制请设置为[0]</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="reg_setting(3)" value="<%=reg_setting(3)%>"></td>
			</tr>
			<tr>
				<td class="tablebody1"><u>最少金钱值</u><br>限制必须达到这个数目才能在股市开户<br>不做限制请设置为[0]</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="reg_setting(4)" value="<%=reg_setting(4)%>"></td>
			</tr>
			<tr>
				<td class="tablebody2"><u>原始资本</u><br>赠送给开户者的股市虚拟资金</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="reg_setting(5)" value="<%=reg_setting(5)%>"> 元</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>最长用户名长度</u><br>填写数字，不能小于[1]大于[50]</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="reg_setting(7)" value="<%=reg_setting(7)%>"> byte</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>开户后返回页面</u><br>开户成功后自动返回页面文件名称</td>
				<td class="tablebody2">&nbsp;<input type="text" size="35" name="reg_setting(6)" value="<%=reg_setting(6)%>"></td>
			</tr>
			<tr>
				<td colspan="2" align="center" class="tablebody1"><input type="submit" name="submit" value="提 交"><a name="bottom"></a></td>
			</tr>
			</form>
		</table>
<%
		adminmenubottom
		exsm.rootshowa
	end sub
	sub usersetting()
		adminmenutop "帐户设置"
		dim user_setting
		session("ex_sm")=0
		set rs=stock_conn.execute("select top 1 user_setting from ex_config order by id")
		user_setting=split(rs(0),",")
%>
		<table class="tableborder1" cellspacing="1" cellpadding="3" align="center" border="0" style="width:100%">
			<form method="post" action="?action=saveusersetting">
			<tr>
				<th colspan="2" height="25" id="tabletitlelink"><a name="user_setting"></a>-=> 股 市 帐 户 设 置 <=-</th>
			</tr>
			<tr>
				<td class="tablebody1" width="50%"><u>是否允许从股票帐户提款</u></td>
				<td class="tablebody1" width="50%">&nbsp;<input type="radio" name="user_setting(0)" value="1" <%if user_setting(0)=1 then%>checked<%end if%>>是&nbsp;<input type="radio" name="user_setting(0)" value="0" <%if user_setting(0)=0 then%>checked<%end if%>>否</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>是否允许存钱入股票帐户</u></td>
				<td class="tablebody2">&nbsp;<input type="radio" name="user_setting(1)" value="1" <%if user_setting(1)=1 then%>checked<%end if%>>是&nbsp;<input type="radio" name="user_setting(1)" value="0" <%if user_setting(1)=0 then%>checked<%end if%>>否</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>是否允许过户</u><br>只有本项打开时股民才能进行相互过户操作</td>
				<td class="tablebody1">&nbsp;<input type="radio" name="user_setting(4)" value="1" <%if user_setting(4)=1 then%>checked<%end if%>>是&nbsp;<input type="radio" name="user_setting(4)" value="0" <%if user_setting(4)=0 then%>checked<%end if%>>否</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>取款上限</u><br>股民每次取款最大金额<br>不做限制请设置为[0]</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="user_setting(2)" value="<%=user_setting(2)%>"> 元</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>存款上限</u><br>股民每次存款最大金额<br>不做限制请设置为[0]</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="user_setting(3)" value="<%=user_setting(3)%>"> 元</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>取款手续费</u><br>每次取款手续费的百分比</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="user_setting(6)" value="<%=user_setting(6)%>">&nbsp;%</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>存款手续费</u><br>每次存款收取手续费的百分比</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="user_setting(7)" value="<%=user_setting(7)%>">&nbsp;%</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>过户手续费</u><br>每次过户收取手续费的百分比</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="user_setting(8)" value="<%=user_setting(8)%>">&nbsp;%</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>资金兑换比例</u><br>论坛资金与股市虚拟资金兑换比例</td>
				<td class="tablebody1">&nbsp;<input disabled="true" type="text" size="8" value="1"><input type="text" size="8" name="user_setting(5)" value="<%=user_setting(5)%>">&nbsp;<font color="#ff0000">请慎重填写，建议不要修改</font></td>
			</tr>
			<tr>
				<td colspan="2" align="center" class="tablebody2"><input type="submit" name="submit" value="提 交"><a name="bottom"></a></td>
			</tr>
			</form>
		</table>
<%
		adminmenubottom
		exsm.rootshowa
	end sub
	sub sharebonus()
		adminmenutop "分红设置"
		dim sb_setting
		session("ex_sm")=0
		set rs=stock_conn.execute("select top 1 sb_setting from ex_config order by id")
		sb_setting=split(rs(0),",")
%>
		<table class="tableborder1" cellspacing="1" cellpadding="3" align="center" border="0" style="width:100%">
			<form method="post" action="?action=savesharebonus">
			<tr>
				<th colspan="2" height="25" id="tabletitlelink"><a name="sh_setting"></a>-=> 股 票 分 红 设 置 <=-</th>
			</tr>
			<tr>
				<td class="tablebody1" width="50%"><u>是否允许股东分红</u><br>本项打开时股东才能进行股票分红操作</td>
				<td class="tablebody1" width="50%">&nbsp;<input type="radio" name="sb_setting(0)" value="1" <%if sb_setting(0)=1 then%>checked<%end if%>>是&nbsp;<input type="radio" name="sb_setting(0)" value="0" <%if sb_setting(0)=0 then%>checked<%end if%>>否</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>是否允许股东发公告</u><br>本项打开时股东才能进行公告发布</td>
				<td class="tablebody2">&nbsp;<input type="radio" name="sb_setting(1)" value="1" <%if sb_setting(1)=1 then%>checked<%end if%>>是&nbsp;<input type="radio" name="sb_setting(1)" value="0" <%if sb_setting(1)=0 then%>checked<%end if%>>否</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>分红手续费</u><br>每次分红收取手续费的百分比</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="sb_setting(4)" value="<%=sb_setting(4)%>">&nbsp;%</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>负红上限</u><br>负红最大百分比<br>单位：股票单价百分比，等于[0]为禁止分负红</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="sb_setting(2)" value="<%=sb_setting(2)%>">&nbsp;%</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>分红时差限制</u><br>同一股东分红后再分红的时间间隔，不做限制请设置为[0]</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="sb_setting(3)" value="<%=sb_setting(3)%>">&nbsp;分钟</td>
			</tr>
			<tr>
				<td colspan="2" align="center" class="tablebody2"><input type="submit" name="submit" value="提 交"><a name="bottom"></a></td>
			</tr>
			</form>
		</table>
<%
		adminmenubottom
		exsm.rootshowa
	end sub
	sub servesetting()
		adminmenutop "服务设置"
		dim se_setting
		session("ex_sm")=0
		set rs=stock_conn.execute("select top 1 se_setting from ex_config order by id")
		se_setting=split(rs(0),",")
%>
		<table class="tableborder1" cellspacing="1" cellpadding="3" align="center" border="0" style="width:100%">
			<form method="post" action="?action=saveservesetting">
			<tr>
				<th colspan="2" height="25" id="tabletitlelink"><a name="sh_setting"></a>-=> 股 票 分 红 设 置 <=-</th>
			</tr>
			<tr>
				<td class="tablebody1" width="50%"><u>是否允许使用所有服务功能</u><br>本项打开时股民才能使用所有服务功能</td>
				<td class="tablebody1" width="50%">&nbsp;<input type="radio" name="se_setting(0)" value="1" <%if se_setting(0)=1 then%>checked<%end if%>>是&nbsp;<input type="radio" name="se_setting(0)" value="0" <%if se_setting(0)=0 then%>checked<%end if%>>否</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>解除再次买入时间限制</u><br>解除某股票再次买入时间限制服务的价格，不使用该功能请设置为0</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="se_setting(1)" value="<%=se_setting(1)%>">&nbsp;元</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>解除再次卖出时间限制</u><br>解除某股票再次卖出时间限制服务的价格，不使用该功能请设置为0</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="se_setting(2)" value="<%=se_setting(2)%>">&nbsp;元</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>解除[T+0]时间限制</u><br>解除某股票[T+0]时间限制服务的价格，不使用该功能请设置为0</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="se_setting(3)" value="<%=se_setting(3)%>">&nbsp;元</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>解除分红时间限制</u><br>解除分红操作时间限制服务的价格，不使用该功能请设置为0</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="se_setting(4)" value="<%=se_setting(4)%>">&nbsp;元</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>复位买入次数限制</u><br>每次复位买入次数限制服务的价格，不使用该功能请设置为0</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="se_setting(5)" value="<%=se_setting(5)%>">&nbsp;元</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>复位卖出次数限制</u><br>每次复位卖出次数限制服务的价格，不使用该功能请设置为0</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="se_setting(6)" value="<%=se_setting(6)%>">&nbsp;元</td>
			</tr>
			<tr>
				<td class="tablebody2"><u>解除所有限制</u><br>每次购买解除所有限制服务的价格，不使用该功能请设置为0</td>
				<td class="tablebody2">&nbsp;<input type="text" size="10" name="se_setting(7)" value="<%=se_setting(7)%>">&nbsp;元</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>更改用户名</u><br>每次更改自已在股市的用户名的价格，不使用该功能请设置为0</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="se_setting(9)" value="<%=se_setting(9)%>">&nbsp;元</td>
			</tr>
			<tr>
				<td class="tablebody1"><u>公告服务</u><br>每次发布公告的价格，不使用该功能请设置为0</td>
				<td class="tablebody1">&nbsp;<input type="text" size="10" name="se_setting(8)" value="<%=se_setting(8)%>">&nbsp;元</td>
			</tr>
			<tr>
				<td colspan="2" align="center" class="tablebody2"><input type="submit" name="submit" value="提 交"><a name="bottom"></a></td>
			</tr>
			</form>
		</table>
<%
		adminmenubottom
		exsm.rootshowa
	end sub
	function htmlsetting(setting)
		if not isnull(setting) then
			setting=replace(setting,"'","")
			setting=replace(setting,chr(34),"")
			htmlsetting=setting
		end if
	end function
	sub exstatistics()
		if exsm.stockdata(6,0)=0 then
			if not split(exsm.scriptnameurl,"/")(2)="127.0.0.1" and not split(exsm.scriptnameurl,"/")(2)="localhost" and not split(exsm.scriptnameurl,"/")(2)="192.168.0.1" then
				response.write "<script src=""http://www.czie.com/js/statisticsjs.asp?userrurl="&exsm.scriptnameurl&"&plugname="&exsm.setting_info(0)&"&showon=0&platform=dvbbs7.1.0&version=1.7.5""></script>"
				stock_conn.execute("update ex_config set stock_setting=1")
			end if
		end if
	end sub
	sub savesmsetting()
		dim sm_setting,l_content
		if exsm.outsiderefer() then
			exsm.errmess="请不要从外部提交数据。"
			call exsm.endinfo("stop.gif")
			exit sub
		end if
		if exsm.repeatrefer() then
			exsm.errmess="您提交的数据已经保存，请不要重复提交。"
			call exsm.endinfo("stop.gif")
			exit sub
		end if
		sm_setting=request.form("sm_setting(0)")&","&request.form("sm_setting(1)")&","&request.form("sm_setting(2)")&","&request.form("sm_setting(3)")&","&request.form("sm_setting(4)")&","&request.form("sm_setting(5)")&","&request.form("sm_setting(6)")&","&request.form("sm_setting(7)")&","&request.form("sm_setting(8)")&","&request.form("sm_setting(9)")&","&request.form("sm_setting(10)")&","&request.form("sm_setting(11)")&","&request.form("sm_setting(12)")&","&request.form("sm_setting(13)")&","&request.form("sm_setting(14)")&","&request.form("sm_setting(15)")&","&request.form("sm_setting(16)")&","&request.form("sm_setting(17)")&","&request.form("sm_setting(18)")&","&request.form("sm_setting(19)")&","&request.form("sm_setting(20)")
		set rs=stock_conn.execute("update ex_config set sm_setting='"&htmlsetting(sm_setting)&"'")
		l_content=replace("其它管理：调整基本设置 ","'","")
		call exsm.savelog(exsm.scriptname,l_content,4)
		exsm.delstockcahe("exsm_imitate_info")
		session("ex_sm")=1
		exstatistics
		exsm.sucmess="股市基本信息设置成功。"
		call exsm.endinfo("ok")
	end sub
	sub savetradesetting()
		dim trade_setting,l_content
		if exsm.outsiderefer() then
			exsm.errmess="请不要从外部提交数据。"
			call exsm.endinfo("stop.gif")
			exit sub
		end if
		if exsm.repeatrefer() then
			exsm.errmess="您提交的数据已经保存，请不要重复提交。"
			call exsm.endinfo("stop.gif")
			exit sub
		end if
		trade_setting=request.form("trade_setting(0)")&","&request.form("trade_setting(1)")&","&request.form("trade_setting(2)")&","&request.form("trade_setting(3)")&","&request.form("trade_setting(4)")&","&request.form("trade_setting(5)")&","&request.form("trade_setting(6)")&","&request.form("trade_setting(7)")&","&request.form("trade_setting(8)")&","&request.form("trade_setting(9)")&","&request.form("trade_setting(10)")&","&request.form("trade_setting(11)")&","&request.form("trade_setting(12)")&","&request.form("trade_setting(13)")&","&request.form("trade_setting(14)")&","&request.form("trade_setting(15)")&","&request.form("trade_setting(16)")&","&request.form("trade_setting(17)")
		set rs=stock_conn.execute("update ex_config set trade_setting='"&htmlsetting(trade_setting)&"'")
		l_content=replace("其它管理：调整交易设置 ","'","")
		call exsm.savelog(exsm.scriptname,l_content,4)
		exsm.delstockcahe("exsm_imitate_info")
		session("ex_sm")=1
		exstatistics
		exsm.sucmess="股市交易信息设置成功。"
		call exsm.endinfo("ok")
	end sub
	sub saveaisetting()
		dim ai_namei,ai_namej,ai_namea,ai_name,ai_setting,l_content
		if exsm.outsiderefer() then
			exsm.errmess="请不要从外部提交数据。"
			call exsm.endinfo("stop.gif")
			exit sub
		end if
		if exsm.repeatrefer() then
			exsm.errmess="您提交的数据已经保存，请不要重复提交。"
			call exsm.endinfo("stop.gif")
			exit sub
		end if
		if htmlsetting(request.form("ai_name"))="" then
			exsm.errmess="请正确填写“ai”名称。"
			call exsm.endinfo("no")
			exit sub
		end if
		if request.form("ai_setting(0)")=1 then
			ai_name=split(htmlsetting(request.form("ai_name")),",")
			ai_namea=split(htmlsetting(request.form("ai_setting(1)")),",")
			ai_namej=ai_name(0)
			ai_namei=ai_namea(0)
			if ai_namej<>ai_namei then
				stock_conn.execute("update ex_ai set username='"&ai_namej&"' where username='"&ai_namei&"'")
				stock_conn.execute("update ex_customer set username='"&ai_namej&"' where username='"&ai_namei&"'")
			end if
		end if
		ai_namej=htmlsetting(request.form("ai_name"))
		ai_setting=request.form("ai_setting(0)")&"|"&ai_namej&"|"&request.form("ai_setting(2)")&"|"&request.form("ai_setting(3)")
		set rs=stock_conn.execute("update ex_config set ai_setting='"&htmlsetting(ai_setting)&"'")
		l_content=replace("其它管理：调整ａｉ设置 ","'","")
		call exsm.savelog(exsm.scriptname,l_content,4)
		exsm.delstockcahe("exsm_imitate_info")
		session("ex_sm")=1
		exstatistics
		exsm.sucmess="股市ａｉ信息设置成功。"
		call exsm.endinfo("ok")
	end sub
	sub savepssetting()
		dim ps_setting,l_content
		if exsm.outsiderefer() then
			exsm.errmess="请不要从外部提交数据。"
			call exsm.endinfo("stop.gif")
			exit sub
		end if
		if exsm.repeatrefer() then
			exsm.errmess="您提交的数据已经保存，请不要重复提交。"
			call exsm.endinfo("stop.gif")
			exit sub
		end if
		ps_setting=request.form("ps_setting(0)")&"|"&request.form("ps_setting(1)")&"|"&request.form("ps_setting(2)")&"|"&request.form("ps_setting(3)")&"|"&request.form("ps_setting(4)")&"|"&request.form("ps_setting(5)")&"|"&request.form("ps_setting(6)")&"|"&request.form("ps_setting(7)")&"|"&request.form("ps_setting(8)")
		set rs=stock_conn.execute("update ex_config set ps_setting='"&htmlsetting(ps_setting)&"'")
		l_content=replace("其它管理：调整上市设置 ","'","")
		call exsm.savelog(exsm.scriptname,l_content,4)
		exsm.delstockcahe("exsm_imitate_info")
		session("ex_sm")=1
		exstatistics
		exsm.sucmess="股市上市信息设置成功。"
		call exsm.endinfo("ok")
	end sub
	sub saveregsetting()
		dim reg_setting,l_content
		if exsm.outsiderefer() then
			exsm.errmess="请不要从外部提交数据。"
			call exsm.endinfo("stop.gif")
			exit sub
		end if
		if exsm.repeatrefer() then
			exsm.errmess="您提交的数据已经保存，请不要重复提交。"
			call exsm.endinfo("stop.gif")
			exit sub
		end if
		reg_setting=request.form("reg_setting(0)")&","&request.form("reg_setting(1)")&","&request.form("reg_setting(2)")&","&request.form("reg_setting(3)")&","&request.form("reg_setting(4)")&","&request.form("reg_setting(5)")&","&request.form("reg_setting(6)")&","&request.form("reg_setting(7)")
		set rs=stock_conn.execute("update ex_config set reg_setting='"&htmlsetting(reg_setting)&"'")
		l_content=replace("其它管理：调整开户设置 ","'","")
		call exsm.savelog(exsm.scriptname,l_content,4)
		exsm.delstockcahe("exsm_imitate_info")
		session("ex_sm")=1
		exstatistics
		exsm.sucmess="股市开户信息设置成功。"
		call exsm.endinfo("ok")
	end sub
	sub saveusersetting()
		dim user_setting,l_content
		if exsm.outsiderefer() then
			exsm.errmess="请不要从外部提交数据。"
			call exsm.endinfo("stop.gif")
			exit sub
		end if
		if exsm.repeatrefer() then
			exsm.errmess="您提交的数据已经保存，请不要重复提交。"
			call exsm.endinfo("stop.gif")
			exit sub
		end if
		user_setting=request.form("user_setting(0)")&","&request.form("user_setting(1)")&","&request.form("user_setting(2)")&","&request.form("user_setting(3)")&","&request.form("user_setting(4)")&","&request.form("user_setting(5)")&","&request.form("user_setting(6)")&","&request.form("user_setting(7)")&","&request.form("user_setting(8)")
		set rs=stock_conn.execute("update ex_config set user_setting='"&htmlsetting(user_setting)&"'")
		l_content=replace("其它管理：调整帐户设置 ","'","")
		call exsm.savelog(exsm.scriptname,l_content,4)
		exsm.delstockcahe("exsm_imitate_info")
		session("ex_sm")=1
		exstatistics
		exsm.sucmess="股市帐户信息设置成功。"
		call exsm.endinfo("ok")
	end sub
	sub savesharebonus()
		dim sb_setting,l_content
		if exsm.outsiderefer() then
			exsm.errmess="请不要从外部提交数据。"
			call exsm.endinfo("stop.gif")
			exit sub
		end if
		if exsm.repeatrefer() then
			exsm.errmess="您提交的数据已经保存，请不要重复提交。"
			call exsm.endinfo("stop.gif")
			exit sub
		end if
		sb_setting=request.form("sb_setting(0)")&","&request.form("sb_setting(1)")&","&request.form("sb_setting(2)")&","&request.form("sb_setting(3)")&","&request.form("sb_setting(4)")
		set rs=stock_conn.execute("update ex_config set sb_setting='"&htmlsetting(sb_setting)&"'")
		l_content=replace("其它管理：调整分红设置 ","'","")
		call exsm.savelog(exsm.scriptname,l_content,4)
		exsm.delstockcahe("exsm_imitate_info")
		session("ex_sm")=1
		exstatistics
		exsm.sucmess="股市分红信息设置成功。"
		call exsm.endinfo("ok")
	end sub
	sub saveservesetting()
		dim se_setting,l_content
		if exsm.outsiderefer() then
			exsm.errmess="请不要从外部提交数据。"
			call exsm.endinfo("stop.gif")
			exit sub
		end if
		if exsm.repeatrefer() then
			exsm.errmess="您提交的数据已经保存，请不要重复提交。"
			call exsm.endinfo("stop.gif")
			exit sub
		end if
		se_setting=request.form("se_setting(0)")&","&request.form("se_setting(1)")&","&request.form("se_setting(2)")&","&request.form("se_setting(3)")&","&request.form("se_setting(4)")&","&request.form("se_setting(5)")&","&request.form("se_setting(6)")&","&request.form("se_setting(7)")&","&request.form("se_setting(8)")&","&request.form("se_setting(9)")
		set rs=stock_conn.execute("update ex_config set se_setting='"&htmlsetting(se_setting)&"'")
		l_content=replace("其它管理：调整服务设置 ","'","")
		call exsm.savelog(exsm.scriptname,l_content,4)
		exsm.delstockcahe("exsm_imitate_info")
		session("ex_sm")=1
		exstatistics
		exsm.sucmess="股市服务信息设置成功。"
		call exsm.endinfo("ok")
	end sub
	sub exconfig()
		dim sm_setting,reg_setting,trade_setting,user_setting,ps_setting,sb_setting,se_setting,ai_setting,stopreadme,l_content
		dim ai_name
		if exsm.outsiderefer() then
			exsm.errmess="请不要从外部提交数据。"
			call exsm.endinfo("stop.gif")
			exit sub
		end if
		if exsm.repeatrefer() then
			exsm.errmess="您提交的数据已经保存，请不要重复提交。"
			call exsm.endinfo("stop.gif")
			exit sub
		end if
		ai_setting=split(exsm.stockdata(14,0),"|")
		ai_name=split(htmlsetting(ai_setting(1)),",")
		stock_conn.execute("update ex_ai set username='无限机器人' where username='"&ai_name(0)&"'")
		stock_conn.execute("update ex_customer set username='无限机器人' where username='"&ai_name(0)&"'")
		sm_setting="虚拟股市,1,0,6||24,0,1,180,1,3,ex_sm_index.asp|ex_sm_dispcompare.asp,15,0,30,300,20,15,30,80,60,1,0|0"
		ps_setting="1|2000000|1000000|4|8|200|‖,『,』,〖,〗,【,】,≮,≯,「,」,《,》|1|0"
		reg_setting="1,0,0,0,0,100000,ex_sm_help.asp,10"
		trade_setting="1,100,1000000,10,10,1,0.5,60,30,40,40,30,0,0,10,10,20,20"
		user_setting="1,1,0,0,1,10,0,0,2"
		sb_setting="1,0,0,60,2"
		se_setting="1,500,500,1000,2000,1000,1000,5500,120000,5000"
		ai_setting="1|无限机器人|30|1"
		stopreadme="数据调整中……"
		stock_conn.execute("drop table ex_config")
		stock_conn.execute("create table ex_config (id int identity (1, 1) not null primary key,todaybuy float default 0,todaysell float default 0,todaytotal float default 0,excolexp float default 0,todaydate datetime default "&sqlsmnowstring&",stock_setting int default 0 not null,sm_setting ntext not null,ps_setting ntext not null,reg_setting ntext not null,trade_setting ntext not null,user_setting ntext not null,sb_setting ntext not null,se_setting ntext not null,ai_setting ntext not null,stopreadme ntext not null)")
		stock_conn.execute("insert into ex_config (todaydate,stock_setting,sm_setting,ps_setting,reg_setting,trade_setting,user_setting,sb_setting,se_setting,ai_setting,stopreadme) values ('"&date()&"',0,'"&sm_setting&"','"&ps_setting&"','"&reg_setting&"','"&trade_setting&"','"&user_setting&"','"&sb_setting&"','"&se_setting&"','"&ai_setting&"','"&stopreadme&"')")
		l_content=replace("其它管理：恢复股市默认设置 ","'","")
		call exsm.savelog(exsm.scriptname,l_content,4)
		exsm.delstockcahe("exsm_imitate_info")
		session("ex_sm")=1
		exstatistics
		exsm.sucmess="更新成功，设置已还原默认。"
		call exsm.endinfo("ok")
	end sub
%>