<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
|
<%Session.CodePage=65001%>
|
<!--#include virtual="/inc/chkadmin.gds"-->
|
<!--#include virtual="/inc/function.gds"-->
|
<%
|
if isDepartment("0606")=0 then
|
Response.Redirect "/"
|
Response.End()
|
end If
|
|
UnitID=request("UnitID")
|
OrdType=Request("OrdType")
|
|
'各种返回信息
|
SystemMessageType=trim(Request("SystemMessageType"))
|
SMT=trim(Request("SMT"))
|
if SystemMessageType<>"" then
|
if SMT="1" then
|
SystemMessageTXT="必要数据不足!!"
|
elseif SMT="2" then
|
SystemMessageTXT="保存完成!!"
|
elseif SMT="3" then
|
SystemMessageTXT="地区信息重复!!"
|
end if
|
end if
|
|
Set rs = Server.CreateObject("ADODB.Recordset")
|
If UnitID<>"" Then
|
sql="select * from IntroducerUnitData where UnitID="&UnitID&" order by UnitID desc"
|
rs.open sql,objConn,1,1
|
if rs.eof Then Response.Redirect "/IntroducerUnitData.gds"
|
UnitID = rs("UnitID")
|
UnitName = rs("UnitName") '名称
|
UnitShort = rs("UnitShort") '简称
|
UnitAddress = rs("UnitAddress") '地址
|
UnitTEL = rs("UnitTEL") '电话
|
UnitState = rs("UnitState") '状态(0禁用,1正常,2管理员)
|
APPID = rs("APPID")
|
APPSECRET = rs("APPSECRET")
|
ServiceBranch = rs("ServiceBranch")
|
ServiceMinPrice = rs("ServiceMinPrice")
|
ServiceUnitPrice= rs("ServiceUnitPrice")
|
ServiceLong = rs("ServiceLong")
|
ServiceRemarks = rs("ServiceRemarks")
|
ServiceAddress = rs("ServiceAddress")
|
ServiceAddress_lat = rs("ServiceAddress_lat")
|
ServiceAddress_lng = rs("ServiceAddress_lng")
|
If UnitState="0" Then
|
UnitState="禁用"
|
ElseIf UnitState="1" Then
|
UnitState="正常"
|
ElseIf UnitState="2" Then
|
UnitState="管理员"
|
End If
|
rs.close()
|
If ServiceBranch="" Then
|
Response.Redirect "/IntroducerUnitData.gds?SystemMessageType=4&SMT=7"
|
Else
|
sql="select * from dictionary where vtitle='ServiceBranch' and vOrder2='"&ServiceBranch&"'"
|
rs.open sql,objConn,1,1
|
if Not rs.eof then
|
dictionary_id = rs("id")
|
ServiceBranchName=rs("vtext")
|
ServiceBranchType=rs("vType")
|
Else
|
Response.Redirect "/IntroducerUnitData.gds?SystemMessageType=4&SMT=7"
|
end If
|
rs.close()
|
End If
|
Else
|
Response.Redirect "/IntroducerUnitData.gds"
|
End If
|
|
%>
|
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
|
<html xmlns="http://www.w3.org/1999/xhtml">
|
<head>
|
<title><%=LindemanAdmin%></title>
|
<!--#include virtual="/inc/ccs.gds"-->
|
</head>
|
<body onkeydown="xKeyEvent(event)">
|
<!--#INCLUDE FILE="menu_header.gds" -->
|
<!-- content -->
|
<div id="content">
|
<!--#INCLUDE FILE="AdminUser_menu_left.gds" -->
|
<!-- content / right -->
|
<div id="right">
|
<!-- messages -->
|
<!-- forms -->
|
<div class="box">
|
<!-- box / title -->
|
<div class="title">
|
<h5>机构转运费用管理 <%=ServiceBranchName%></h5>
|
<ul class="links">
|
<%If isDepartment("060602")=1 then%><li><a href="javascript:JS_Form1SaveSubmit(0);">确定修改</a></li><%End if%>
|
<%
|
if PositionURLID="1" then PositionURLID=11
|
ReturnURL=session("PositionURL"&PositionURLID)
|
if InStr(ReturnURL,"?")<1 then
|
ReturnURL=ReturnURL&"?ReturnURLID="&(PositionURLID)
|
else
|
ReturnURL=ReturnURL&"&ReturnURLID="&(PositionURLID)
|
end if
|
%>
|
<li><a href="<%=ReturnURL%>">返回</a></li>
|
</ul>
|
</div>
|
<script LANGUAGE="javascript">
|
//表单提交-保存
|
function JS_Form1SaveSubmit(State)
|
{
|
document.getElementById("admin_save").value="112";
|
form1.submit();
|
}
|
</script>
|
<!-- end box / title -->
|
<!--#include virtual="/inc/SystemMessages.gds" -->
|
<form id="form1" name="form1" action="admin_save.gds" method="post">
|
<input name="admin_save" id="admin_save" type="hidden" value="112">
|
<input name="UnitID" type="hidden" value="<%=UnitID%>">
|
<input name="dictionary_id" type="hidden" value="<%=dictionary_id%>">
|
<div class="form">
|
<div class="fields">
|
<div class="field field-first">
|
<div class="label" style="float: left;margin-left: 0px;">
|
<label for="input-small">机构名称:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 70px;">
|
<input type="text" id="UnitName" name="UnitName" class="small valid" style="width:146px;" value="<%=UnitName%>" readonly="true">
|
</div>
|
<div class="label" style="float: left;margin-left: 244px;">
|
<label for="input-small">对外名称:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 70px;">
|
<input type="text" id="ServiceBranchName" name="ServiceBranchName" class="small" style="width:146px;" value="<%=ServiceBranchName%>">
|
</div>
|
<div class="label" style="float: left;margin-left: 478px;">
|
<label for="input-small">机构状态:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 74px;">
|
<select name="ServiceBranchType" id="ServiceBranchType" style="width:80px;padding: 5px 0 5px 1px;" class="select">
|
<option value="1"<%if ServiceBranchType=1 then Response.Write " selected"%>>启用</option>
|
<option value="0"<%if ServiceBranchType=0 then Response.Write " selected"%>>停用</option>
|
</select>
|
(停用后不再客户端显示)
|
</div>
|
</div>
|
<div class="field">
|
<div class="label" style="float: left;margin-left: 0px;">
|
<label for="input-small">距离最低报价:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 84px;">
|
<input type="text" id="ServiceMinPrice" name="ServiceMinPrice" class="small" style="width:40px;" value="<%=ServiceMinPrice%>">
|
</div>
|
<div class="label" style="float: left;margin-left: 142px;">
|
<label for="input-small">元</label>
|
</div>
|
<div class="label" style="float: left;margin-left: 196px;">
|
<label for="input-small">单价/公里:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 122px;">
|
<input type="text" id="ServiceUnitPrice" name="ServiceUnitPrice" class="small" style="width:40px;" value="<%=ServiceUnitPrice%>">
|
</div>
|
<div class="label" style="float: left;margin-left: 314px;">
|
<label for="input-small">元</label>
|
</div>
|
<div class="label" style="float: left;margin-left: 364px;">
|
<label for="input-small">长途设定:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 104px;">
|
<input type="text" id="ServiceLong" name="ServiceLong" class="small" style="width:40px;" value="<%=ServiceLong%>">
|
</div>
|
<div class="label" style="float: left;margin-left: 476px;">
|
<label for="input-small">公里以上</label>
|
</div>
|
</div>
|
<div class="field">
|
<div class="label" style="float: left;margin-left: 0px;">
|
<label for="input-small">出发地址:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 64px;">
|
<input type="text" id="ServiceAddress" name="ServiceAddress" class="small" style="width:476px;" value="<%=ServiceAddress%>"><a href="http://www.gpsspg.com/maps.htm?s=<%=ServiceAddress_lat%>,<%=ServiceAddress_lng%>&stype=2" target="_blank"><%=ServiceAddress_lat%>,<%=ServiceAddress_lng%></a>
|
</div>
|
</div>
|
<div class="field">
|
<div class="label" style="float: left;margin-left: 0px;">
|
<label for="input-small">备注:</label>
|
</div>
|
<div class="input" style="float:left;margin-left: 46px;">
|
<input type="text" id="ServiceRemarks" name="ServiceRemarks" class="small" style="width:476px;" value="<%=ServiceRemarks%>">
|
</div>
|
</div>
|
|
</div>
|
</div>
|
<!-- box / title -->
|
<div class="title">
|
<h5>地区基础费用列表</h5>
|
<ul class="links">
|
<%If OrderState=0 And (isDepartment("040202")=1 Or isDepartment("040203")=1) then '未审核%>
|
<li><a onclick="javascript:JS_RegionCreateOpen();">添加</a></li>
|
<!--<li><a onclick="javascript:JS_RegionDel();">删除</a></li>-->
|
<%End If%>
|
</ul>
|
</div>
|
<!-- end box / title -->
|
<%
|
If UnitID<>"" Then
|
Y=1
|
sql="select * from IntroducerRegion where IRUnitID="&UnitID&" order by IRState desc,IRid"
|
'sql="select top 1 * from tblStItm"
|
rs.open sql,objConn,1,1
|
Dim FormArray()
|
ArrayX=20
|
if not rs.eof then
|
acc3=rs.recordcount
|
end If
|
ArrayY=acc3
|
REDIM FormArray(ArrayX,ArrayY)
|
do while not rs.Eof
|
'读取数据
|
IRid = rs("IRid") '
|
IRProvince = rs("IRProvince") '省
|
IRCity = rs("IRCity") '城市
|
IRArea = rs("IRArea") '地区
|
IRPrice = rs("IRPrice") '费用
|
IRState = rs("IRState") '状态(0,1)
|
IRRemarks = rs("IRRemarks") '备注
|
|
'写入数组
|
FormArray(1,Y)=Y
|
FormArray(2,Y)=IRid
|
FormArray(3,Y)=IRProvince
|
FormArray(4,Y)=IRCity
|
FormArray(5,Y)=IRArea
|
FormArray(6,Y)=IRPrice
|
FormArray(7,Y)=IRState
|
FormArray(8,Y)=IRRemarks
|
Y=Y+1
|
rs.movenext
|
loop
|
|
If Y=1 then
|
SystemMessageType=2
|
SystemMessageTXT="数据库中相关无数据！"
|
end If
|
StItmListY=Y-1
|
Else
|
StItmListY=0
|
End If
|
%>
|
<div class="table">
|
<table>
|
<thead>
|
<tr style="white-space: nowrap;">
|
<th class="left">序号</th>
|
<th>地区</th>
|
<th>基础费用</th>
|
<th>状态</th>
|
<th>备注</th>
|
</tr>
|
</thead>
|
<input name="StItmListY" id="StItmListY" type="hidden" value="<%=StItmListY%>">
|
<tbody id="StItmList">
|
|
<%
|
For Y=Lbound(FormArray,2)+1 to Ubound(FormArray,2)
|
IRid=FormArray(2,Y)
|
IRProvince=FormArray(3,Y)
|
IRCity=FormArray(4,Y)
|
IRArea=FormArray(5,Y)
|
IRPrice=FormArray(6,Y)
|
IRState=FormArray(7,Y)
|
IRRemarks=FormArray(8,Y)
|
|
IRName=IRProvince
|
If IRCity<>"" Then IRName=IRName&"-"&IRCity
|
If IRArea<>"" Then IRName=IRName&"-"&IRArea
|
|
If IRState="1" Then
|
IRStateTXT="启用"
|
Else
|
IRStateTXT="停用"
|
End If
|
%>
|
<tr style="white-space: nowrap;" id="StItm_<%=Y%>">
|
<input name="IRid_<%=Y%>" type="hidden" value="<%=IRid%>">
|
<td class="selected" style="width: 1%;padding: 10px;"><%=Y%></td>
|
<td class="selected" style="padding: 10px;"><A onclick="JS_RegionEdit('<%=IRid%>','<%=IRProvince%>','<%=IRCity%>','<%=IRArea%>','<%=IRPrice%>','<%=IRState%>','<%=IRRemarks%>');"><%=IRName%></A></td>
|
<td class="selected" style="padding: 10px;"><%=IRPrice%></td>
|
<td class="selected" style="padding: 10px;"><%=IRStateTXT%></td>
|
<td class="category left" style="padding: 10px;"><%=IRRemarks%></td>
|
</tr>
|
<%Next%>
|
</tbody>
|
<%if Y<=11 then%>
|
<tbody id="StItmList1">
|
<%for j=Y to 11%>
|
<tr id="StItm1_<%=j%>">
|
<td class="selected" style="width: 1%;"> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
<td> </td>
|
</tr>
|
<%next%>
|
</tbody>
|
<%end if%>
|
|
</table>
|
</div>
|
</div>
|
</div>
|
</form>
|
<!-- end forms -->
|
<script>
|
//新建区域费用资料-关闭窗口
|
function JS_RegionCreateClose()
|
{
|
RegionCreate.style.display="none";
|
}
|
//新建区域费用资料-保存
|
function JS_RegionCreateSave()
|
{
|
form2.submit();
|
}
|
//新建区域费用资料-打开窗口
|
function JS_RegionCreateOpen()
|
{
|
document.getElementById('RegionCreateTXT').innerHTML = '新建区域费用资料';
|
RegionCreate.style.display="block";
|
document.form2.admin_save.value='111';
|
document.form2.IRid.value='';
|
document.getElementById('IRProvince').value = '';
|
document.getElementById('IRCity').value = '';
|
document.getElementById('IRArea').value = '';
|
document.getElementById('IRPrice').value = '0';
|
document.getElementById('IRRemarks').value = '';
|
$("#IRState").val(1);
|
}
|
//显示修改地区信息
|
function JS_RegionEdit(IRid,IRProvince,IRCity,IRArea,IRPrice,IRState,IRRemarks)
|
{
|
RegionCreate.style.display='block';
|
document.getElementById('RegionCreateTXT').innerHTML = '修改区域费用资料';
|
document.form2.admin_save.value='111';
|
document.form2.IRid.value=IRid;
|
document.getElementById('IRProvince').value = IRProvince;
|
document.getElementById('IRCity').value = IRCity;
|
document.getElementById('IRArea').value = IRArea;
|
document.getElementById('IRPrice').value = IRPrice;
|
document.getElementById('IRRemarks').value = IRRemarks;
|
$("#IRState").val(IRState);
|
}
|
</script>
|
<div class="dialogJ dialogJfix dialogJshadow" id="RegionCreate" style="width: 370px; right: 300px; top: 150px;display:none;">
|
<div class="dialogJtitle">
|
<a href="javascript:JS_RegionCreateClose();" class="dialogJclose" title="关闭本窗口"> </a>
|
<span class="dialogJtxt" id="RegionCreateTXT">新建区域费用资料</span>
|
</div>
|
<form id="form2" name="form2" action="admin_save.gds" method="post">
|
<input name="admin_save" type="hidden" value="111">
|
<input name="IRid" type="hidden" value="">
|
<input name="IRUnitID" type="hidden" value="<%=UnitID%>">
|
<div class="dialogJcontent">
|
<div class="dialogJbody" id="dialogJbody" style="height: 322px;">
|
<div class="modify-album-name">
|
<p class="album-tips"></p>
|
<span>状态：</span>
|
<select id="IRState" name="IRState" style="padding: 5px 0 5px 8px;">
|
<option value="1">启用</option>
|
<option value="0">停用</option>
|
</select>
|
</div>
|
<div class="modify-album-name">
|
<p class="album-tips"></p>
|
<span>省份：</span>
|
<input id="IRProvince" name="IRProvince" type="text" value="" maxlength="99/" style="width: 248px;">
|
</div>
|
<div class="modify-album-name">
|
<p class="album-tips"></p>
|
<span>城市：</span>
|
<input id="IRCity" name="IRCity" type="text" value="" maxlength="99/" style="width: 248px;">
|
</div>
|
<div class="modify-album-name">
|
<p class="album-tips"></p>
|
<span>地区：</span>
|
<input id="IRArea" name="IRArea" type="text" value="" maxlength="99/" style="width: 248px;">
|
</div>
|
<div class="modify-album-name">
|
<p class="album-tips"></p>
|
<span>基础费用：</span>
|
<input id="IRPrice" name="IRPrice" type="text" value="" maxlength="99/" style="width: 224px;">
|
</div>
|
<div class="modify-album-name">
|
<p class="album-tips"></p>
|
<span>备注：</span>
|
<input id="IRRemarks" name="IRRemarks" type="text" value="" maxlength="99/" style="width: 248px;">
|
</div>
|
</div>
|
</div>
|
</form>
|
<div class="dialogJanswers">
|
<input type="button" class="dialogJbtn first-child" onclick="JS_RegionCreateSave()" value="确定">
|
<input type="button" class="dialogJbtn" onclick="JS_RegionCreateClose()" value="取消">
|
</div>
|
</div>
|
</div>
|
<!-- end content / right -->
|
</div>
|
<!-- end content -->
|
|
|
<IFRAME id="HiddenFrame" name="HiddenFrame" WIDTH=0 HEIGHT=0 MARGINWIDTH=0 MARGINHEIGHT=0 HSPACE=0 VSPACE=0 FRAMEBORDER=0 SCROLLING=no BORDERCOLOR=#ffffff></IFRAME>
|
<!--#include FILE="vicgame.asp"-->
|
</body>
|
</html>
|
