?? m_pro_add.asp
字號:
<!-- #include file="cookies.asp" -->
<script language="JavaScript">
function check()
{
if(document.form1.name.value == '')
{
window.alert('請輸入名稱');
document.form1.name.focus();
return false;
}
if(document.form1.id.value == '')
{
window.alert('請輸入編號');
document.form1.id.focus();
return false;
}
}
</script>
<!-- #include file="conn/conn.asp" -->
<html>
<head>
<title>專業管理</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body bgcolor="#EEEEEE" text="#000000">
<!-- #include file="button_t.asp" -->
<table width="50%" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td><table width="100%" border="0" align="center" bgcolor="#FFFFFF">
<form name="form1" method="post" action="m_addsave.asp?edit=add&act=profession" onsubmit="return check();">
<tr>
<td><font color="#FF0000">請不要輸入# * , 等非法字符</font></td>
</tr>
<tr><td>專業號：
</td>
</tr>
<tr><td>
<input name="id" type="text" size="10"> <font size="2"> </font>
</td>
</tr>
<tr><td>專業名稱：
</td>
</tr>
<tr><td>
<input name="name" type="text" size="50"> <font size="2"> </font>
</td>
</tr>
<tr>
<td> <input type="submit" name="Submit" value="創建"> </td>
</tr>
</form>
</table>
<hr width="760">
<table width="100%" border="0" align="center">
<tr>
<td bgcolor="#CCCCCC"><font color="#0000FF">【已有專業】</font></td>
</tr>
<%
if request("page")="" then
page="1"
else
page=request("page")
end if
set rs=server.createobject("adodb.recordset")
sql="select * from profession order by id"
rs.open sql,conn,1,1
if not rs.eof then
x=x+1
rs.pagesize=30
rs.Absolutepage=clng(page)
if cstr(page)=cstr(rs.PageCount) and (rs.RecordCount mod rs.PageSize <> 0) then
recend=rs.RecordCount mod rs.PageSize
else
recend=rs.PageSize
end if
if request("page")<>"" then
end if
%>
<tr>
<td>
<table width="100%" border="0" cellpadding="4" cellspacing="0" align="center">
<tr>
<td><strong>專業編號</strong></td>
<td><strong>專業名稱</strong></td>
<td width="100"><strong>加入時間</strong></td>
<td width="45"> </td>
<td width="45"> </td>
</tr>
<%
for i=1 to recend
if i mod 2=1 then
color="#f8f8f8"
else
color="#E4e4e4"
end if
%>
<tr bgcolor="<%=color%>" valign="middle">
<td width="20%"><%=trim(rs("id"))%></td>
<td width="45%"><%=trim(rs("name"))%></td>
<td width="15%"><%=trim(rs("addtime"))%></td>
<td width="10%">
<input type="button" name="Submit4" value="編輯" onclick="window.open('m_edit.asp?id=<%=trim(rs("id"))%>&act=profession');return false;">
</td>
<td width="10%">
<input type="button" name="Submit3" value="刪除" onClick="window.open('m_del.asp?id=<%=trim(rs("id"))%>&act=profession');return false;">
</td>
</tr>
<%
rs.movenext
next
%>
</table>
</td>
</tr>
</table>
<table border="0" width="100%" align="center" bgcolor="<%=tablebgcolor_2%>">
<tr>
<td>
<div align="left"><font color="#000000">共有試卷記錄<%=rs.recordcount%>條</font></div>
</td>
<td width="12%" align="center"> <font color="#000000">
<% if page="1" then %>
上頁
<%else%>
<a href=addexam.asp?page=<%=page-1%>>上頁</a>
<% end if %>
</font></td>
<td width="12%" align="center"> <font color="#000000">
<% if page=cstr(rs.pagecount) then %>
下頁
<%else%>
<a href=addexam.asp?page=<%=page+1%>>下頁</a>
<% end if %>
</font>
<%
end if
rs.close
set rs=nothing
%></td>
</tr>
</table></td>
</tr>
</table>
</body>
</html>
<%
conn.close
set conn=nothing
%>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -