📄 showcontent.asp

📁 工资管理系统功能齐全包括工人工资信息查询.
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="CheckLogin.asp"-->
<!--#include file="StudentConn.asp" -->
<!--#include file="ScoreManage_top.asp"-->
<%
	Dim sql,rs
	Set objConn=Server.CreateObject("ADODB.Connection")
	objConn.ConnectionString=MM_StudentConn_STRING
	objConn.Open
	Set rs=Server.CreateObject("ADODB.Recordset")
	sql="Select * from gongshi"
	rs.open sql,objConn,3,3
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<TITLE>公式查看</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content="MSHTML 6.00.2600.0" Name=GENERATOR>
<link href="home.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
body {
	background-color: #f7f7ff;
}
.STYLE1 {
	font-size: 14px;
	font-weight: bold;
}
.STYLE2 {
	font-size: 18px;
	color: #FF0000;
	font-weight: bold;
}
.STYLE4 {	font-size: 18px;
	color: #3366FF;
	font-weight: bold;
}
-->
</style>
</HEAD>
<BODY text=#000000 leftMargin=0 topMargin=0>
<div align="center" class="msg"><%=Request("msg")%><br><br><br>
<span class="STYLE2"><a href="CountTest.asp"><a href="ChuQinSet.asp">出勤设置 </a><a href="YeBanSet.asp">夜班设置</a> <a href="JiaBanSet.asp">加班设置</a> <a href="BinShiSet.asp">病事假设置</a> <a href="CountTest.asp">公式设置</a> <a href="ShowContent.asp"><span class="STYLE2">公式查看</span></a></span><br><br><br>
<table width="500" border="1" cellspacing="0" cellpadding="3" bordercolor="#CCCCFF" style="border-collapse:collapse">
  <tr>
    <td align="center"><span class="STYLE1">统计项目</span></td>
    <td align="center" class="STYLE1">公式</td>
    <td align="center" class="STYLE1">操作</td>
  </tr>
  <%
	For i=0 to rs.RecordCount-1
	if not (rs.eof or rs.bof) then
%>  
  <tr>
    <td align="center"><%=rs("Content")%></td>
    <td align="center"><textarea name="test_content" style="width:250;overflow-x:visible;overflow-y:visible;"><%=rs("Test_Content")%></textarea></td>
    <td align="center"><a href="DelContent.asp?id=<%=rs("Content")%>">删除</a>|<a href="ModifyContent.asp?id=<%=rs("Content")%>">修改</a></td>
  </tr>
  <%
  	else
		Response.Write("尚未设置公式！")
	end if
	rs.MoveNext
	next
%>
  </table>
    <br />
    <br />
</div><table width="760" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td>
		<Iframe src="CopyRight.asp" width="760" height="100" marginheight="0" marginwidth="0" scrolling="NO" frameborder="0" name="CopyRight"></iframe>
	</td>
  </tr>
</table>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -