📄 admin_stuid_inc.asp
字号:
</td>
</tr>
<TR><TD class="zq" width="20%"><%=clas(5)%></TD>
<TD> <input name="<%=claslm(5)%>" type="text" maxlength="20" value="" style="width:200px;" maxlength="20"/>
<span id="<%=claslm(5)%>_txt">*</span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=clas(6)%></TD>
<TD> <INPUT TYPE="text" NAME="<%=claslm(6)%>" maxlength="20" style="width:200px;" maxlength="18">
<span id="<%=claslm(6)%>_txt">*</span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=clas(7)%></TD>
<TD> <TEXTAREA NAME="<%=claslm(7)%>" ROWS="6" COLS="" style="width:200px;"></TEXTAREA>
<span id="<%=claslm(7)%>_txt"></span><BR>
</td>
</tr>
<TR><TD> </TD><TD> <input type="submit" name="send" value=" 确 认 ">
</TD></TR>
</FORM>
</TABLE>
<%
check_auto
end Sub
'****************************************************
'名称:addinfos
'功能:批量添加信息
'****************************************************
Sub addsinfos()
%>
<FORM METHOD=POST ACTION="admin_stuid.asp?action=saves" name="edit" onsubmit="return CheckForm_adds();">
<table width="100%" cellspacing="1" cellpadding="0" class="info_tab">
<TR><TD class="zq" width="20%"><%=clas(0)%></TD>
<TD> <SELECT NAME="<%=claslm(0)%>" onchange="checkinfos('lj');" style="width:200px;"><%=my_sqlsel(lj_id,"lj")%></SELECT>
<BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=clas(1)%></TD>
<TD> <SELECT NAME="<%=claslm(1)%>" onchange="checkinfos('Col');" style="width:200px;"><%=my_sqlsel(Col_id,"Col")%></SELECT>
<BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=clas(2)%></TD>
<TD> <SELECT NAME="<%=claslm(2)%>" onchange="checkinfos('pro');" style="width:200px;"><option>请选择...</option></SELECT>
<span id="<%=claslm(2)%>_txt"></span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=clas(3)%></TD>
<TD> <SELECT NAME="<%=claslm(3)%>" style="width:200px;"><option>请选择...</option></SELECT></SELECT>
<span id="<%=claslm(3)%>_txt"></span><BR>
</td>
</tr>
</TABLE>
<table width="100%" cellspacing="1" cellpadding="0" class="info_tab2" id="idTB">
<tr>
<th width="20%"><%=clas(4)%></th>
<th width="20%"><%=clas(5)%></th>
<th width="20%"><%=clas(6)%></th>
<th width="20%"><%=clas(7)%></th>
<th></th>
</tr>
<TR>
<TD> <input type="text" name="<%=claslm(4)%>" style="width:90%;" maxlength="10"></td>
<TD> <input type="text" name="<%=claslm(5)%>" style="width:90%;" maxlength="20"/></td>
<TD> <INPUT TYPE="text" NAME="<%=claslm(6)%>" style="width:90%;" maxlength="18"></td>
<TD> <INPUT TYPE="text" NAME="<%=claslm(7)%>" style="width:90%;" maxlength="20"></td>
<TD> </TD>
</tr>
</TABLE>
<table width="100%" cellspacing="1" cellpadding="0" class="info_tab2">
<TR><TD width="20%">行数：<input id="idFirst" name="idFirst" style="height:16px;width:25px;text-align:center;ime-mode:disabled;" value=1 maxlength="3" onkeypress="var k=event.keyCode; if ((k<=57 &&k>=48)) return true;else return false" onpaste="return false" onFocus="this.select();">
<input type="button" onclick="setRow()" value="设定">
<input type="button" onclick="addRow()" value=" + "></TD><TD> <input type="submit" value=" 确 认 ">
</TD></TR>
</TABLE>
</FORM>
<div id="bottom"></div>
<script language="JavaScript">
<!--
function addRow(){//添加表格的一行
oTR=$val("idTB").insertRow(idTB.rows.length);
tmpNum=oTR.rowIndex;
oTD0=oTR.insertCell(0);
//oTD.innerText="第" + tmpNum+"行";//在该处添加的HTML代码会原封不动的显示在页面上
oTD0.innerHTML+=" <input type=\"text\" name=\"<%=claslm(4)%>\" maxlength=\"10\" style=\"width:90%;\">";
oTD1=oTR.insertCell(1);
oTD1.innerHTML+=" <input type=\"text\" name=\"<%=claslm(5)%>\" maxlength=\"20\" style=\"width:90%;\">";
oTD2=oTR.insertCell(2);
oTD2.innerHTML+=" <INPUT TYPE=\"text\" NAME=\"<%=claslm(6)%>\" maxlength=\"18\" style=\"width:90%;\">";
oTD3=oTR.insertCell(3);
oTD3.innerHTML+=" <INPUT TYPE=\"text\" NAME=\"<%=claslm(7)%>\" maxlength=\"20\" style=\"width:90%;\">";
oTD4=oTR.insertCell(4);
oTD4.innerHTML+="<a href=\"#\" onclick=\"delRow(this.parentElement.parentElement.rowIndex);\">删除</a>";
$val("idFirst").innerText=$val("idTB").rows.length-1;
window.location.href="#bottom";
return true;
}
//-->
</script>
<%
check_auto
end Sub
'****************************************************
'名称:editinfos
'功能:编辑信息
'****************************************************
Sub editinfos()
If id="" Then errormsg "参数错误！"
Sql_Lists="lj_id,Col_id,pro_id,cla_id,name,stuid,IdentityNO,con"
Sql_tables=" admin_stu"
Sql_Conditions=" id="&id
sql=Sqlinfo(Sql_Lists,Sql_tables,Sql_Conditions,Sql_Sortings,Sql_Orders,Sql_Additional)
rs_edit = connopen(sql)
If isArray(rs_edit)=False Then errormsg "参数错误"
%>
<table width="100%" cellspacing="1" cellpadding="0" class="info_tab">
<FORM METHOD=POST ACTION="admin_stuid.asp?action=mod" name="edit">
<TR><TD colspan=2 class="art_tit zq"><A HREF="admin_stuid.asp?action=list">返回<%=nowtit%>列表</A></TD></TR>
<TR><TD class="zq" width="20%"><%=clas(0)%></TD>
<TD> <SELECT NAME="<%=claslm(0)%>" onchange="checkinfos('lj');" style="width:200px;"><%=my_sqlsel(rs_edit(0,0),"lj")%></SELECT>
<BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=clas(1)%></TD>
<TD> <SELECT NAME="<%=claslm(1)%>" onchange="checkinfos('Col');" style="width:200px;"><%=my_sqlsel(rs_edit(1,0),"Col")%></SELECT>
<BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=clas(2)%></TD>
<TD> <SELECT NAME="<%=claslm(2)%>" onchange="checkinfos('pro');" style="width:200px;"><option>请选择...</option></SELECT>
<span id="<%=claslm(2)%>_txt"></span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=clas(3)%></TD>
<TD> <SELECT NAME="<%=claslm(3)%>" style="width:200px;"><option>请选择...</option></SELECT></SELECT>
<span id="<%=claslm(3)%>_txt"></span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=clas(4)%></TD>
<TD> <input type="text" name="<%=claslm(4)%>" value="<%=rs_edit(4,0)%>" style="width:200px;" maxlength="10">
<span id="<%=claslm(4)%>_txt">*</span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=clas(5)%></TD>
<TD> <input name="<%=claslm(5)%>" type="text" maxlength="20" value="<%=rs_edit(5,0)%>"/ style="width:200px;" maxlength="20">
<span id="<%=claslm(5)%>_txt">*</span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=clas(6)%></TD>
<TD> <INPUT TYPE="text" NAME="<%=claslm(6)%>" value="<%=rs_edit(6,0)%>" style="width:200px;" maxlength="18">
<span id="<%=claslm(6)%>_txt">*</span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=clas(7)%></TD>
<TD> <TEXTAREA NAME="<%=claslm(7)%>" ROWS="6" COLS="" style="width:200px;" maxlength="20"><%If rs_edit(7,0)<>"" Then res Replace(rs_edit(7,0),"<；br>；",""),1%></TEXTAREA>
<span id="<%=claslm(7)%>_txt"></span><BR>
</td>
</tr>
<TR><TD> </TD><TD> <input type="submit" name="send" value=" 确 认 ">
<INPUT TYPE="hidden" NAME="id" value="<%=id%>">
</TD></TR>
</FORM>
</TABLE>
<SCRIPT LANGUAGE="JavaScript">
postCols("<%=rs_edit(2,0)%>");
function checkpro(){
setSel2(<%=rs_edit(2,0)%>,$("SELECT")[2]);
}
postalls("<%=rs_edit(0,0)%>","<%=rs_edit(1,0)%>","<%=rs_edit(2,0)%>");
function checkcla(){
setSel2(<%=rs_edit(3,0)%>,$("SELECT")[3]);
}
</SCRIPT>
<%
end sub
Sub check_auto()
res "<SCRIPT LANGUAGE=""JavaScript"">",1
if Col_id<>0 Then res "postCols("""&Col_id&""");",1
if lj_id<>0 And Col_id<>0 And pro_id<>0 Then res "postalls("""&lj_id&""","""&Col_id&""","""&pro_id&""");",1
res "function checkpro(){",1
if pro_id<>0 Then res "setSel2("&pro_id&",$(""SELECT"")[2]);",1
res "}",1
res "function checkcla(){",1
if cla_id<>0 Then res "setSel2("&cla_id&",$(""SELECT"")[3]);",1
res "}",1
res "</SCRIPT>",1
End sub
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -