📄 baoxiu_edit.asp
字号:
<!--#include file ="conn.asp"-->
<!--#include file="admin/ChkURL.asp"-->
<%
if session("baoxiuuser_id")="" then
response.write "<script language=jscript>alert('对不起,您不是本站的注册用户或没有登陆系统!');window.location.href='index.asp';</script>"
response.end
end if
Dim baoxiu_master,baoxiu_user,baoxiu_wp,baoxiu_yuanyin,baoxiu_time,star_time
Dim baoxiu_banji,baoxiu_jieci,baoxiu_class,baoxiu_date,contact,guzhang,ip,rs
baoxiu_id=cint(request("baoxiu_id"))
if baoxiu_id<>"" and baoxiu_id="0" then
Response.Write "<script>alert('未指定参数');window.location.href='index.asp';</script>"
response.end
else
weixiu_main=request("weixiu_main")
bx_id=session("bx_id")
baoxiu_master=session("baoxiuuser_name") '会员帐号
baoxiu_user=request("baoxiu_user") '报修人姓名
baoxiu_wp=request("baoxiu_wp") '报修品名
baoxiu_yuanyin=request("baoxiu_yuanyin") '报修主题
baoxiu_banji=request("baoxiu_banji")
baoxiu_jieci=request("baoxiu_jieci")
baoxiu_class=request("baoxiu_class") '报修部门
baoxiu_date=request("baoxiu_date") '希望维修日期
baoxiu_time=request("baoxiu_time") '具体时间
contact=request("contact") '联系电话
guzhang=request("guzhang") '报修故障显现及要求
ip=request.servervariables("remote_addr")
star_time=now()
set rs=server.createobject("adodb.recordset")
sql="select * from baoxiu where baoxiu_id=" & baoxiu_id
rs.open sql,conn,3,2
if rs.eof and rs.bof then
rs.close
set rs=nothing
Response.Write "<script>alert('指定的报修不存在!');window.location.href='index.asp';</script>"
response.end
end if
end if
%>
<%if session("baoxiuuser_name")<>rs("baoxiu_master") then
response.write "<script language=jscript>alert('对不起!您不能修改这条信息!非作者本人不能修改!');window.location.href='index.asp';</script>"
response.end
end if%>
<script LANGUAGE="javascript">
<!--
function checkdata()
{
if(document.baoxiu.baoxiu_class.value == "")
{
alert("对不起,请选择年级或部门!");
document.baoxiu.baoxiu_class.focus();
return false;
}
if(document.baoxiu.baoxiu_banji.value == "")
{
alert("对不起,请选择班级!");
document.baoxiu.baoxiu_banji.focus();
return false;
}
if (document.baoxiu.baoxiu_user.value=="")
{
alert("对不起,请输入您的真实姓名!")
document.baoxiu.baoxiu_user.focus()
return false
}
if(document.baoxiu.baoxiu_date.value == "")
{
alert("对不起,请选择希望维修日期!");
document.baoxiu.baoxiu_date.focus();
return false;
}
if(document.baoxiu.contact.value == "")
{
alert("对不起,请输入联系电话!");
document.baoxiu.contact.focus();
return false;
}
if(document.baoxiu.contact.value.length == "")
{
alert("对不起,请输入电话号码!");
document.baoxiu.contact.focus();
return false;
}
if(document.baoxiu.baoxiu_wp.value == "")
{
alert("对不起,请输入报修物品名!");
document.baoxiu.baoxiu_wp.focus();
return false;
}
if(document.baoxiu.baoxiu_yuanyin.value == "")
{
alert("对不起,请输入报修原因!");
document.baoxiu.baoxiu_yuanyin.focus();
return false;
}
if(document.baoxiu.guzhang.value == "")
{
alert("对不起,请输入报修故障显现及要求!");
document.baoxiu.guzhang.focus();
return false;
}
}
function getVal(){
var TelTypeValue;
for (i=0;i<baoxiu.TelType.length;i++){
if (baoxiu.TelType[i].checked){
TelTypeValue=baoxiu.TelType[i].value;
break; //使用该语句可以减少不必要的循环次数
}
}
if(TelTypeValue=="校内"){
if(baoxiu.contact.value.length!=4 && baoxiu.contact.value.length!=8){
alert("您输入的校内电话号码有误!应该为4位或8位数字!");baoxiu.contact.focus();return;
}
}else{
if(TelTypeValue=="个人"){
if(baoxiu.contact.value.length!=11 && baoxiu.contact.value.length!=8){
alert("您输入的给人电话号码有误!应该为8位或11位数字!");baoxiu.contact.focus();return;
}
}
}
}
//-->
</script>
<SCRIPT language=JavaScript>
<!--
var LastCount =0;
function CountStrByte(Message,Total,Used,Remain){ //字节统计
var ByteCount = 0;
var StrValue = Message.value;
var StrLength = Message.value.length;
var MaxValue = Total.value;
if(LastCount != StrLength) { // 在此判断,减少循环次数
for (i=0;i<StrLength;i++){
ByteCount = (StrValue.charCodeAt(i)<=256) ? ByteCount + 1 : ByteCount + 2;
if (ByteCount>MaxValue) {
Message.value = StrValue.substring(0,i);
alert("留言内容最多不能超过 " +MaxValue+ " 个字节!\n注意:一个汉字为两字节。");
ByteCount = MaxValue;
break;
}
}
Used.value = ByteCount;
Remain.value = MaxValue - ByteCount;
LastCount = StrLength;
}
}
//-->
</SCRIPT>
<script language="javascript" src="js/time1.js"> //调用JS代码
</script>
<!--#include file =head.asp-->
<link rel="stylesheet" href="admin/style.css" type="text/css">
<%if rs("weixiu_main")<>"" then%>
<script language="javascript">
alert("此报修信息已回复,不能再修改!");
window.location.href="index.asp"
</script>
<%else%>
<form action="baoxiu_edit_save.asp?baoxiu_id=<%=baoxiu_id%>" method="post" name="baoxiu" OnSubmit="return checkdata()">
<table width="760" border=0 align="center" cellpadding=0 cellspacing=1 class="tableBorder5">
<tr>
<td height="30" colspan="2" align="center"><b>修 改 报 修 单</b></td>
</tr>
<tr>
<td height="30" colspan="2" align="center"><span class="style1"><font
color=red>说明:请您认真填写每一项! </font></span></td>
</tr>
<tr>
<td height="30" colspan="2" align="center" class="style2"><b>报修编号:<%=rs("bx_id")%></b></td>
</tr>
<tr>
<td height="30" align="right">用户帐号: </td>
<td height="30"> <font color="#FF0000"><%=session("baoxiuuser_name")%></font> </td>
</tr>
<tr>
<td height="30" align="right">报修人姓名:</td>
<td height="30">
<input name="baoxiu_user" class="wu" value="<%=rs("baoxiu_user")%>" size="10" maxlength="10" readonly="readonly">
* (此为你注册的真实姓名,不可更改!)</td>
</tr>
<tr>
<td width="164" height="30" align="right"> 报修部门:</td>
<td height="30">
<%
set rs_s=server.CreateObject("adodb.recordset")
sql="select * from b_smallclass order by top "
rs_s.open sql,conn,1,1
%>
<script language="JavaScript" type="text/javascript">
var num;
var calArray=new Array();
<%
dim h
h=0
do while not rs_s.eof
%>
calArray[<%=h%>]=new Array("<%=rs_s("id")%>","<%=rs_s("nsmallarea")%>","<%=rs_s("nbigarea")%>");
<%
h=h+1
rs_s.movenext
loop
rs_s.close
set rs_s=nothing
%>
num=<%=h%>
function givevalue(myvalue){
document.baoxiu.baoxiu_banji.length = 0;
document.baoxiu.baoxiu_banji.options[0] = new Option('请选择','');
for (i=0;i < num; i++)
{
if (calArray[i][2] == myvalue)
{
document.baoxiu.baoxiu_banji.options[document.baoxiu.baoxiu_banji.length] = new Option(calArray[i][1], calArray[i][0],"","");
}
}
}
</script>
<select name="baoxiu_class" id="baoxiu_class" onchange="givevalue(document.baoxiu.baoxiu_class.options[document.baoxiu.baoxiu_class.selectedIndex].value)">
<%
set rs_b=server.CreateObject("adodb.recordset")
sql="select * from b_bigclass order by top"
rs_b.open sql,conn,1,1
%>
<%
do while not rs_b.eof
%>
<option value="<%=rs_b("id")%>" <%if rs("baoxiu_class")=""&rs_b("id")&"" then response.write("selected")%>><%=rs_b("nbigarea")%></option>
<%
rs_b.movenext
loop
rs_b.close
set rs_b=nothing
%>
</select>
<select name="baoxiu_banji" id="baoxiu_banji">
<%
set rs_s=server.CreateObject("adodb.recordset")
sql="select * from b_smallclass where nbigarea="&rs("baoxiu_class")&""
rs_s.open sql,conn,1,1
do while not rs_s.eof
%>
<option value="<%=rs_s("id")%>" <%if rs("baoxiu_banji")=""&rs_s("id")&"" then response.write("selected")%>><%=rs_s("nsmallarea")%></option>
<%
rs_s.movenext
loop
rs_s.close
set rs_s=nothing
%>
</select>
* 班级物品报修请选择班次</td>
</tr>
<tr>
<td width="164" height="30" align="right">报修品名:</td>
<td class=content9 height="30">
<%
set rs_s=server.CreateObject("adodb.recordset")
sql="select * from w_sclass order by top "
rs_s.open sql,conn,1,1
%>
<script language="JavaScript" type="text/javascript">
var num1;
var calArray1=new Array();
<%
dim j
j=0
do while not rs_s.eof
%>
calArray1[<%=j%>]=new Array("<%=rs_s("id")%>","<%=rs_s("sclassname")%>","<%=rs_s("bclassid")%>");
<%
j=j+1
rs_s.movenext
loop
rs_s.close
set rs_s=nothing
%>
num1=<%=j%>
function givevalue1(myvalue){
document.baoxiu.baoxiu_wp.length = 0;
document.baoxiu.baoxiu_wp.options[0] = new Option('请选择','');
for (i=0;i < num1; i++)
{
if (calArray1[i][2] == myvalue)
{
document.baoxiu.baoxiu_wp.options[document.baoxiu.baoxiu_wp.length] = new Option(calArray1[i][1], calArray1[i][0],"","");
}
}
}
</script>
<select name="baoxiu_lb" id="baoxiu_lb" onchange="givevalue1(document.baoxiu.baoxiu_lb.options[document.baoxiu.baoxiu_lb.selectedIndex].value)">
<%
dim firstid1
set rs_b=server.CreateObject("adodb.recordset")
sql="Select * from w_bclass order by top"
rs_b.open sql,conn,1,1
if rs_b.eof or rs_b.bof then
noclass1=1
%>
<option selected="selected">还没有添加大类</option>
<%else %>
<option value="" selected="selected">请选择</option>
<%
do while not rs_b.eof
%>
</option><option value="<%=rs_b("id")%>" <%if rs("baoxiu_lb")=""&rs_b("id")&"" then response.write("selected")%>><%=rs_b("bclassname")%></option>
<%
rs_b.movenext
loop
end if
rs_b.close
set rs_b=nothing
%>
</select>
<select name="baoxiu_wp" id="baoxiu_wp">
<%if noclass1=1 then%>
<option value="" selected="selected">还没有添加小类</option>
<%
else
'在没有选择大类(页面刚载入)时要载入的小类,要跟默认的大类对应。
set rs_s=server.CreateObject("adodb.recordset")
sql="select * from w_sclass where bclassid="&rs("baoxiu_lb")&""
rs_s.open sql,conn,1,1
if rs_s.eof or rs_s.bof then
%>
<option value="" selected="selected">请选择</option>
<%
else
do while not rs_s.eof
%>
<option value="<%=rs_s("id")%>" <%if rs("baoxiu_wp")=""&rs_s("id")&"" then response.write("selected")%>><%=rs_s("sclassname")%></option>
<%
rs_s.movenext
loop
end if
rs_s.close
set rs_s=nothing
end if
%>
</select>
*</td>
</tr>
<tr>
<td width="164" height="30" align="right"> 预约维修日期: </td>
<td height="30">
<input type="text" name="baoxiu_date" readonly="readOnly" value="<%=rs("baoxiu_date")%>" onclick="setDayHM(this);" />
* (点击输入框选择预约维修时间)</td>
</tr>
<tr>
<td width="164" height="30" align=right>联系电话:</td>
<td height="30">
<input name="contact" type="text" class="wu" value="<%=rs("contact")%>" size="18" maxlength="15" onBlur="getVal()" onkeyup="value=value.replace(/[^\d]/g,'') "onbeforepaste="clipboardData.setData('text',clipboardData.getData('text').replace(/[^\d]/g,''))">
*
<input name="TelType" type="radio" value="校内" checked="checked" />
校内电话
<input name="TelType" type="radio" value="个人" />
个人电话</td>
</tr>
<tr>
<td width="164" height="30" align="right"> 报修原因: </td>
<td height="30">
<input name="baoxiu_yuanyin" class="wu" value="<%=rs("baoxiu_yuanyin")%>" size="50" maxlength="50">
*(故障简单描述,不能超过50个字)</td>
</tr>
<tr>
<td width="164" align="right"> 故障详细描述:</td>
<td>
<textarea name="guzhang" cols="65" rows="10" class="wu" onKeyDown="CountStrByte(this.form.guzhang,this.form.total,this.form.used,this.form.remain);"
onkeyup="CountStrByte(this.form.guzhang,this.form.total,this.form.used,this.form.remain);"><%=rs("guzhang")%></textarea>
*<BR><BR>
最多允许
<input name="total" type="text" disabled id="total" value="1600" size="4">
个字节 已用字节:
<input name="used" type="text" disabled id="used" value="0" size="4">
剩余字节:
<input name="remain" type="text" disabled id="remain" value="1600" size="4"></td>
</tr>
<tr align="center">
<td height="30" colspan=2>
<input class="button2" name="apply" type="submit" value="报修申请" >
<input type="hidden" name="baoxiu_user2" value="<%=rs_user("zs_name")%>" />
<input type="hidden" name=ip value="<%=request.servervariables("remote_addr")%>">
<input name="Submit" type="reset" class="button2" value="重新填写">
<span class="TableRow2">
<input type="button" value="返 回" name="back" onclick="javascript:history.back()" />
</span></td>
</tr>
</table>
</form>
<%end if%>
<!--#include file =bottom.asp-->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -