📄 admin_res_cou_cho_inc.asp
字号:
</tr>
<TR><TD class="zq" width="20%" colspan=2><B>举办单位</B> </td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_cous(2)%></TD>
<TD> <SELECT NAME="<%=cho_couslm(2)%>" onchange="checkCols();" disabled><%=my_sqlsel(rs_edit(2,0),"Col")%></SELECT>
<BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_cous(3)%></TD>
<TD> <SELECT NAME="<%=cho_couslm(3)%>" disabled><option>请选择...</option></SELECT>
<span id="<%=cho_couslm(3)%>_txt"></span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_cous(6)%></TD>
<TD> <input name="<%=cho_couslm(6)%>" type="text" maxlength="4" value="<%=rs_edit(4,0)%>" class="put"/>
<span id="<%=cho_couslm(6)%>_txt">*</span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%" colspan=2><B>课程资料</B> </td>
<TR><TD class="zq" width="20%"><%=cho_cous(4)%></TD>
<TD> <input name="<%=cho_couslm(4)%>" type="text" maxlength="20" value="<%=rs_edit(5,0)%>" class="put"/>
<span id="<%=cho_couslm(4)%>_txt">*</span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_cous(14)%></TD>
<TD> <input name="<%=cho_couslm(14)%>" type="text" maxlength="5" value="<%=rs_edit(6,0)%>" style="width:200px;ime-mode:disabled;" onkeypress="var k=event.keyCode; if ((k<=57 &&k>=46&&k!=47)) return true;else return false" onpaste="return false"/>
<span id="<%=cho_couslm(14)%>_txt">*</span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_cous(13)%></TD>
<TD> <SELECT NAME="<%=cho_couslm(13)%>"><%=t_select(rs_edit(7,0))%></SELECT>
<span id="<%=cho_couslm(13)%>_txt">*</span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_cous(9)%></TD>
<TD> <input name="<%=cho_couslm(9)%>" type="text" maxlength="4" value="<%=rs_edit(8,0)%>" style="width:200px;ime-mode:disabled;" onkeypress="var k=event.keyCode; if ((k<=57 &&k>=48)) return true;else return false" onpaste="return false"/>
<span id="<%=cho_couslm(9)%>_txt">*</span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_cous(5)%></TD>
<TD> <input name="<%=cho_couslm(5)%>" type="text" onclick="setday(this)" value="<%=rs_edit(9,0)%>" class="put" readonly/>
<span id="<%=cho_couslm(5)%>_txt">*</span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_cous(10)%></TD>
<TD> <input name="<%=cho_couslm(10)%>" type="text" onclick="setday(this)" value="<%=rs_edit(10,0)%>" class="put" readonly/>
<span id="<%=cho_couslm(10)%>_txt">*</span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_cous(11)%></TD>
<TD> <INPUT TYPE="text" NAME="<%=cho_couslm(11)%>" maxlength="20" class="put" value="<%=rs_edit(11,0)%>">
<span id="<%=cho_couslm(11)%>_txt">*</span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_cous(7)%></TD>
<TD> <input name="<%=cho_couslm(7)%>" type="text" maxlength="3" value="<%=rs_edit(12,0)%>" style="ime-mode:disabled;" onkeypress="var k=event.keyCode; if ((k<=57 &&k>=48)) return true;else return false" onpaste="return false" class="put" />
<span id="<%=cho_couslm(7)%>_txt">*</span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_cous(8)%></TD>
<TD>
<%
weekinfo=Split(rs_edit(13,0),"||")
For arr_couweeks_i=1 To 7
arr_couweeks(arr_couweeks_i)=weekinfo(arr_couweeks_i-1)
Next
%>
<%couweek%><span id="<%=cho_couslm(8)%>_txt"></span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_cous(12)%></TD>
<TD> <TEXTAREA NAME="<%=cho_couslm(12)%>" ROWS="10" maxlength="20" COLS="" style="width:295px;"><%=Replace(rs_edit(14,0),"<；br>；",Chr(13))%></TEXTAREA>
<span id="<%=cho_couslm(12)%>_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 checkcourses0(){
setSel2(<%=rs_edit(3,0)%>,$("SELECT")[3]);
}
postljs("<%=rs_edit(0,0)%>");
function checkcourses1(){
setSel2(<%=rs_edit(1,0)%>,$("SELECT")[1]);
}
</SCRIPT>
<%
end sub
Sub check_auto()
res "<SCRIPT LANGUAGE=""JavaScript"">",1
if Col_id<>0 Then response.write "postCols("""&Col_id&""");"
res "function checkcourses0(){",1
if pro_id<>0 Then response.write "setSel2("&pro_id&",$(""SELECT"")[3]);"
res "}",1
if lj_id<>0 Then response.write "postljs("""&lj_id&""");"
res "function checkcourses1(){",1
if t_cho<>0 Then response.write "setSel2("&t_cho&",$(""SELECT"")[1]);"
res "}",1
res "</SCRIPT>",1
End Sub
'****************************************************
'名称:type_jstable
'功能:接收表单提交过来的值
'****************************************************
Sub type_jstable()
cho_name = che(request("cho_name"))
con = che(request("con"))
con=che(con)
End Sub
'****************************************************
'名称:type_sqltable
'功能:将值提交入库
'参数:types 为空或 "add" 判断是修改记录还是添加记录
'****************************************************
Sub type_sqltable(types)
If types="add" Then rs("lj_id") = lj_id
rs("cho_name") = cho_name
rs("con") = con
rs("Opens") = Opens
End Sub
'****************************************************
'名称:type_listinfos
'功能:列表
'****************************************************
Sub type_listinfos()
%>
<SCRIPT LANGUAGE="JavaScript">
<!--
function check_list() {
var check_lj=$("select")[0].options[$("select")[0].selectedIndex].value
var check_Opens=$("select")[1].options[$("select")[1].selectedIndex].value
window.location.href="admin_res_cou_cho_type.asp?action=<%=action%>&page=<%=page%>&lj_id="+check_lj+"&Opens="+check_Opens;
}
//-->
</SCRIPT>
<H6>切换查看： <a href="admin_res_cou_cho_type.asp?action=list">全部</a> </H6>
<h5>
<ul>
<li>年 届 <SELECT NAME="<%=cho_tslm(2)%>"><%=my_sqlsel(lj_id,"lj")%></SELECT>
<li>状 态 <SELECT NAME="<%=cho_tslm(3)%>"><%=t_select(Opens)%></SELECT> <SPAN></SPAN>
<li> <INPUT TYPE="button" value="切换 " onclick="check_list();">
</ul>
</h5>
<table width="100%" align="center" border="1" class="info_tab2">
<tr>
<th width="5%" style="text-align:center;text-indent: 4px;">选</th>
<th width="5%">ID</th>
<th width="5%">年届</th>
<th width="45%">项目名称</th>
<th width="10%">状态</th>
<th width="15%">操作</th>
<th width="1"> </th>
</tr>
<%
Sql_Conditions=""
If lj_id<>0 Then Sql_Conditions=" and a.lj_id="&lj_id
If Opens<>0 Then Sql_Conditions=Sql_Conditions&" and a.Opens="&Opens
sql="select a.id,a.cho_name,a.Opens,b.lj "&_
" from res_cou_cho_type as a,"&_
"res_lj as b"&_
" where a.id<>0 "&_
" and a.lj_id=b.id " &_
Sql_Conditions&" order by a.id desc"
strFileName="admin_res_cou_cho_type.asp?action="&action&"&lj_id="&lj_id&"&Col_id="&Col_id&"&pro_id="&pro_id
colnum="8"
formaction="admin_res_cou_cho_type.asp?action=del"
sqllist sql,colnum,strFileName,formaction
If outcom=True Then
type_showContent
showdelpages
End If
%>
</TABLE>
<%
type_check_auto
end sub
'****************************************************
'名称:type_showContent
'功能:翻页列表输出
'****************************************************
sub type_showContent
dim i
i=0
do while not rs.eof
%>
<tr>
<td class="art_info2" align="center">
<input name='id' type='checkbox' class="chek" onclick="unselectall()" id="ArticleID" value='<%=Rs(0)%>' style=" border: 0px">
</td>
<td class="art_info2"> <%=rs(0)%></td>
<td class="art_info2"> <%=rs(3)%></td>
<td class="art_info2"> <%=rs(1)%></td>
<td class="art_info2"> <%=arr_Opens(rs(2))%></td>
<td class="art_info2"> <A HREF="admin_res_cou_cho_type.asp?action=edit&id=<%=Rs(0)%>">修改</A>｜<A HREF="admin_res_cou_cho_type.asp?action=del&id=<%=Rs(0)%>">删除</A></td>
<td class="art_info2"> </td>
</tr>
<%
i=i+1
if i>=MaxPerPage then exit do
rs.movenext
loop
end Sub
'****************************************************
'名称:type_addinfos
'功能:添加信息
'****************************************************
Sub type_addinfos()
%>
<table width="100%" cellspacing="1" cellpadding="0" class="info_tab">
<FORM METHOD=POST ACTION="admin_res_cou_cho_type.asp?action=save" name="edit">
<TR><TD class="zq" width="20%"><%=cho_ts(2)%></TD>
<TD> <SELECT NAME="<%=cho_tslm(2)%>"><%=my_sqlsel(lj_id,"lj")%></SELECT>
<BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_ts(3)%></TD>
<TD> <SELECT NAME="<%=cho_tslm(3)%>"><%=t_select(Opens)%></SELECT>
<span id="<%=cho_tslm(3)%>_txt"></span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_ts(0)%></TD>
<TD> <input name="<%=cho_tslm(0)%>" type="text" maxlength="20" value="" style="width:400px;"/>
<span id="<%=cho_tslm(0)%>_txt">*</span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_ts(1)%></TD>
<TD> <TEXTAREA NAME="<%=cho_tslm(1)%>" ROWS="" COLS="" style="width:400px; height:120px;"></TEXTAREA>
<span id="<%=cho_tslm(1)%>_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>
<%
type_check_auto
end Sub
'****************************************************
'名称:type_editinfos
'功能:编辑信息
'****************************************************
Sub type_editinfos()
If id="" Then errormsg "参数错误！"
Sql_Lists="id,cho_name,con,Opens,lj_id"
Sql_tables=" res_cou_cho_type"
Sql_Conditions=" id="&id
sql=Sqlinfo(Sql_Lists,Sql_tables,Sql_Conditions,Sql_Sortings,Sql_Orders,Sql_Additional)
cho_ts_edit = connopen(sql)
If isArray(cho_ts_edit)=False Then errormsg "参数错误"
%>
<table width="100%" cellspacing="1" cellpadding="0" class="info_tab">
<FORM METHOD=POST ACTION="admin_res_cou_cho_type.asp?action=mod" name="edit">
<TR><TD class="zq" width="20%">ID</TD>
<TD> <%=id%>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_ts(2)%></TD>
<TD> <SELECT NAME="<%=cho_tslm(2)%>" disabled><%=my_sqlsel(cho_ts_edit(4,0),"lj")%></SELECT>
<BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_ts(3)%></TD>
<TD> <SELECT NAME="<%=cho_tslm(3)%>"><%=t_select(cho_ts_edit(3,0))%></SELECT>
<span id="<%=cho_tslm(3)%>_txt"></span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_ts(0)%></TD>
<TD> <input name="<%=cho_tslm(0)%>" type="text" maxlength="20" value="<%=cho_ts_edit(1,0)%>" style="width:400px;"/>
<span id="<%=cho_tslm(0)%>_txt">*</span><BR>
</td>
</tr>
<TR><TD class="zq" width="20%"><%=cho_ts(1)%></TD>
<TD> <TEXTAREA NAME="<%=cho_tslm(1)%>" ROWS="" COLS="" style="width:400px; height:120px;"><%=Replace(cho_ts_edit(2,0),"<；br>；",Chr(13))%></TEXTAREA>
<span id="<%=cho_tslm(1)%>_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("<%=cho_ts_edit(3,0)%>");
function checkcourses(){
setSel2(<%=cho_ts_edit(4,0)%>,$("SELECT")[2]);
}
</SCRIPT>
<%
end sub
Sub type_check_auto()
res "<SCRIPT LANGUAGE=""JavaScript"">",1
if Col_id<>0 Then response.write "postCols("""&Col_id&""");"
res "function checkcourses(){",1
if pro_id<>0 Then response.write "setSel2("&pro_id&",$(""SELECT"")[2]);"
res "}",1
res "</SCRIPT>",1
End sub
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -